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 A074077 #12 Jan 09 2025 00:21:34
%S A074077 0,0,2,2,3,4,6,2,1,0,2,3,4,3,5,2,2,0,2,0,1,2,4,3,0,0,2,3,4,4,6,2,2,1,
%T A074077 3,3,4,5,7,3,2,-2,0,1,2,0,2,2,2,-5,-3,-4,-3,-2,0,0,-2,-10,-8,-7,-6,-6,
%U A074077 -4,-6,-6,-6,-4,-4,-3,-2,0,-1,-2,-5,-3,-2,-1,-2,0,-1,-1,-4,-2
%N A074077 a(n) = 3n - Sum_{k=1..n} A068119(n).
%F A074077 a(n) = a(n-1) + 3 - A068119(n) with a(0)=0. - _Sean A. Irvine_, Jan 08 2025
%t A074077 ce[n_] := Length[NestWhileList[#*Ceiling[#] &, n + 1/4, ! IntegerQ[#] &]] - 1; nn = Range[83]; t = Accumulate[ce /@ nn]; Table[3 n - t[[n]], {n, nn}] (* _Jayanta Basu_, Jul 30 2013 *)
%K A074077 sign
%O A074077 1,3
%A A074077 _Benoit Cloitre_, Aug 30 2002
%E A074077 Name clarified by _Sean A. Irvine_, Jan 08 2025