A020753 Sizes of successive increasing gaps between squarefree numbers.
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 13, 14, 15, 16, 17, 18, 19
Offset: 1
Examples
The first gap in A005117 occurs between 1 and 2 and has length 1. The next larger gap occurs between 3 and 5 and has length 2. The next larger gap is between 7 and 10 and has length 3. Etc. We are only interested in gaps that set new records.
Programs
-
Maple
a := 1 ; for n from 2 do if A076259(n) > a then print(n,A076259(n)) ; a := A076259(n) ; end if; end do: # R. J. Mathar, Jun 25 2010
-
Mathematica
Union[Differences[Select[Range[10000000], SquareFreeQ]]] (* Harvey P. Dale, May 04 2011 *)
Formula
Extensions
Thanks to Christian G. Bower for additional comments.
More terms computed (using data from A020754) by M. F. Hasler, Dec 28 2015
Comments