A160944 a(n)= n * digital sum(n-1) * digital sum(n+1)

0, 6, 24, 60, 120, 210, 336, 504, 72, 180, 33, 96, 195, 336, 525, 768, 1071, 1440, 342, 600, 168, 330, 552, 840, 1200, 1638, 2160, 2772, 870, 1320, 465, 768, 1155, 1632, 2205, 2880, 3663, 4560, 1716, 2400, 984, 1470, 2064, 2772, 3600, 4554, 5640, 6864

Offset

1,2

Links

Table of n, a(n) for n=1..48.

Formula

a(n)=n*A007953(n-1)*A007953(n+1).

Example

a(8)=8*ds(7)*ds(9)=8*7*9=504.
a(15)=15*ds(14)*ds(16)=15*5*7=525.
a(26)=26*ds(25)*ds(27)=26*7*9.

Mathematica

Table[n Total[IntegerDigits[n-1]]Total[IntegerDigits[n+1]], {n, 50}] (* Harvey P. Dale, Nov 07 2021 *)

Crossrefs

Sequence in context: A211615 A195647 A086768 * A160936 A007531 A331433

Adjacent sequences: A160941 A160942 A160943 * A160945 A160946 A160947

Keyword

nonn,base,easy

Author

Claudio Meller, May 30 2009

Status

approved