login
A117047
Primes of the form 60*n+11.
4
11, 71, 131, 191, 251, 311, 431, 491, 911, 971, 1031, 1091, 1151, 1451, 1511, 1571, 1811, 1871, 1931, 2111, 2351, 2411, 2531, 2591, 2711, 3011, 3191, 3251, 3371, 3491, 3671, 3851, 3911, 4091, 4211, 4271, 4391, 4451, 4691, 4751, 4871, 4931, 5051, 5171
OFFSET
1,1
COMMENTS
a(n) = A211890(5,n-1) for n <= 6. - Reinhard Zumkeller, Jul 13 2012
LINKS
MATHEMATICA
Flatten[Table[If[PrimeQ[60*n + 11], 60*n + 11, {}], {n, 0, 100}]]
Select[60Range[0, 100]+11, PrimeQ] (* Harvey P. Dale, Feb 16 2024 *)
PROG
(Haskell)
a117047 n = a117047_list !! (n-1)
a117047_list = [x | k <- [0..], let x = 60 * k + 11, a010051' x == 1]
-- Reinhard Zumkeller, Jul 13 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Apr 17 2006
EXTENSIONS
Wrong formula removed by Reinhard Zumkeller, Jul 13 2012
STATUS
approved