A219961 First differences of A219960.

314, 11, 335, 110, 162, 25, 94, 47, 119, 21, 98, 377, 46, 97, 1, 151, 133, 97, 23, 194, 23, 53, 255, 5, 2, 24, 27, 21, 228, 238, 18, 47, 40, 64, 22, 48, 12, 56, 107, 22, 12, 86, 68, 89, 26, 200, 39, 30, 2, 95, 14, 21, 189, 21, 59, 19, 27, 63, 7, 44, 98, 40

Offset: 1

Author

Carl R. White, Dec 02 2012

Keywords

• nonn

Comments

Conjecture: 1 appears infinitely often in this sequence (indicating an infinite number of pairs of consecutive integers in the parent sequence), despite very few appearances compared with A219552, which is derived from a very similar process.

Links

• Carl R. White, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A219960, A219552, A219962

Programs

Mathematica

f[n_] := Ceiling[Sqrt[n]]*(Ceiling[Sqrt[n]]^2 - n); t = Select[Range[10000], NestWhileList[f, #, UnsameQ, All][[-1]] > 0 &]; Differences[t] (* T. D. Noe, Dec 04 2012 *)