id:A096972 - OEIS Search Results

Search: id:A096972

Displaying 1-1 of 1 results found.

page 1

Number of preimages of n (or immediate predecessors) under map f(k) = k + (product of nonzero digits of k).

+0
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; listen)

	OFFSET	`1,12`
	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.` `Sequence in context: A103271 A029832 A026611 this_sequence A101227 A021499 A010673` `Adjacent sequences: A096969 A096970 A096971 this_sequence A096973 A096974 A096975`
	KEYWORD	`easy,nonn,base`
	AUTHOR	`Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 16 2004`

page 1

Search completed in 0.002 seconds

Last modified November 29 12:46 EST 2009. Contains 167659 sequences.

AT&T Labs Research