|
Search: id:A031162
|
|
|
| A031162 |
|
Numbers that are both lucky and square. |
|
+0
5
|
|
| 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; listen)
|
|
|
OFFSET
|
1,2
|
|
|
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@# &] (from Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006)
|
|
CROSSREFS
|
Cf. A000959, A031163.
Sequence in context: A038771 A045972 A112629 this_sequence A147160 A048490 A113828
Adjacent sequences: A031159 A031160 A031161 this_sequence A031163 A031164 A031165
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Patrick De Geest (pdg(AT)worldofnumbers.com)
|
|
|
Search completed in 0.002 seconds
|
