login
A233456
Numbers k such that k^10 starts with k itself (in base 10).
7
0, 1, 6, 10, 13, 36, 60, 100, 1000, 10000, 100000, 129155, 278256, 1000000, 10000000, 21544347, 100000000, 1000000000, 10000000000, 59948425032, 100000000000, 599484250319, 1000000000000, 10000000000000, 100000000000000, 464158883361278, 1000000000000000
OFFSET
1,3
EXAMPLE
6^10 = 60466176 begins with 6, so 6 is in the sequence.
MATHEMATICA
kmax=10^6; Select[Range[0, kmax], FromDigits[Drop[IntegerDigits[#^10], -(IntegerLength[#^10]-IntegerLength[#])]]==# &] (* Stefano Spezia, Aug 27 2023 *)
PROG
(PARI) r=135; print1(1, ", "); e=10; for(n=2, r, p=round((10^(1/(e-1)))^n); f=p^e; b=10^(#Str(f)-#Str(p)); if((f-lift(Mod(f, b)))/b==p, print1(p, ", ")));
KEYWORD
nonn,base,easy
AUTHOR
EXTENSIONS
0 inserted by Juhani Heino, Aug 31 2015
STATUS
approved