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 A133674 #8 Jun 13 2022 15:51:35
%S A133674 1,1,1,2,1,2,3,1,1,2,3,4,2,1,2,6,5,6,5,1,1,4,7,1,3,4,2,6,7,8,10,4,2,3,
%T A133674 2,10,4,2,3,10,9,10,9,2,6,6,13,2,1,4,1,10,14,3,1,4,2,7,14,15,7,7,3,5,
%U A133674 1,14,12,2,5,16,18,19,9,9,5,3,1,16,19,1,11,10,19,3,7,4,5,19,21,3,3,2,4,7,6
%N A133674 a(n) = |A061395(n+1) - A061395(n)|.
%t A133674 f[n_] := Abs[ PrimePi[ FactorInteger[n]][[ -1, 1]] - PrimePi[ FactorInteger[n + 1]][[ -1, 1]]]; Array[f, 95] (* _Robert G. Wilson v_ *)
%t A133674 Abs[Differences[Table[PrimePi[FactorInteger[n][[-1,1]]],{n,100}]]] (* _Harvey P. Dale_, Jun 13 2022 *)
%K A133674 nonn
%O A133674 1,4
%A A133674 _Giovanni Teofilatto_, Dec 29 2007
%E A133674 Edited by _Robert G. Wilson v_ and _N. J. A. Sloane_, Dec 30 2007