A356757 Omit zero digits from factorial numbers.
1, 1, 2, 6, 24, 12, 72, 54, 432, 36288, 36288, 399168, 47916, 622728, 871782912, 137674368, 2922789888, 35568742896, 64237375728, 121645148832, 243292817664, 5199421717944, 11247277776768, 258521673888497664, 624484173323943936, 15511214333985984, 4329146112665635584
Offset: 0
Examples
a(12) = 47916 since 12! = 479001600.
Crossrefs
Programs
-
Mathematica
Table[FromDigits[Select[IntegerDigits[n!],Positive]], {n,0,26}] -
PARI
a(n) = fromdigits(select(x->(x>0), digits(n!))); \\ Michel Marcus, Aug 26 2022
-
Python
from math import factorial def a(n): return int(str(factorial(n)).replace("0", "")) print([a(n) for n in range(27)]) # Michael S. Branicky, Aug 26 2022