OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = A295006(n)^2.
MATHEMATICA
Select[Range[250]^2, Max[IntegerDigits[#]]==6&] (* Harvey P. Dale, Jun 14 2025 *)
PROG
(PARI) is_A295016(n)=issquare(n)&&n&&vecmax(digits(n))==6 \\ The "n&&" avoids an error message for n = 0.
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Nov 12 2017
STATUS
approved
