[go: up one dir, main page]

login
A046896
Square elements of A046895.
0
1, 9, 3969, 5041, 9409, 89401, 35010889, 478953225, 741091729, 282110761881, 370672751241, 1930979822409, 5548799536921, 6445713623281, 81193957971361
OFFSET
0,2
COMMENTS
No other terms in first 200000 terms of A046895, though sequence is believed to be infinite.
No other terms in first 8000000 terms of A046895. - T. D. Noe, Mar 11 2009
MATHEMATICA
s = 0; Reap[ Do[s = s + SquaresR[4, n]; If[IntegerQ[Sqrt[s]], Print[{n, s}]; Sow[s]], {n, 0, 5*10^6}]][[2, 1]] (* Jean-François Alcover, Jul 02 2012 *)
CROSSREFS
Cf. A046895.
Sequence in context: A162013 A222948 A281876 * A036516 A024126 A163018
KEYWORD
nonn,easy,nice
EXTENSIONS
Extended by T. D. Noe, Mar 11 2009
STATUS
approved