%I #14 Feb 17 2017 17:06:24

%S 22,112,140,158,170,254,271,330,334,354,390,483,528,560,565,714,850,

%T 888,924,929,933,935,970,1019,1047,1141,1266,1338,1359,1376,1412,1485,

%U 1504,1542,1598,1607,1618,1747,1773,1814,1843,2087,2088,2100,2167,2186,2233,2311

%N Numbers n such that (n^79-1)/(n-1) is prime.

%H Vincenzo Librandi, <a href="/A217086/b217086.txt">Table of n, a(n) for n = 1..500</a>

%t Select[Range[2, 1000], PrimeQ[(#^79 - 1)/(# - 1)] &] (* _T. D. Noe_, Sep 26 2012 *)

%o (PARI) is(n)=isprime((n^79-1)/(n-1)) \\ _Charles R Greathouse IV_, Feb 17 2017

%Y Cf. A002384, A049409, A100330, A162862, A217070-A217089.

%K nonn

%O 1,1

%A _Tim Johannes Ohrtmann_, Sep 26 2012

%E More terms from _T. D. Noe_, Sep 26 2012