cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A332242 Numbers k such that k! has exactly k nonzero decimal digits.

This page as a plain text file.
%I A332242 #19 Feb 09 2020 03:01:17
%S A332242 1,48,49,53,54,57
%N A332242 Numbers k such that k! has exactly k nonzero decimal digits.
%C A332242 No other terms < 100000.
%C A332242 Conjecture: these 6 terms are the only terms of the sequence, i.e., there are no terms larger than 57.
%F A332242 { k : A034886(k) - A027869(k) = k }.
%e A332242 48! = 12413915592536072670862289047373375038521486354677760000000000 has 48 nonzero decimal digits, so 48 is a term.
%p A332242 q:= n-> nops(subs(0=NULL, convert(n!, base, 10)))=n:
%p A332242 select(q, [$0..100])[];  # _Alois P. Heinz_, Feb 07 2020
%o A332242 (Python)
%o A332242 A332242_list, i, n = [], 0, 1
%o A332242 while i < 1000:
%o A332242     s = str(n)
%o A332242     if len(s) - s.count('0') == i:
%o A332242         A332242_list.append(i)
%o A332242     i += 1
%o A332242     n *= i
%o A332242 (PARI) isok(k) = #select(x->(x != 0), digits(k!)) == k; \\ _Michel Marcus_, Feb 08 2020
%Y A332242 Cf. A000142, A027869, A034886.
%K A332242 nonn,base
%O A332242 1,2
%A A332242 _Chai Wah Wu_, Feb 07 2020