|
|
A053889
|
|
Squares composed of digits {1,2,9}.
|
|
2
|
|
|
1, 9, 121, 29929, 9991921, 1212919929, 1929229929, 1991212129, 2929299129, 1229129212921, 92222199291121, 219992999929921, 99221129991291219129, 2291192212129911919221121, 9992221299191112291912929211222129, 211192199129121999192121999211919121, 21112999921929291129929211912291229929191119991929921
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Flatten[Table[Select[FromDigits/@Tuples[{1, 2, 9}, n], IntegerQ[Sqrt[#]]&], {n, 12}]] (* This program generates only the first 9 terms of the sequence *) (* Harvey P. Dale, Oct 19 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 04 2005
Two more terms from Mishima's webpage added by Max Alekseyev, Jun 17 2011
|
|
STATUS
|
approved
|
|
|
|