A176628 a(n) = prime(n) - n*(-1)^prime(n).

1, 5, 8, 11, 16, 19, 24, 27, 32, 39, 42, 49, 54, 57, 62, 69, 76, 79, 86, 91, 94, 101, 106, 113, 122, 127, 130, 135, 138, 143, 158, 163, 170, 173, 184, 187, 194, 201, 206, 213, 220, 223, 234, 237, 242, 245, 258, 271, 276, 279, 284, 291, 294, 305, 312, 319, 326

Offset

1,2

Comments

Unit together with n-th odd prime + n + 1.

Links

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

Formula

a(n+1) = A014688(n+1).

Example

a(1) = prime(1) - 1*(-1)^prime(1) = 2-1 = 1.

Mathematica

np[n_]:=Module[{npr=Prime[n]}, npr-n (-1)^npr]; Array[np, 60] (* Harvey P. Dale, Oct 08 2011 *)

Prog

(Magma) [1]cat[NthPrime(n) +n: n in [2..60]]; // G. C. Greubel, Jul 01 2021
(SageMath) [1]+[nth_prime(n) +n for n in (2..60)] # G. C. Greubel, Jul 01 2021

Crossrefs

Sequence in context: A118520 A001954 A006620 * A314390 A314391 A325598

Adjacent sequences: A176625 A176626 A176627 * A176629 A176630 A176631

Keyword

nonn

Author

Juri-Stepan Gerasimov, Apr 22 2010

Extensions

Entries checked by R. J. Mathar, Apr 27 2010

Status

approved