A161352 a(n) = n + R(n) + digsum(n) + product of the digits of n.

0, 4, 8, 12, 16, 20, 24, 28, 32, 36, 12, 25, 38, 51, 64, 77, 90, 103, 116, 129, 24, 38, 52, 66, 80, 94, 108, 122, 136, 150, 36, 51, 66, 81, 96, 111, 126, 141, 156, 171, 48, 64, 80, 96, 112, 128, 144, 160, 176, 192, 60, 77, 94, 111, 128, 145, 162, 179, 196, 213, 72, 90, 108

Offset

0,2

Comments

a(1)= 1 + 1 + 1 + 1 = 4 ; a(12) = 12 + 21 + 3 + 2 = 38.

Links

Table of n, a(n) for n=0..62.

Maple

A161352 := proc(n)
        n+digrev(n)+digsum(n)+A007954(n) ; # oeis.org/transforms.txt
end proc:
seq(A161352(n), n=0..30) ; # R. J. Mathar, May 28 2025

Mathematica

a[n_]:=n+IntegerReverse[n]+Total[IntegerDigits[n]]+Times@@IntegerDigits[n]; Array[a, 63, 0] (* Stefano Spezia, Feb 09 2023 *)

Crossrefs

Cf. A001477, A004086, A007953, A007954.

Sequence in context: A311124 A191677 A076310 * A337080 A295774 A008586

Adjacent sequences: A161349 A161350 A161351 * A161353 A161354 A161355

Keyword

nonn,base

Author

Claudio Meller, Jun 07 2009

Extensions

a(0) = 0 prepended by Stefano Spezia, Feb 09 2023

Status

approved