login
A167761
a(n) = sqrt(A167657(n)).
2
0, 1, 2, 3, 16, 5, 36, 7, 64, 729, 10, 1331, 144, 13, 196, 3375, 4096, 17, 5832, 361, 20, 9261, 484, 12167, 331776, 625, 26, 729, 28, 841, 21870000000, 961, 32768, 33, 45435424, 35, 46656, 50653, 1444, 59319, 64000, 41, 130691232, 43, 1936, 45
OFFSET
1,3
COMMENTS
a(n) = prime => A096478(n).
If a(n) = prime => A096478(n). - Giovanni Teofilatto, Nov 12 2009
MAPLE
A000720 := proc(n) numtheory[pi](n) ; end proc: A167761 := proc(nmax) local ol, a ; ol := 0 ; a := 0 ; for n from 1 to nmax do if A000720(n) = ol then a := a*ol ; else printf("%d, ", sqrt(a)) ; a := A000720(n) ; end if; ol := A000720(n) ; end do ; return ; end proc: A167761(260) ; # R. J. Mathar, Jan 30 2010
CROSSREFS
Cf. A167657.
Cf. A096478. - Giovanni Teofilatto, Nov 12 2009
Sequence in context: A088447 A326578 A103390 * A364813 A176029 A218323
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Nov 11 2009, corrected Nov 12 2009
EXTENSIONS
Previous a(15) removed, a(35) and a(43) corrected by R. J. Mathar, Jan 30 2010
STATUS
approved