A350928 {Partial sums of A095258} + 2.

3, 6, 8, 12, 18, 27, 54, 72, 80, 85, 102, 136, 204, 216, 240, 250, 275, 286, 299, 322, 329, 376, 470, 705, 720, 736, 768, 816, 867, 1156, 1734, 1836, 1872, 1898, 1971, 2190, 2220, 2240, 2254, 2300, 2350, 2820, 2880, 2920, 3066, 3087, 3136, 3164, 3277, 3306, 3325

Offset

1,1

Comments

Let A095258(n) = m | a(n) such that m is minimal and distinct in A095258.

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Michael De Vlieger, Log-log scatterplot of a(n), b(n), and c(n), n = 1..10^5, where a(n) appears in red, b(n) = A095258(n) in blue, A350929(n) in gold.

Formula

a(n) = A095258(n) * A350929(n).

Mathematica

c[_] = 0; j = c[1] = 1; s = 3; Reap[Do[d = Divisors[s]; k = 1; While[c[d[[k]]] > 0, k++]; Set[k, d[[k]]]; Set[c[k], i]; Sow[s]; j = k; s += k, {i, 2, 52}]][[-1, -1]]

Crossrefs

Cf. A095258, A350929.

Sequence in context: A212984 A006048 A245989 * A049827 A186736 A072107

Adjacent sequences: A350925 A350926 A350927 * A350929 A350930 A350931

Keyword

nonn,easy

Author

Michael De Vlieger, Jan 23 2022

Status

approved