|
|
A141265
|
|
Concatenate first n factorials in reverse order.
|
|
2
|
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|