A139182 Numbers m such that pi(m) = d_1!!*d_2!!*...*d_k!! where d_1 d_2 ... d_k is the decimal expansion of m.
50, 51, 125, 15405, 26205, 226700, 226701, 226710, 226711, 513090, 513091, 1351832, 8210065
Offset: 1
Examples
pi(8210065)=8!!*2!!*1!!*0!!*0!!*6!!*5!!.
Programs
-
Mathematica
Select[Range[83*10^5],Times@@(IntegerDigits[#]!!)==PrimePi[#]&] (* Harvey P. Dale, Apr 12 2024 *)
Comments