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 A073321 #5 Oct 15 2013 22:31:26
%S A073321 4,4,3,4,4,3,3,4,3,5,3,4,3,5,3,4,4,4,4,3,4,5,5,3,4,4,3,4,3,3,4,4,4,5,
%T A073321 5,4,4,3,4,3,5,4,4,4,4,4,4,5,4,4,4,4,3,5,4,3,5,4,3,4,5,4,5,4,4,4,4,4,
%U A073321 4,5,4,4,4,6,4,4,4,5,4,4,4,4,4,4,3,4,4,4,4,4,5,4,4,6,4,4,4,4,4,5,4,4,4,4,4
%N A073321 a(n)=A073259[A000040(n)]; Length of FixedPointList started with n-th prime and leading to corresponding composite number.
%F A073321 See Program.
%e A073321 a=10,p(10)=29, list={29,40,42,43,44}.
%t A073321 lfp[x_] := Length[FixedPointList[x+PrimePi[ # ]+1&, x]]-1 Table[lfp[Prime[w]]-1, {w, 1, 128}]
%Y A073321 Cf. A002808, A073259.
%K A073321 nonn
%O A073321 1,1
%A A073321 _Labos Elemer_, Jul 29 2002