login
A141265
Concatenate first n factorials in reverse order.
2
1, 21, 621, 24621, 12024621, 72012024621, 504072012024621, 40320504072012024621, 36288040320504072012024621, 362880036288040320504072012024621
OFFSET
0,2
MAPLE
P:=proc(i) local a, n; a:=1; print(1); for n from 2 by 1 to i do a:=n!*10^floor(evalf(1+log10(a), 1000))+a; print(a); od; end: P(15);
MATHEMATICA
Table[FromDigits[Flatten[IntegerDigits/@Reverse[Range[n]!]]], {n, 10}] (* Harvey P. Dale, Apr 22 2022 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Paolo P. Lava, Jun 20 2008
STATUS
approved