OFFSET
1,2
FORMULA
EXAMPLE
a(1)=1 because 1st composite = 4 and (2*2)=1.
a(2)=2 because 2nd composite = 6 and (2*3 or 3*2) = 2.
MAPLE
A177962 := proc(n) local c; c := A002808(n) ; a := (numtheory[bigomega](c))! ; for p in ifactors(c)[2] do a := a/ op(2, p)! ; end do: a ; end proc:
seq(A177962(n), n=1..120) ; # R. J. Mathar, May 28 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, May 16 2010
EXTENSIONS
Entries checked by R. J. Mathar, May 28 2010
STATUS
approved