login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A176209
Sums of at least 2 squares s', for s >= 4.
0
8, 13, 20, 24, 29, 33, 34, 40, 44, 45, 53, 57, 58, 62, 68, 72, 73, 77, 80, 85, 89, 90, 94, 97, 104, 108, 109, 113, 116, 120, 125, 129, 130, 134, 137, 141, 148, 152, 153, 157, 160, 164, 168, 173, 177, 178, 182, 185, 189, 193, 194, 200, 204, 205, 209, 212, 216, 220
OFFSET
1,1
COMMENTS
8=4+4, 13=9+4, 20=16+4, 24=16+4+4, 29=25+4,...
MATHEMATICA
f1[n_]:=(x=n; While[x>3, x-=Floor[Sqrt[x]]^2]; x); f2[n_]:=(x=n; k=0; While[x>3, k++; x-=Floor[Sqrt[x]]^2]; k); lst={}; Do[If[f1[n]==0&&f2[n]>1, AppendTo[lst, n]], {n, 6!}]; lst
CROSSREFS
Sequence in context: A070131 A030782 A219721 * A227453 A266212 A063849
KEYWORD
nonn
AUTHOR
STATUS
approved