OFFSET
1,2
COMMENTS
Generated with DrScheme.
From Pontus von Brömssen, May 01 2024: (Start)
a(6) > 10^43 (if it exists).
If k = x*10^m is a term where 1 <= x < 10 and k is not 1 or 119, then 1.1914114169419441614111944144941411111111191 < x < 20/3.
(End)
LINKS
J. Wellons, Tables of Shared Digits [archived]
EXAMPLE
4119^2 = 16966161.
PROG
(PARI) isokd(d) = #setintersect([0, 2, 3, 5, 7, 8], Set(d)) == 0;
isok(k) = isokd(digits(k)) && isokd(digits(k^2)); \\ Michel Marcus, Jun 24 2021
CROSSREFS
KEYWORD
base,nonn,more
AUTHOR
Jonathan Wellons (wellons(AT)gmail.com), Jan 22 2008
STATUS
approved