|
|
|
|
1, 4, 9, 36, 64, 169, 256, 576, 625, 676, 729, 1024, 1369, 1521, 1600, 2304, 2500, 2809, 2916, 3136, 4096, 4489, 5184, 5476, 5625, 6084, 6561, 6889, 7396, 7744, 9216, 9409, 10816, 11236, 12321, 14400, 14641, 16129, 17956, 19044, 22500, 23104, 24964, 25281, 26244, 26569, 27556, 27889, 28224, 28561, 33856, 36864, 37636, 40000, 40401
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Not all terms are squares: the first nonsquare occurs as a(1427) = 97560000 = 2^6 * 3^2 * 5^4 * 271, and among the first 4011 terms (those <= 2^30), there are 24 of them, see A326183.
|
|
LINKS
|
|
|
PROG
|
(PARI)
A003961(n) = my(f = factor(n)); for (i=1, #f~, f[i, 1] = nextprime(f[i, 1]+1)); factorback(f); \\ From A003961
A064989(n) = {my(f); f = factor(n); if((n>1 && f[1, 1]==2), f[1, 2] = 0); for (i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f)};
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|