A060191 Union_i p(4i), p(4i+1), where p(k) = k-th prime.

2, 7, 11, 19, 23, 37, 41, 53, 59, 71, 73, 89, 97, 107, 109, 131, 137, 151, 157, 173, 179, 193, 197, 223, 227, 239, 241, 263, 269, 281, 283, 311, 313, 337, 347, 359, 367, 383, 389, 409, 419, 433, 439, 457, 461, 479, 487, 503, 509, 541, 547, 569

Offset

0,1

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Mathematica

Drop[Drop[Prime[Range[110]], {2, -1, 4}], {2, -1, 3}] (* Harvey P. Dale, Nov 26 2011 *)
Prime[#]&/@LinearRecurrence[{1, 1, -1}, {1, 4, 5, 8}, 60] (* Harvey P. Dale, Apr 02 2018 *)

Crossrefs

Cf. A060192, A060193, A060194.

Sequence in context: A040154 A166862 A105881 * A178899 A023393 A084619

Adjacent sequences: A060188 A060189 A060190 * A060192 A060193 A060194

Keyword

nonn

Author

N. J. A. Sloane, Mar 21 2001

Status

approved