A158635 6n - A008578(n).

5, 10, 15, 19, 23, 25, 29, 31, 35, 37, 37, 41, 41, 43, 47, 49, 49, 49, 53, 53, 55, 59, 59, 61, 61, 59, 61, 65, 67, 71, 73, 65, 67, 67, 71, 67, 71, 71, 71, 73, 73, 73, 77, 73, 77, 79, 83, 77, 71, 73, 77, 79, 79, 83, 79, 79, 79, 79, 83, 83, 85, 89, 85, 77, 79, 83, 85, 77, 77, 73, 77

Offset

1,1

Comments

Sequence items become negative at index 191, since the prime numbers A008578 grow faster than linearly.

Links

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

Mathematica

Join[{5}, Table[6n-Prime[n-1], {n, 2, 80}]] (* Harvey P. Dale, Nov 18 2012 *)

Prog

(PARI) a(n)=if(n>1, 6*n-prime(n-1), 5) \\ Charles R Greathouse IV, Mar 16 2016

Crossrefs

Sequence in context: A120686 A313678 A313679 * A313680 A313681 A313682

Adjacent sequences: A158632 A158633 A158634 * A158636 A158637 A158638

Keyword

sign,less

Author

Paul Curtz, Mar 23 2009

Extensions

Edited, offset changed by R. J. Mathar, Apr 04 2009

Comment clarified and modified by Harvey P. Dale, Nov 18 2012

Status

approved