The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A348510

(Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

a(n) = A099377(n) - n, where A099377(n) is the numerator of the harmonic mean of the divisors of n.
(history; published version)

#12 by Alois P. Heinz at Wed Nov 24 18:18:56 EST 2021

STATUS

proposed

approved

#11 by Antti Karttunen at Wed Nov 24 16:57:20 EST 2021

STATUS

editing

proposed

#10 by Antti Karttunen at Wed Nov 24 16:57:06 EST 2021

CROSSREFS

Cf. A099377, A250094 (positions of zeros), A348968, A348969.

#9 by Antti Karttunen at Wed Nov 24 16:55:59 EST 2021

LINKS

Antti Karttunen, <a href="/A348510/b348510.txt">Table of n, a(n) for n = 1..20000</a>

STATUS

approved

editing

#8 by Susanna Cuyler at Mon Nov 01 19:21:12 EDT 2021

STATUS

proposed

approved

#7 by Amiram Eldar at Sun Oct 31 13:59:58 EDT 2021

STATUS

editing

proposed

#6 by Amiram Eldar at Sun Oct 31 13:59:56 EDT 2021

MATHEMATICA

a[n_] := Numerator[DivisorSigma[0, n]/DivisorSigma[-1, n]] - n; Array[a, 100] (* Amiram Eldar, Oct 31 2021 *)

STATUS

proposed

editing

#5 by Antti Karttunen at Sun Oct 31 13:53:26 EDT 2021

STATUS

editing

proposed

#4 by Antti Karttunen at Sun Oct 31 11:33:18 EDT 2021

CROSSREFS

Cf. A099377, A250094 (positions of zeros).

#3 by Antti Karttunen at Sun Oct 31 11:31:11 EDT 2021

NAME

a(n) = A099377(n) - n, where A099377(n) is the numerator of the harmonic mean of the divisors of n.

CROSSREFS

Cf. AQ99377A099377.