A095192 Smallest semiprime with same leading digits as n!.
10, 21, 62, 247, 1202, 7201, 50401, 403201, 3628801, 36288001, 399168002, 4790016001, 62270208001, 871782912007, 130767436800017, 209227898880001, 3556874280960001, 64023737057280001, 12164510040883200031
Offset: 1
Programs
-
Mathematica
ssp[n_]:=Module[{f=n!,k=0},While[PrimeOmega[10^Max[IntegerLength[k],1] f+k]!=2,k++];10^Max[1,IntegerLength[k]] f+k]; Array[ssp,20] (* Harvey P. Dale, May 05 2019 *)