A108519 a(n) is the smallest natural number m such that (10^n)! - m is prime.
11, 271, 6701, 40471
Offset: 1
Examples
a(3)=6701 because (10^3)!-6701 is prime and for 0<m<6701 1000!-m is composite.
Programs
-
Mathematica
a[n_] := (For[m = 1, ! PrimeQ[(10^n)! - m], m++ ]; m); Do[Print[a[n]], {n, 3}]
Formula
a(n) = A033933(10^n). - Jason Yuen, May 20 2024
Extensions
a(4) from Jason Yuen, May 20 2024
Comments