A181346 Absolute difference between (sum of previous terms) and prime(n) with a(0) = 1 and a(1) = 2.

1, 2, 0, 2, 2, 4, 2, 4, 2, 4, 6, 2, 6, 4, 2, 4, 6, 6, 2, 6, 4, 2, 6, 4, 6, 8, 4, 2, 4, 2, 4, 14, 4, 6, 2, 10, 2, 6, 6, 4, 6, 6, 2, 10, 2, 4, 2, 12, 12, 4, 2, 4, 6, 2, 10, 6, 6, 6, 2, 6, 4, 2, 10, 14, 4, 2, 4, 14, 6, 10, 2, 4, 6, 8, 6, 6, 4, 6, 8, 4, 8, 10, 2, 10, 2, 6, 4, 6, 8, 4, 2, 4, 12, 8, 4, 8, 4, 6, 12

Offset: 0

Author

Giovanni Teofilatto, Oct 14 2010

Keywords

• nonn
• less

Comments

Essentially a duplicate of A001223: equals A001223 with terms 2,0 inserted after the initial one.

Crossrefs

Cf. A001223.

Cf. A054541. - Georg Fischer, Oct 12 2018

Programs

Maple

A181346 := proc(n) option remember; if n <= 1 then return n+1 ; end if; add( procname(i),i=0..n-1)-ithprime(n) ; abs(%) ;end proc:
seq(A181346(n),n=0..100) ; # R. J. Mathar, Oct 15 2010

Extensions

Offset and indexing corrected by R. J. Mathar, Oct 15 2010