A175965 Lexicographically earliest sequence with first differences as increasing sequence of noncomposites A008578.

1, 2, 4, 7, 12, 19, 30, 43, 60, 79, 102, 131, 162, 199, 240, 283, 330, 383, 442, 503, 570, 641, 714, 793, 876, 965, 1062, 1163, 1266, 1373, 1482, 1595, 1722, 1853, 1990, 2129, 2278, 2429, 2586, 2749, 2916, 3089, 3268, 3449, 3640, 3833, 4030, 4229, 4440, 4663

Offset

1,2

Comments

Complement of A175966.

A175944(a(n)) = A018252(n). - Reinhard Zumkeller, Mar 18 2011

Links

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

Formula

a(n) = A036439(n-1) for n > 1.

a(n) - a(n-1) = A008578(n-1) for n > 1.

a(n) = A014284(n-1) + 1 for n > 1.

Mathematica

FoldList[Plus, 1, Join[{1}, Prime[Range[50]]]] (* or *) Accumulate[ Join[ {1, 1}, Prime[Range[50]]]] (* Harvey P. Dale, Sep 28 2016 *)

Prog

(Haskell)
a175965 n = a175965_list !! n
a175965_list = scanl (+) 1 a008578_list
-- Reinhard Zumkeller, Mar 26 2015

Crossrefs

Cf. A008578, A014284, A018252, A036439, A051349.

Cf. A175944, A175966, A175967, A175968, A175969, A175970.

Sequence in context: A079719 A300829 A036439 * A288341 A347542 A035298

Adjacent sequences: A175962 A175963 A175964 * A175966 A175967 A175968

Keyword

nonn

Author

Jaroslav Krizek, Oct 31 2010

Status

approved