A283363 Absolute values of first differences of A090396.

1, 0, 0, 2, 2, 3, 3, 4, 8, 3, 1, 1, 3, 12, 0, 2, 0, 2, 2, 0, 2, 21, 3, 7, 7, 5, 5, 26, 2, 12, 12, 19, 11, 18, 14, 16, 20, 17, 21, 20, 24, 23, 23, 20, 18, 21, 15, 32, 20, 29, 21, 25, 33, 20, 36, 19, 23, 36, 24, 33, 23, 15, 47, 20, 22, 14, 54, 9, 13, 15, 15, 60, 12, 12, 14, 14, 12, 65

Offset: 1

Author

Altug Alkan, Mar 06 2017

Keywords

• nonn
• look

Comments

See the beginning of helix in scatterplot link at Links section.

Examples

			a(5) = 2 because a(5) = abs(A090396(6) - A090396(5)) = abs(5 - 3) = 2.
		

Links

• Altug Alkan, Table of n, a(n) for n = 1..10000
• Altug Alkan, Alternative Scatterplot of A283363
• Altug Alkan, Alternative Graph of A283363

Crossrefs

Cf. A090396.

Programs

Mathematica

A[n_] := Mod[Sum[Prime[k], {k, n}], n];  Table[Abs[A[n+1] - A[n]],{n, 78}] (* Indranil Ghosh, Mar 06 2017 *)

PARI

a090396(n) = sum(k=1, n, prime(k)) % n;
a(n) = abs(a090396(n+1) - a090396(n));

Formula

a(n) = abs(A090396(n+1) - A090396(n)).