editing
approved
editing
approved
P:=proc(n) if n^3 mod 10^(ilog10(n)+1)=n then n; fi; end:
seq(P(i), i=0..90625); # Paolo P. Lava, Jun 25 2018
approved
editing
editing
approved
a(1) through a(13) are the rightmost digit or pair of digits in A215558. - Jonathan Vos Post, Aug 16 2012
approved
editing
(MAGMAMagma) [n: n in [0..10^5] | Intseq(n^3)[1..#Intseq(n)] eq Intseq(n)]; // Bruno Berselli, Apr 04 2013
reviewed
approved
proposed
reviewed
editing
proposed
Let q(n) = floor(a(n)^3 / 10^A055642(a(n))), where A055642(n) is the number of digits in the decimal expansion of n. As well, let na and nb denote the indices of the preceding and next terms that begin with a 9. Then (1/q(n)) * (a(n)^4 - a(n)^3 - a(n)^2 + a(n)) - 2*a(n)^2 + a(n) + q(n) + 1 = a(na+nb-n)^2 - a(na+nb-n) - q(na+nb-n). - Christopher Hohl, Apr 08 2019
proposed
editing
editing
proposed