%I #16 Feb 17 2017 17:00:35
%S 3,6,17,24,37,89,132,374,387,402,421,435,453,464,490,516,708,736,919,
%T 947,981,1033,1067,1170,1195,1253,1284,1349,1385,1409,1479,1709,1724,
%U 1726,1735,1875,1950,1984,2012,2070,2124,2133,2161,2194,2424,2432,2459,2531,2552
%N Numbers n such that (n^71-1)/(n-1) is prime.
%H Vincenzo Librandi, <a href="/A217084/b217084.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[2, 1000], PrimeQ[(#^71 - 1)/(# - 1)] &] (* _T. D. Noe_, Sep 26 2012 *)
%o (PARI) is(n)=isprime((n^71-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