A232488 a(1) = 7; a(n+1) = a(n) + product of nonzero digits of a(n).
7, 14, 18, 26, 38, 62, 74, 102, 104, 108, 116, 122, 126, 138, 162, 174, 202, 206, 218, 234, 258, 338, 410, 414, 430, 442, 474, 586, 826, 922, 958, 1318, 1342, 1366, 1474, 1586, 1826, 1922, 1958, 2318, 2366, 2582, 2742, 2854, 3174, 3258, 3498, 4362, 4506, 4626, 4914
Offset: 1
Links
- P. A. Loomis, An Introduction to Digit Product Sequences, J. Rec. Math., 32 (2003-2004), 147-151.
- P. A. Loomis, An Introduction to Digit Product Sequences, J. Rec. Math., 32 (2003-2004), 147-151. [Annotated archived copy]
- Index entries for Colombian or self numbers and related sequences
Programs
-
Maple
See A232486.
-
Mathematica
nxt[n_]:=n+Times@@Select[IntegerDigits[n],#!=0&]; NestList[nxt,7,50] (* Harvey P. Dale, Jun 13 2015 *)