proposed
approved
proposed
approved
editing
proposed
The arithmetic mean of a(n)/log(A002182(n)) for the terms 3..10000 is 1.513..., , i.e., a rough approximation is given by a(n) ~ log(A002182(n)^(3/2)). - A.H.M. Smeets, Dec 02 2020
proposed
editing
editing
proposed
The arithmetic mean of a(n)/log(A002182(n)) for the terms 3..10000 is 1.513, ..., i.e., a rough approximation is given by a(n) ~ log(A002182(n)^(3/2)). - A.H.M. Smeets, Dec 02 2020
proposed
editing
editing
proposed
With[{s = Array[DivisorSigma[0, #] &, 10^6]}, Map[NextPrime[#] - # &@ FirstPosition[s, #][[1]] &, Union@ FoldList[Max, s]]] (* or *)
Map[NextPrime[#] - # &, Import["https://oeis.org/A002182/b002182.txt", "Data"][[1 ;; 80, -1]] ] (* Michael De Vlieger, Dec 11 2020 *)
proposed
editing
editing
proposed