1,1

a(n) = A006530(A000082(n+1)). - Reinhard Zumkeller, Oct 03 2012

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

FactorInteger[Total[#]][[-1, 1]]&/@Partition[Range[100], 3, 1] (* Harvey P. Dale, Apr 03 2011 *)

(Haskell)

a076566 = a006530 . (* 3) . (+ 1) -- Reinhard Zumkeller, Oct 03 2012

Cf. A008585.

Sequence in context: A132424 A070864 A321790 * A083574 A108025 A192451

Adjacent sequences: A076563 A076564 A076565 * A076567 A076568 A076569

easy,nonn

Zak Seidov, Oct 19 2002

approved