OFFSET
0,2
COMMENTS
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
KEYWORD
nonn,less
AUTHOR
Giovanni Teofilatto, Oct 14 2010
EXTENSIONS
Offset and indexing corrected by R. J. Mathar, Oct 15 2010
STATUS
approved