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.

A178223 Numbers n such that the digits of n are also digits of n! (counting multiplicity).

This page as a plain text file.
%I A178223 #11 Mar 30 2012 18:35:53
%S A178223 1,2,4,20,21,22,23,24,25,26,27,30,31,32,33,34,35,36,37,39,40,41,42,43,
%T A178223 44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,
%U A178223 67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111,112
%N A178223 Numbers n such that the digits of n are also digits of n! (counting multiplicity).
%e A178223 23 is in the sequence because 2 and 3 are digits of 23! = 25852016738884976640000 ;
%e A178223 28 is not in the sequence because 2 is not a digit of 28! = 304888344611713860501504000000.
%e A178223 11 is not in the sequence because 11! = 39916800 contains only a single "1".
%t A178223 Reap[Do[a = DigitCount[n!]; b = DigitCount[n]; If[Min[a-b] >= 0, Sow[n]], {n, 1, 10^3}]][[2, 1]]
%Y A178223 Cf. A064827
%K A178223 nonn,base
%O A178223 1,2
%A A178223 _Michel Lagneau_, Dec 20 2010