[go: up one dir, main page]

login
A181346
Absolute difference between (sum of previous terms) and prime(n) with a(0) = 1 and a(1) = 2.
1
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,2
COMMENTS
Essentially a duplicate of A001223: equals A001223 with terms 2,0 inserted after the initial one.
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
CROSSREFS
Cf. A001223.
Cf. A054541. - Georg Fischer, Oct 12 2018
Sequence in context: A137430 A262138 A308212 * A300815 A358933 A002121
KEYWORD
nonn,less
AUTHOR
Giovanni Teofilatto, Oct 14 2010
EXTENSIONS
Offset and indexing corrected by R. J. Mathar, Oct 15 2010
STATUS
approved