OFFSET
1,2
LINKS
MATHEMATICA
Select[Range[1, 10000], ContainsOnly[IntegerDigits[#^2], {1, 3, 4}] &] (* Julien Kluge, Jul 08 2016 *)
CROSSREFS
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
One more term from Jon E. Schoenfield, Sep 03 2006
Two more terms from Mishima's page added by Max Alekseyev, Jan 28 2012
a(15) from Zhao Hui Du, Mar 06 2024
STATUS
approved