A376306 Run-lengths of the sequence of first differences of squarefree numbers.
2, 1, 2, 1, 1, 1, 2, 3, 2, 2, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 3, 2, 1, 1, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 3, 2, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 2, 3, 2, 2, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 3, 2, 1, 1, 1
Offset: 1
Keywords
Examples
The sequence of squarefree numbers (A005117) is: 1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 26, 29, 30, ... The sequence of first differences (A076259) of squarefree numbers is: 1, 1, 2, 1, 1, 3, 1, 2, 1, 1, 2, 2, 2, 1, 1, 3, 3, 1, 1, 2, 1, 1, 2, 1, ... with runs: (1,1),(2),(1,1),(3),(1),(2),(1,1),(2,2,2),(1,1),(3,3),(1,1),(2),(1,1), ... with lengths A376306 (this sequence).
Crossrefs
Run-lengths of first differences of A005117.
For prime instead of squarefree numbers we have A333254.
For compression instead of run-lengths we have A376305.
For run-sums instead of run-lengths we have A376307.
For prime-powers instead of squarefree numbers we have A376309.
For positions of first appearances instead of run-lengths we have A376311.
Programs
-
Mathematica
Length/@Split[Differences[Select[Range[100],SquareFreeQ]]]