OFFSET
1,1
COMMENTS
All numbers congruent to a(2) = 641519 (mod 5*10^10) are also in the sequence. - M. F. Hasler, Jul 17 2024
REFERENCES
C. A. Pickover, "Keys to Infinity", New York: Wiley, p. 7, 1995.
LINKS
Giovanni Resta, super-d numbers, personal web site "Numbers Aplenty", 2013
Eric Weisstein's World of Mathematics, Super-d Number.
MAPLE
d := 8 ;
for n from 1 do
convert(d*n^d, base, 10) ;
if verify([8, 8, 8, 8, 8, 8, 8, 8], %, 'sublist') then
print(n) ;
end if;
end do: # R. J. Mathar, Jan 11 2013
MATHEMATICA
Select[Range[65*10^6], SequenceCount[IntegerDigits[8*#^8], {8, 8, 8, 8, 8, 8, 8, 8}]>0&] (* Harvey P. Dale, Dec 24 2016 *)
PROG
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, May 15 1998
EXTENSIONS
Offset changed to 1 by M. F. Hasler, Jul 17 2024
STATUS
approved