A160936 a(n)= n * reversal(n-1) * reversal(n+1).

0, 6, 24, 60, 120, 210, 336, 504, 72, 990, 231, 4092, 11193, 22134, 37515, 57936, 83997, 116298, 3078, 21840, 924, 8448, 21252, 39936, 65100, 97344, 137268, 185472, 7134, 35880, 2139, 13728, 32637, 59466, 94815, 139284, 193473, 257982, 12948

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

a(8) = 8*R(7)*R(9) = 7*8*9 = 504;
a(15) = 15*R(14)*R(16) = 15*41*61 = 37515;
a(26) = 26*R(25)*R(27) = 26*52*72 = 97344.
a(12) = 12*11*31 = 4092. - Emeric Deutsch, Jun 24 2009

Maple

rev := proc (n) local nn: nn := convert(n, base, 10); add(nn[j]*10^(nops(nn)-j), j = 1 .. nops(nn)) end proc: seq(n*rev(n-1)*rev(n+1), n = 1 .. 40); # Emeric Deutsch, Jun 24 2009

Mathematica

Table[n*IntegerReverse[n-1]*IntegerReverse[n+1], {n, 40}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 16 2018 *)

Crossrefs

Sequence in context: A195647 A086768 A160944 * A007531 A331433 A329119

Adjacent sequences: A160933 A160934 A160935 * A160937 A160938 A160939

Keyword

nonn,base

Author

Claudio Meller, May 30 2009

Status

approved