A135274 a(n) = prime(2*n) - prime(2*n-1) + prime(2*n+1).
6, 13, 19, 25, 37, 47, 49, 65, 69, 77, 89, 103, 107, 113, 131, 141, 151, 159, 173, 185, 193, 199, 213, 239, 235, 247, 267, 275, 279, 287, 317, 317, 335, 353, 355, 373, 385, 393, 409, 427, 433, 441, 453, 469, 469, 499, 503, 513, 535, 565
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Join[{6},#[[3]]-#[[2]]+#[[4]]&/@Partition[Prime[Range[2,110]],4,2]] (* Harvey P. Dale, Nov 16 2011 *)
-
PARI
g(n) = forstep(x=1,n,2,y=prime(x+1)-prime(x)+prime(x+2);print1(y","))
-
PARI
a(n)=prime(2*n)-prime(2*n-1)+prime(2*n+1); \\ Joerg Arndt, Oct 08 2016
Formula
a(n) = A181428(2*n-1). - R. J. Mathar, Sep 10 2016
Extensions
New name from Joerg Arndt, Oct 08 2016
Comments