OFFSET
1,4
COMMENTS
Conjecture: If = (a(n)/n), then (lim inf S) > 2/5 and (lim sup S) < 3/5.
EXAMPLE
Corner of Gilbreath array:
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101
1 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
1 0 2 2 2 2 2 2 4 4 2 2 2 2 0 4 4 2 2 4 2 2 2 4 2 2
1 2 0 0 0 0 0 2 0 2 0 0 0 2 4 0 2 0 2 2 0 0 2 2 0 0
1 2 0 0 0 0 2 2 2 2 0 0 2 2 4 2 2 2 0 2 0 2 0 2 0 0
1 2 0 0 0 2 0 0 0 2 0 2 0 2 2 0 0 2 2 2 2 2 2 2 0 8
1 2 0 0 2 2 0 0 2 2 2 2 2 0 2 0 2 0 0 0 0 0 0 2 8 8
1 2 0 2 0 2 0 2 0 0 0 0 2 2 2 2 2 0 0 0 0 0 2 6 0 8
1 2 2 2 2 2 2 2 0 0 0 2 0 0 0 0 2 0 0 0 0 2 4 6 8 6
1 0 0 0 0 0 0 2 0 0 2 2 0 0 0 2 2 0 0 0 2 2 2 2 2 4
MATHEMATICA
z = 2000; t = Prime[Range[z]]; r[1] = t; r[2] = Abs[Differences[t]];
r[n_] := r[n] = Abs[Differences[r[n - 1]]];
Table[Count[Take[r[n], n], 0], {n, 1, z/2}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Nov 23 2022
STATUS
approved