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 A079091 #15 Apr 07 2025 09:51:29 %S A079091 3,5,7,9,12,13,13,14,15,16,27,29,23,22,18,19,41,50,29,47,48,23,23,25, %T A079091 34,37,28,27,38,34,28,42,40,27,36,102,122,57,46,45,33,33,110,114,31, %U A079091 69,70,39,52,47,33,36,37,61,64,32,37,162,189,123,90,37,40,177,213,141,111,60 %N A079091 Sum of all prime factors of (prime(n)+1)*(prime(n+1)+1)/4. %H A079091 Reinhard Zumkeller, <a href="/A079091/b079091.txt">Table of n, a(n) for n = 1..10000</a> %F A079091 a(n) = A001414(A079079(n)). %t A079091 Total[Times@@@FactorInteger[#]]&/@(Times@@(#+1)/4&/@Partition[ Prime[Range[100]],2,1]) (* _Harvey P. Dale_, May 26 2011 *) %o A079091 (Haskell) %o A079091 a079091 = a001414 . a079079 -- _Reinhard Zumkeller_, Oct 09 2012 %o A079091 (PARI) a(n) = my(f = factor((prime(n)+1)*(prime(n+1)+1)/4)); f[, 1]~ * f[, 2]; \\ _Amiram Eldar_, Apr 07 2025 %Y A079091 Cf. A001414, A079079, A079086, A079089, A079090. %K A079091 nonn %O A079091 1,1 %A A079091 _Reinhard Zumkeller_, Dec 22 2002