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 A103860 #21 Apr 17 2025 08:08:52 %S A103860 1,1,112,4832,39929032,6227388000,355687500698712,121674349040732800, %T A103860 26204303786955547121568,8844022735747817449795273936944, %U A103860 8243360285859647409507002537385024,13989390090648918627329493090109449081402880,33452526614068666040537953433982904696696861440000 %N A103860 Sum of divisors of prime(n)! - prime(n)# + 1. %H A103860 Amiram Eldar, <a href="/A103860/b103860.txt">Table of n, a(n) for n = 1..26</a> %H A103860 Reinhard Zumkeller, <a href="/A103855/a103855.txt">p(n)! - p(n)# + 1</a>. %F A103860 a(n) = A000203(A103855(n)). %t A103860 Module[{nn=15,pr,pm},pr=Prime[Range[nn]]!;pm=FoldList[Times,Prime[Range[nn]]];DivisorSigma[1,#[[1]]-#[[2]]+1&/@Thread[{pr,pm}]]] (* _Harvey P. Dale_, Dec 18 2022 *) %o A103860 (PARI) a(n) = sigma(prime(n)! - factorback(primes(n)) + 1); \\ _Jinyuan Wang_, Dec 28 2024 %Y A103860 Cf. A000203, A103855, A103858, A103859, A103895. %K A103860 nonn %O A103860 1,3 %A A103860 _Reinhard Zumkeller_, Feb 20 2005