The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A249121 a(n) = n - (sum of digits of n) - (product of digits of n). 2
 0, -1, -2, -3, -4, -5, -6, -7, -8, -9, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, 18, 16, 14, 12, 10, 8, 6, 4, 2, 0, 27, 24, 21, 18, 15, 12, 9, 6, 3, 0, 36, 32, 28, 24, 20, 16, 12, 8, 4, 0, 45, 40, 35, 30, 25, 20, 15, 10, 5, 0, 54, 48, 42, 36, 30, 24, 18, 12, 6, 0, 63, 56, 49, 42, 35, 28, 21, 14, 7, 0, 72, 64, 56 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS In the graph, the upper bound is the line: a(10*m) = 9m: a(10) = 9, a(20) = 18, a(30) = 27,... LINKS Alois P. Heinz, Table of n, a(n) for n = 0..10000 FORMULA a(n) = n - A007953(n) - A007954(n) = A001477(n) - A061762(n). MAPLE a:= n-> (l-> n-add(i, i=l)-mul(i, i=l))(convert(n, base, 10)): seq(a(n), n=0..120); # Alois P. Heinz, Oct 22 2014 MATHEMATICA Table[id = IntegerDigits[n]; n - (Plus @@ id) - (Times @@ id), {n, 0, 200}] PROG (PARI) a(n)=d=digits(n); if(!n, return(0)); n-sumdigits(n)-prod(i=1, #d, d[i]) vector(100, n, a(n-1)) \\ Derek Orr, Oct 21 2014 CROSSREFS Cf. A001477, A007953, A007954, A061762. Sequence in context: A028903 A081599 A289642 * A289410 A225673 A257779 Adjacent sequences:  A249118 A249119 A249120 * A249122 A249123 A249124 KEYWORD sign,base,look AUTHOR Zak Seidov, Oct 21 2014 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 February 22 11:33 EST 2020. Contains 332135 sequences. (Running on oeis4.)