A133638 a(n) = 2prime(n) + prime(n-1) - 3*n.

1, 2, 4, 7, 14, 19, 26, 31, 38, 51, 58, 69, 80, 85, 92, 105, 120, 127, 138, 149, 154, 165, 176, 189, 208, 221, 226, 233, 238, 245, 274, 293, 306, 313, 332, 343, 354, 369, 380, 393, 408, 415, 434, 445, 452, 457, 480, 513, 530, 535, 542, 555, 562, 581, 600, 615

Offset

1,2

Links

Table of n, a(n) for n=1..56.

Example

a(7) = 26 = 2*p(7) + p(6) - 3*7 = 2*17 + 13 - 3*7 = 34 + 13 - 21.

Mathematica

Join[{1}, Table[2*Prime[n] + Prime[n - 1] - 3*n, {n, 2, 60}]] (* Stefan Steinerberger, Sep 20 2007 *)

Crossrefs

Cf. A000040.

Sequence in context: A265309 A293825 A289050 * A367266 A018505 A280430

Adjacent sequences: A133635 A133636 A133637 * A133639 A133640 A133641

Keyword

nonn

Author

Gary W. Adamson, Sep 18 2007

Extensions

More terms from Stefan Steinerberger, Sep 20 2007

Status

approved