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 A023588 #16 May 30 2024 19:14:30
%S A023588 1,1,2,1,2,2,2,1,3,2,1,1,4,2,2,3,3,2,2,2,2,1,3,2,1,2,2,2,2,4,2,3,3,1,
%T A023588 4,2,1,3,3,3,3,2,2,3,2,1,1,2,2,1,3,3,2,2,4,4,2,1,2,3,2,4,1,4,4,2,1,1,
%U A023588 4,2,3,2,1,2,1,4,3,2,3,2,4,2,3,2,1,3,3,2,2,3,2,3,2,3,1,3,3,2,3
%N A023588 a(n) = sum of exponents in prime-power factorization of 2*prime(n)-1.
%H A023588 Harvey P. Dale, <a href="/A023588/b023588.txt">Table of n, a(n) for n = 1..1000</a>
%F A023588 a(n) = A001222(A076274(n)). - _R. J. Mathar_, Mar 10 2011
%t A023588 Array[Plus@@Last/@FactorInteger[2*Prime[ # ]-1]&,6! ] (* _Vladimir Joseph Stephan Orlovsky_, Feb 28 2010 *)
%t A023588 Table[Total[FactorInteger[2p-1][[;;,2]]],{p,Prime[Range[100]]}] (* _Harvey P. Dale_, May 30 2024 *)
%K A023588 nonn
%O A023588 1,3
%A A023588 _Clark Kimberling_