This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A078270 a(n) = A078269(n)/11. 4
 1, 111, 12021, 1293931, 138575841, 14775857751, 1569413139661, 166124050421571, 17530678687703481, 101854077969780448291, 1019376417897988137639201, 10202855923708990650955830111 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS 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: A098034 A109242 A165155 * A172175 A178906 A225374 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

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.