|
|
A031162
|
|
Numbers that are both lucky and square.
|
|
6
|
|
|
1, 9, 25, 49, 169, 289, 361, 529, 729, 841, 961, 1369, 2209, 3481, 3721, 3969, 4761, 5041, 7921, 9409, 9801, 10609, 12321, 15129, 17689, 20449, 21609, 24025, 24649, 32041, 32761, 35721, 36481, 42025, 42849, 43681, 50625, 52441, 53361
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
Donovan Johnson, Table of n, a(n) for n = 1..2512 (terms < 10^9)
|
|
MATHEMATICA
|
lst = Range[1, 73440, 2]; i = 2; While[ i <= (len = Length@lst) && (k = lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; Select[lst, IntegerQ@ Sqrt@# &] (* Robert G. Wilson v, May 12 2006 *)
|
|
CROSSREFS
|
Cf. A000959, A031163.
Sequence in context: A266132 A112629 A225322 * A348232 A147160 A336669
Adjacent sequences: A031159 A031160 A031161 * A031163 A031164 A031165
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Patrick De Geest
|
|
STATUS
|
approved
|
|
|
|