|
|
A219961
|
|
First differences of A219960.
|
|
3
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
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
|
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|