|
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
|
|
LINKS
|
|
|
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
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Previous a(15) removed, a(35) and a(43) corrected by R. J. Mathar, Jan 30 2010
|
|
STATUS
|
approved
|
|
|
|