|
%I #28 Sep 08 2022 08:46:15
%S 83,15629,279941,3486784409,6568408355712890639
%N Primes of the form k^(k + 1) + k - 1.
%C The next prime has 171 digits. - _Vincenzo Librandi_, Feb 17 2016
%C Subsequence of primes of A155499. - _Michel Marcus_, Feb 20 2016
%H Factordb, <a href="http://factordb.com/index.php?query=n%5E%28n+%2B+1%29+%2B+n+-+1&use=n&n=0&VP=on&VC=on&EV=on&OD=on&PR=on&FF=on&PRP=on&CF=on&U=on&C=on&perpage=200&format=1">n^(n + 1) + n - 1</a>.
%t Select[Table[n^(n + 1) + n - 1, {n, 1, 50}], ProvablePrimeQ[#] &]
%o (Magma) [a: n in [0..100] | IsPrime(a) where a is n^(n+1)+n-1]; // _Vincenzo Librandi_, Feb 17 2016
%o (PARI) lista(nn) = for(k=1, nn, if(ispseudoprime(q=k^(k+1)+k-1), print1(q, ", "))); \\ _Jinyuan Wang_, Mar 01 2020
%Y Cf. A155499, A161471, A161472, A187602, A187605.
%Y Cf. A309140 (the corresponding values of k).
%K nonn
%O 1,1
%A _Soumadeep Ghosh_, Feb 16 2016
| 