|
Search: id:A096783
|
|
|
| A096783 |
|
Numbers n such that n, n+1, n+2, n+3, n+4 are all of the form x^2+2*y^2 for nonnegative x, y. |
|
+0
2
|
|
| 0, 96, 800, 2400, 3200, 3648, 4096, 4800, 6272, 7296, 9600, 18272, 19648, 20000, 20672, 23648, 28224, 28800, 29472, 31424, 34848, 36896, 37472, 43072, 48672, 50272, 51200, 53600, 53824, 55072, 57696, 59648, 62848, 64800, 66048, 69824
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
EXAMPLE
|
96=8^2+2*4^2, 97=5^2+2*6^2, 98 = 0^2+2*7^2,99=9^2+2*3^2=7^2+2*5^2,100=10^2+2*0^2
|
|
MATHEMATICA
|
f[n_] := f[n_] = Block[{y = 0}, While[x = Sqrt[n - 2y^2]; !IntegerQ[x] && x >= 0, y++ ]; If[x \[Element] Reals, 1, 0]]; Select[ Range[0, 76895], f[ # ] == f[ # + 1] == f[ # + 2] == f[ # + 3] == f[ # + 4] == 1 &] (from Robert G. Wilson v Aug 20 2004)
|
|
CROSSREFS
|
Sequence in context: A084048 A051483 A051465 this_sequence A103846 A027628 A128962
Adjacent sequences: A096780 A096781 A096782 this_sequence A096784 A096785 A096786
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
John L. Drost (drost(AT)marshall.edu), Aug 16 2004
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 20 2004
|
|
|
Search completed in 0.002 seconds
|
