A075520 4*prime(n) + (prime(n) mod 4).

10, 15, 21, 31, 47, 53, 69, 79, 95, 117, 127, 149, 165, 175, 191, 213, 239, 245, 271, 287, 293, 319, 335, 357, 389, 405, 415, 431, 437, 453, 511, 527, 549, 559, 597, 607, 629, 655, 671, 693, 719, 725, 767, 773, 789, 799, 847, 895, 911, 917, 933, 959, 965

Offset

1,1

Links

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Formula

a(n) = A001749(n) + A039702(n).

Mathematica

4#+Mod[#, 4]&/@Prime[Range[60]] (* Harvey P. Dale, Mar 10 2016 *)

Prog

(Haskell)
a075520 n = a075520_list !! (n-1)
a075520_list = zipWith (+) a001749_list a039702_list
-- Reinhard Zumkeller, Feb 20 2012

Crossrefs

Cf. A000040, A039702.

Sequence in context: A062691 A257630 A129496 * A030663 A013638 A075524

Adjacent sequences: A075517 A075518 A075519 * A075521 A075522 A075523

Keyword

nonn

Author

Reinhard Zumkeller, Sep 19 2002

Status

approved