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 A079094 #13 Apr 07 2025 09:51:32 %S A079094 1,5,16,44,41,51,123,244,336,608,624,211,493,1280,1836,1647,991,623, %T A079094 2724,2256,2556,4496,3483,2541,1694,3896,7236,5319,2122,12352,16576, %U A079094 5925,5891,8275,10180,6396,3479,13780,13476,13581,12993,26672,26480 %N A079094 Arithmetic derivative of (prime(n)+1)*(prime(n+1)+1)/4. %H A079094 Reinhard Zumkeller, <a href="/A079094/b079094.txt">Table of n, a(n) for n = 1..10000</a> %F A079094 a(n) = A003415(A079079(n)). %t A079094 ad[n_] := n * Plus @@ ((Last[#]/First[#]) & /@ FactorInteger[n]); a[n_] := ad[(Prime[n]+1) * (Prime[n+1]+1) / 4]; Array[a, 100] (* _Amiram Eldar_, Apr 06 2025 *) %o A079094 (Haskell) %o A079094 a079094 = a003415 . a079079 -- _Reinhard Zumkeller_, Oct 09 2012 %Y A079094 Cf. A003415, A079079, A079093. %K A079094 nonn %O A079094 1,2 %A A079094 _Reinhard Zumkeller_, Dec 22 2002