Nothing Special   »   [go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A006050
Smallest number of additive persistence n.
(Formerly M4683)
12
0, 10, 19, 199, 19999999999999999999999
OFFSET
0,2
COMMENTS
The next term a(5) is 1 followed by 2222222222222222222222 9's.
REFERENCES
Meimaris Antonios, On the additive persistence of a number in base p, Preprint, 2015.
H. J. Hindin, The additive persistence of a number, J. Rec. Math., 7 (No. 2, 1974), 134-135.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
N. J. A. Sloane, The persistence of a number, J. Recreational Math., 6 (1973), 97-98.
Eric Weisstein's World of Mathematics, Additive Persistence.
FORMULA
For n>1 a(n) = 2*10^((a(n-1)-1)/9)-1.
MATHEMATICA
lst = {0, 10}; Do[AppendTo[lst, 2*10^((lst[[-1]] - 1)/9) - 1], {3}]; lst (* Arkadiusz Wesolowski, Oct 17 2012 *)
Join[{0}, NestList[2*10^((#-1)/9)-1&, 10, 3]] (* Harvey P. Dale, May 08 2020 *)
CROSSREFS
KEYWORD
nonn,base,nice
STATUS
approved