OFFSET
1,2
LINKS
Zhao Hui Du, Table of n, a(n) for n = 1..25
MATHEMATICA
Select[Flatten[Table[FromDigits/@Tuples[{1, 3, 6}, n], {n, 20}]], IntegerQ[ Sqrt[ #]]&] (* Harvey P. Dale, Jul 20 2021 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Mar 15 2000
EXTENSIONS
More terms from C. Ronaldo (aga_new_ac(AT)hotmail.com), Jan 04 2005
STATUS
approved