login
A056618
Concatenate factorials.
1
1, 11, 112, 1126, 112624, 112624120, 112624120720, 1126241207205040, 112624120720504040320, 112624120720504040320362880, 1126241207205040403203628803628800, 112624120720504040320362880362880039916800, 112624120720504040320362880362880039916800479001600
OFFSET
0,2
LINKS
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
Sequence in context: A132939 A059996 A132938 * A190872 A024145 A053055
KEYWORD
nonn,base
AUTHOR
Henry Bottomley, Aug 07 2000
STATUS
approved