This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A076250 #14 Oct 26 2023 08:26:42 %S A076250 1,1,1,1,1,1,1,1,1,1,1,1,1,2,1,1,1,1,1,1,1,1,3,2,3,1,1,5,2,2,1,4,1,5, %T A076250 5,3,2,5,5,2,3,4,1,5,1,4,5,5,5,5,4,1,5,5,5,5,10,4,1,5,5,5,5,10,5,5,10, %U A076250 5,10,10,5,3,2,5,10,5,10,3,2,5,15,5,5,3,2,5,10,5,10,5,5,20,5,5,5,30,5,20 %N A076250 Distance between maxima of the cototient function, divided by 6, starting at n=5. %H A076250 Michael De Vlieger, <a href="/A076250/b076250.txt">Table of n, a(n) for n = 5..1024</a> %t A076250 s = Array[# - EulerPhi[#] &, 2^12]; 1/6*Differences[Map[FirstPosition[s, #][[1]] &, Union@ FoldList[Max, s] ][[6 ;; -1]] ] (* _Michael De Vlieger_, Oct 25 2023 *) %Y A076250 Cf. A051953, A065385, A076249. %K A076250 nonn %O A076250 5,14 %A A076250 _Olivier Gérard_