|
|
A058422
|
|
Squares composed of digits {0,1,8}, not ending with zero.
|
|
3
|
|
|
1, 81, 11881, 811801, 1018081, 81018001, 100180081, 108180801, 8100180001, 10001800081, 10181011801, 810001800001, 1000018000081, 1008018008001, 80181118180881, 81000018000001, 100000180000081, 100180101018001, 1180000888001881, 8100000180000001, 10000001800000081
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[FromDigits/@Tuples[{0, 1, 8}, 17], Mod[#, 10]!=0&&IntegerQ[Sqrt[#]]&] (* Harvey P. Dale, Sep 09 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|