A264723 - OEIS

%I #15 Sep 08 2022 08:46:14

%S 17,109,5023,479001563,87178291157,1307674367953,20922789887947,

%T 355687428095941,6402373705727939,2432902008176639929,

%U 265252859812191058636308479999887,13763753091226345046315979581580902399999843,20397882081197443358640281739902897356799999833

%N Primes of the form n! - prime(n).

%C Subsequence of A261809. - _Altug Alkan_, Nov 22 2015

%t Select[Table[n! - Prime[n], {n, 50}], PrimeQ]

%o (Magma) [a: n in [1..40] | IsPrime(a) where a is Factorial(n)-NthPrime(n)];

%o (PARI) for(n=1, 1e2, if(isprime(k=(n!-prime(n))), print1(k, ", "))) \\ _Altug Alkan_, Nov 22 2015

%Y Cf. A063499, A064278, A064401, A261809.

%K nonn

%O 1,1

%A _Vincenzo Librandi_, Nov 22 2015