[go: up one dir, main page]

login
A053896
Numbers k such that k^2 contains only digits {1,4,5}.
1
1, 2, 12, 21, 38, 10729, 39388, 664388, 10743112, 6415259271, 10701193462, 2261662119229, 73560479506012
OFFSET
1,2
MATHEMATICA
Select[Range[1, 100000], ContainsOnly[IntegerDigits[#^2], {1, 4, 5}] &] (* Julien Kluge, Jul 08 2016 *)
CROSSREFS
Cf. A053897.
Sequence in context: A053898 A058413 A053890 * A155890 A213969 A199986
KEYWORD
nonn,base,more
AUTHOR
Patrick De Geest, Mar 15 2000
EXTENSIONS
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 04 2005
Two more terms from Jon E. Schoenfield, Sep 03 2006
STATUS
approved