1,1

Ivan Neretin, Table of n, a(n) for n = 1..10000

a(n) = A001222(A004355(n)). - Michel Marcus, Nov 10 2017

with(numtheory):a:=proc(n) if n=0 then 0 else bigomega(binomial(6*n, n)) fi end: seq(a(n), n=1..77); # Zerinvary Lajos, Apr 11 2008

Table[PrimeOmega[Binomial[6 n, n]], {n, 77}] (* Ivan Neretin, Nov 09 2017 *)

(PARI) a(n) = bigomega(binomial(6*n, n)); \\ Michel Marcus, Nov 10 2017

Cf. A001222, A004355.

Cf. A023853, A023854.

Sequence in context: A087786 A210468 A080950 * A048750 A326136 A276081

Adjacent sequences: A023849 A023850 A023851 * A023853 A023854 A023855

nonn

Clark Kimberling

approved