OFFSET
1,4
COMMENTS
See the beginning of helix in scatterplot link at Links section.
LINKS
Altug Alkan, Table of n, a(n) for n = 1..10000
Altug Alkan, Alternative Scatterplot of A283363
Altug Alkan, Alternative Graph of A283363
MATHEMATICA
A[n_] := Mod[Sum[Prime[k], {k, n}], n]; Table[Abs[A[n+1] - A[n]], {n, 78}] (* Indranil Ghosh, Mar 06 2017 *)
PROG
(PARI) a090396(n) = sum(k=1, n, prime(k)) % n;
a(n) = abs(a090396(n+1) - a090396(n));
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Altug Alkan, Mar 06 2017
STATUS
approved