A093667 a(n) = prime(n) - prime(n+1) + prime(n+2).
4, 5, 9, 9, 15, 15, 21, 25, 25, 35, 35, 39, 45, 49, 53, 55, 65, 65, 69, 77, 77, 85, 91, 93, 99, 105, 105, 111, 123, 117, 133, 133, 147, 141, 155, 157, 161, 169, 173, 175, 189, 183, 195, 195, 209, 211, 215, 225, 231, 235, 235, 249, 247, 257, 263, 265, 275, 275, 279
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[NthPrime(n)-NthPrime(n+1)+NthPrime(n+2): n in [1..60]]; // Vincenzo Librandi, Apr 17 2015
-
Mathematica
Table[Prime[n] + Prime[n + 2] - Prime[n + 1], {n, 75}] #[[1]]-#[[2]]+#[[3]]&/@Partition[Prime[Range[70]],3,1] (* Harvey P. Dale, Oct 28 2018 *)
-
PARI
vector(80, n, prime(n) - prime(n+1) + prime(n+2)) \\ Michel Marcus, Apr 17 2015
Comments