cp's OEIS Frontend

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.

A103860 Sum of divisors of prime(n)! - prime(n)# + 1.

This page as a plain text file.
%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