A088790 Numbers k such that (k^k-1)/(k-1) is prime.
2, 3, 19, 31, 7547
Offset: 1
References
- R. K. Guy, Unsolved Problems in Theory of Numbers, 1994, A3.
Links
- Bernard Schott, Les nombres brésiliens, Quadrature, no. 76, avril-juin 2010, pages 30-38; included here with permission from the editors of Quadrature.
- Eric Weisstein's World of Mathematics, Cyclotomic Polynomial
Programs
-
Mathematica
Do[p=Prime[n]; If[PrimeQ[(p^p-1)/(p-1)], Print[p]], {n, 100}]
-
PARI
is(n)=ispseudoprime((n^n-1)/(n-1)) \\ Charles R Greathouse IV, Feb 17 2017
Comments