|
%I #6 Apr 12 2016 23:55:35
%S 2,3,7,14,43,81,943,1621
%N Numbers n such that n*(n+1)^n - 1 is prime.
%C The corresponding primes are a subset of the generalized Woodall primes (A210340).
%e 14 is a member because 14*15^14 - 1 = 408700964355468749 is a prime number.
%t Select[Range[10^3], PrimeQ[# (# + 1)^# - 1] &] (* _Michael De Vlieger_, Apr 12 2016 *)
%o (PARI) for(n=1,10^10,ispseudoprime(n*(n+1)^n-1)&&print1(n,", "))
%Y Cf. A191568, A210340.
%K nonn,hard,more
%O 1,1
%A _Jeppe Stig Nielsen_, Apr 12 2016
|
