A053896 Numbers k such that k^2 contains only digits {1,4,5}.
1, 2, 12, 21, 38, 10729, 39388, 664388, 10743112, 6415259271, 10701193462, 2261662119229, 73560479506012
Offset: 1
Links
- Author?, Source(txt) [Broken link]
- P. De Geest, Squares containing at most three distinct digits, Index entries for related sequences
Crossrefs
Cf. A053897.
Programs
-
Mathematica
Select[Range[1, 100000], ContainsOnly[IntegerDigits[#^2], {1, 4, 5}] &] (* Julien Kluge, Jul 08 2016 *)
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