login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A215028 a(1) = 1; for n >= 1, a(n+1) = (concatenation of n+1 and n) - a(n). 2
1, 20, 12, 31, 23, 42, 34, 53, 45, 64, 1046, 165, 1147, 266, 1248, 367, 1349, 468, 1450, 569, 1551, 670, 1652, 771, 1753, 872, 1854, 973, 1955, 1074, 2056, 1175, 2157, 1276, 2258, 1377, 2359, 1478, 2460, 1579, 2561, 1680, 2662, 1781, 2763, 1882, 2864, 1983 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

A variation of A215027.

LINKS

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

MAPLE

f:=proc(i) (i+1)*10^(1+floor(evalf(log10(i))))+i; end: # A127423

a:=proc(n) option remember; global f; if n=1 then 1 else f(n-1)-a(n-1); fi; end;

PROG

(PARI) A215028(n, print_all=0)={my(a=1); for(n=1, n-1, print_all & print1(a", "); a=(n+1)*10^#Str(n)+n-a); a} \\ - M. F. Hasler, Aug 23 2012

CROSSREFS

Cf. A215027, A127423.

Sequence in context: A209644 A154043 A073868 * A292558 A040382 A223283

Adjacent sequences:  A215025 A215026 A215027 * A215029 A215030 A215031

KEYWORD

nonn,base

AUTHOR

N. J. A. Sloane, Aug 04 2012

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
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 16 20:45 EST 2019. Contains 320189 sequences. (Running on oeis4.)