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 A023595 #11 Oct 02 2017 20:22:02 %S A023595 1,1,1,2,1,3,2,2,1,1,3,3,1,2,2,1,2,2,4,2,3,2,1,1,3,2,3,2,2,1,3,1,3,3, %T A023595 2,2,4,2,2,1,1,3,1,3,2,3,3,2,3,4,1,1,3,1,2,2,3,2,3,1,5,1,3,2,3,2,3,5, %U A023595 2,2,2,1,4,3,3,2,2,3,2,4,1,2,1,3,2,1,2,3,2,3,3,2,4,1,4,2,1,2,2 %N A023595 a(n) = sum of exponents in prime-power factorization of 2*prime(n)+1. %t A023595 Array[Plus@@Last/@FactorInteger[2*Prime[ # ]+1]&,6! ] (* _Vladimir Joseph Stephan Orlovsky_, Feb 28 2010 *) %t A023595 Total[FactorInteger[#][[All,2]]]&/@(2*Prime[Range[100]]+1) (* _Harvey P. Dale_, Oct 02 2017 *) %K A023595 nonn %O A023595 1,4 %A A023595 _Clark Kimberling_