A162604
Primes of the form k^k-k!-9.
Original entry on oeis.org
223, 16736887, 104857597567097991823359991, 11756638905368320778615010897169507936008298389569527
Offset: 1
-
[a: n in [3..100] | IsPrime(a) where a is n^n-Factorial(n)-9]; // Vincenzo Librandi, Aug 02 2017
-
Select[Table[n^n-n!-9,{n,3,50}],PrimeQ] (* Harvey P. Dale, Jul 30 2017 *)
A162605
Primes of the form k^k-k!+2.
Original entry on oeis.org
2, 23, 387057611, 7596040312163297274222442578036920783684137730466972969164241364503367485389656454146145546668114950475963285686810192201741431
Offset: 1
-
f[n_]:=n^n-n!+2; lst={};Do[p=f[n];If[PrimeQ[p],AppendTo[lst,p]],{n,4*5!}]; lst
Select[Table[k^k-k!+2,{k,100}],PrimeQ] (* Harvey P. Dale, Apr 26 2022 *)
A162606
Primes of the form k^k-k!+6.
Original entry on oeis.org
3011, 818509, 827239906198908668183, 3877924263464448622408024944643162574255380546190593937673127995497376385062869
Offset: 1
-
f[n_]:=n^n-n!+6; lst={};Do[p=f[n];If[PrimeQ[p],AppendTo[lst,p]],{n,3*5!}]; lst
Select[Table[n^n-n!+6,{n,50}],PrimeQ] (* Harvey P. Dale, Sep 22 2019 *)
Showing 1-3 of 3 results.
Comments