A107622 Primes plus alternately 2 and 3.

4, 6, 7, 10, 13, 16, 19, 22, 25, 32, 33, 40, 43, 46, 49, 56, 61, 64, 69, 74, 75, 82, 85, 92, 99, 104, 105, 110, 111, 116, 129, 134, 139, 142, 151, 154, 159, 166, 169, 176, 181, 184, 193, 196, 199, 202, 213, 226, 229, 232, 235, 242, 243, 254, 259, 266, 271, 274, 279

Offset: 1

Author

Zak Seidov, May 18 2005

Keywords

• easy
• nonn

Crossrefs

Cf. A107620, A107621, 107623.

Programs

Mathematica

A107622[n_]:= Prime[n] + (3 - Mod[n, 2]) (* From Zak Seidov *)
Total[#]&/@Partition[Riffle[Prime[Range[100]],{2,3}],2] (* Harvey P. Dale, Dec 14 2010 *)

Formula

A107622(n) = prime(n) + (3 - mod(n, 2)).