login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A068844 Smallest prime with same leading digits as n!. 2

%I

%S 11,23,61,241,1201,7207,504001,4032029,36288017,362880043,3991680029,

%T 47900160013,622702080047,8717829120019,130767436800073,

%U 2092278988800037,35568742809600019,640237370572800041

%N Smallest prime with same leading digits as n!.

%e a(7) = 504011 because this is the smallest prime starting with 7!=5040

%p 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 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 Cf. A068845.

%K base,nonn

%O 1,1

%A _Amarnath Murthy_, Mar 10 2002

%E More terms from _Sascha Kurz_, Mar 17 2002

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 31 05:31 EDT 2021. Contains 346367 sequences. (Running on oeis4.)