OFFSET
1,3
COMMENTS
There is no further term (the proof is easy).
LINKS
Eric Weisstein's World of Mathematics, Factorial.
EXAMPLE
889619 is in the sequence because pi(889619)=pi(8!)+pi(8!)+pi(9!)+pi(6!)+pi(1!)+pi(9!).
MATHEMATICA
Do[h = IntegerDigits[m]; l = Length[h]; If[PrimePi[m] == Sum[PrimePi[h[[k]]! ], {k, l}], Print[m]], {m, 0, 3000000}]
CROSSREFS
KEYWORD
base,fini,full,nonn
AUTHOR
Farideh Firoozbakht, Apr 20 2005
STATUS
approved