A056618 Concatenate factorials.

1, 11, 112, 1126, 112624, 112624120, 112624120720, 1126241207205040, 112624120720504040320, 112624120720504040320362880, 1126241207205040403203628803628800, 112624120720504040320362880362880039916800, 112624120720504040320362880362880039916800479001600

Offset

0,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..43

Mathematica

Module[{nn=20, f}, f=Range[0, nn]!; Table[FromDigits[Flatten[ IntegerDigits/@ Take[f, n]]], {n, nn}]] (* Harvey P. Dale, Mar 13 2016 *)

Prog

(Magma) [Seqint(Reverse(&cat[Reverse(Intseq(Factorial(k))): k in [0..n]])): n in [0..17]]; // Vincenzo Librandi, Aug 11 2017

Crossrefs

Cf. A000142, A045508.

Sequence in context: A132939 A059996 A132938 * A190872 A024145 A053055

Adjacent sequences: A056615 A056616 A056617 * A056619 A056620 A056621

Keyword

nonn,base

Author

Henry Bottomley, Aug 07 2000

Status

approved