OFFSET
3,1
EXAMPLE
a(3)=ilog(2)+ilog(4)=(2*1)+(2*2)=6.
a(13)=ilog(12)+ilog(14)=(2*2+3*1)+(2*1+7*1)=16.
MATHEMATICA
iLn = Dot @@ Transpose[FactorInteger[ # ]] &; NiLn = iLn[ # - 1] + iLn[ # + 1] &; Map[NiLn, Range[3, 200]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Carlos Alves, Dec 02 2006
STATUS
approved