|
Search: id:A060004
|
|
|
| A060004 |
|
a(n) = least odd number which can be represented in the form p + 2*k^2, k>0, in n different ways. |
|
+0
1
|
|
| 1, 5, 13, 21, 49, 55, 91, 139, 259, 181, 301, 391, 481, 559, 619, 829, 859, 1069, 1111, 1081, 1489, 1609, 1741, 1951, 2029, 2971, 2341, 3379, 3769, 3331, 3589, 3961, 4525, 4189, 5281, 4801, 4975, 6361, 7579, 5911, 6439, 7111, 6319, 9931, 11059, 8869
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MATHEMATICA
|
a = Table[ 0, {100} ]; Do[ c = 0; k = 1; While[ n - 2*k^2 > 1, If[ PrimeQ[ n - 2*k^2 ], c++ ]; k++ ]; If[ a[ [ c ] ] == 0, a[ [ c ] ] = n ], { n, 1, 70801, 2 } ]
|
|
CROSSREFS
|
Adjacent sequences: A060001 A060002 A060003 this_sequence A060005 A060006 A060007
Sequence in context: A107997 A065766 A034170 this_sequence A076408 A083800 A006353
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Mar 14 2001
|
|
|
Search completed in 0.002 seconds
|
