A078270 a(n) = A078269(n)/11.

1, 111, 12021, 1293931, 138575841, 14775857751, 1569413139661, 166124050421571, 17530678687703481, 101854077969780448291, 1019376417897988137639201, 10202855923708990650955830111

Offset

1,2

Links

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

Maple

digrev := proc(d) local r, i ; r := [] ; for i from 1 to nops(d) do r := [op(i, d), op(r)] ; od ; RETURN(r) ; end: A078269 := proc(n) local digs, res, i ; digs := [] ; for i from 1 to n do digs := [op(digs), op(digrev(convert(i, base, 10)))] ; od ; res := 0 ; for i from 1 to nops(digs) do res := 100*res+op(i, digs) ; od ; digs := [] ; for i from 1 to n do digs := [op(digs), op(convert(i, base, 10))] ; od ; res := 10*res ; for i from 1 to nops(digs) do res := res+op(i, digs)*10^(2*i-2) ; od ; RETURN(res) ; end: A078270 := proc(n) A078269(n)/11 ; end: for n from 1 to 20 do printf("%d, ", A078270(n)) ; od : # R. J. Mathar, Feb 27 2007

Crossrefs

Cf. A078269.

Sequence in context: A109242 A349805 A165155 * A298677 A172175 A178906

Adjacent sequences: A078267 A078268 A078269 * A078271 A078272 A078273

Keyword

base,nonn

Author

Amarnath Murthy, Nov 24 2002

Extensions

More terms from R. J. Mathar, Feb 27 2007

Status

approved