OFFSET
1,2
COMMENTS
a(84) > 3*10^10. - Jason Yuen, May 31 2024
LINKS
MATHEMATICA
b = 13; c = {}; Select[Range[10^4], Divisible[FromDigits[c = Join[IntegerDigits[#, b], c], b], #] &] (* Robert Price, Mar 12 2020 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 20 2000
More terms from Larry Reeves (larryr(AT)acm.org), May 24 2001
Edited and updated by Larry Reeves (larryr(AT)acm.org), Apr 12 2002
a(29)-a(39) from Max Alekseyev, May 16 2011
STATUS
approved