A271718 Numbers n such that n*(n+1)^n - 1 is prime.
2, 3, 7, 14, 43, 81, 943, 1621
Offset: 1
Examples
14 is a member because 14*15^14 - 1 = 408700964355468749 is a prime number.
Programs
-
Mathematica
Select[Range[10^3], PrimeQ[# (# + 1)^# - 1] &] (* Michael De Vlieger, Apr 12 2016 *)
-
PARI
for(n=1,10^10,ispseudoprime(n*(n+1)^n-1)&&print1(n,", "))
Comments