A216094 a(1) = 2; a(n+1) = a(n) + |A036263(n)| + 2.
2, 5, 7, 11, 15, 19, 23, 27, 31, 37, 43, 47, 51, 55, 59, 61, 67, 73, 77, 81, 87, 91, 95, 99, 105, 109, 113, 117, 121, 133, 145, 149, 155, 165, 175, 181, 183, 187, 191, 193, 199, 209, 219, 223, 227, 239, 241, 251, 255, 259, 263, 269, 279, 285, 287, 289, 295, 301, 305, 309, 319
Offset: 1
Keywords
Programs
-
Mathematica
nxt[{n_,a_}]:={n+1,a+Abs[Prime[n+2]-2Prime[n+1]+Prime[n]]+2}; Transpose[ NestList[nxt,{1,2},60]][[2]] (* Harvey P. Dale, Aug 11 2015 *)
Formula
a(1)=2; a(n+1) = a(n) + |prime(n+2) - 2*prime(n+1) + prime(n)| + 2.
Comments