A083453 a(n) = (concatenation of numbers from n to 1) - n^n.

0, 17, 294, 4065, 51196, 607665, 6830778, 70877105, 600233832, 987654321, 825675983710, 112194887206065, 12818235881062068, 1402009104162096305, 150975227220606794946, 16132966377037278102705

Offset

1,2

Comments

For n = 76 we get a negative number. - Stefan Steinerberger, Jun 05 2007

Links

Georg Fischer, Table of n, a(n) for n = 1..100

Example

a(4) = 4321 - 256 = 4065.

Mathematica

a = {}; For[n = 1, n < 20, n++, AppendTo[a, FromDigits[Flatten[Table[IntegerDigits[n - i], {i, 0, n - 1}]]] - n^n]]; a (* Stefan Steinerberger, Jun 05 2007 *)
Table[FromDigits[Flatten[IntegerDigits/@Reverse[Range[n]]]]-n^n, {n, 20}] (* Harvey P. Dale, May 07 2019 *)

Crossrefs

Sequence in context: A186000 A222572 A163049 * A090437 A007805 A158585

Adjacent sequences: A083450 A083451 A083452 * A083454 A083455 A083456

Keyword

base,sign

Author

Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 01 2003

Extensions

More terms from Stefan Steinerberger, Jun 05 2007

Status

approved