A078270 - OEIS

A078270

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

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

(list; graph; refs; listen; history; text; internal format)

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