This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A096972 Number of preimages of n (or immediate predecessors) under map f(k) = k + (product of nonzero digits of k). 3
 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 2, 0, 2, 0, 2, 0, 2, 0, 1, 0, 2, 1, 1, 0, 2, 0, 1, 1, 0, 0, 1, 1, 1, 1, 0, 0, 2, 0, 0, 1, 1, 0, 2, 1, 1, 1, 0, 0, 2, 0, 0, 0, 1, 2, 1, 0, 1, 0, 1, 0, 2, 0, 0, 1, 2, 1, 1, 0, 1, 0, 0, 0, 2, 1, 0, 1, 1, 0, 2, 1, 0, 0, 0, 1, 2, 0, 2, 1, 0, 0, 1, 0, 1, 1, 0, 0, 2, 1, 1, 1, 3, 0, 2, 0 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,12 LINKS MATHEMATICA f[n_] := Block[{s = Sort[ IntegerDigits[ n]]}, While[ s[[1]] == 0, s = Drop[s, 1]]; n + Times @@ s]; t = Table[0, {111}]; Do[ t[[f [n]]]++, {n, 111}]; Table[ t[[n]], {n, 105}] CROSSREFS Cf. A063108, A096347, A063425, A096922, A096923, A096924, A096925, A096926, A096927, A096928, A096929, A096930, A096931, A230106 (a variant). Sequence in context: A026611 A277152 A230106 * A101227 A277162 A230103 Adjacent sequences:  A096969 A096970 A096971 * A096973 A096974 A096975 KEYWORD easy,nonn,base AUTHOR Robert G. Wilson v, Jul 16 2004 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 18 00:17 EDT 2019. Contains 328135 sequences. (Running on oeis4.)