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.
%I A068844 #13 Jun 18 2022 19:02:26
%S A068844 11,23,61,241,1201,7207,504001,4032029,36288017,362880043,3991680029,
%T A068844 47900160013,622702080047,8717829120019,130767436800073,
%U A068844 2092278988800037,35568742809600019,640237370572800041
%N A068844 Smallest prime with same leading digits as n!.
%e A068844 a(7) = 504011 because this is the smallest prime starting with 7! = 5040.
%p A068844 for i from 1 to 40 do a := nextprime(i!*10); b := 1; while(a-i!*10^b>=10^b) do b := b+1; a := nextprime(i!*10^b); end do; c[i] := a; end do:q := seq(c[i],i=1..40);
%t A068844 Table[p = i!; k = 1; While[IntegerDigits[p] != Take[IntegerDigits[x = NextPrime[p*10^k]], IntegerLength[p]], k += 1]; x, {i, 18}] (* _Jayanta Basu_, Aug 09 2013 *)
%Y A068844 Cf. A068845.
%K A068844 base,nonn
%O A068844 1,1
%A A068844 _Amarnath Murthy_, Mar 10 2002
%E A068844 More terms from _Sascha Kurz_, Mar 17 2002