login
A354960
a(1) = 1, a(2) = 2; for n > 2, a(n) is the smallest positive number not occurring earlier that is a multiple of the number of proper divisors of a(n-1).
8
1, 2, 3, 4, 6, 9, 8, 12, 5, 7, 10, 15, 18, 20, 25, 14, 21, 24, 28, 30, 35, 27, 33, 36, 16, 32, 40, 42, 49, 22, 39, 45, 50, 55, 48, 54, 56, 63, 60, 11, 13, 17, 19, 23, 26, 51, 57, 66, 70, 77, 69, 72, 44, 65, 75, 80, 81, 52, 85, 78, 84, 88, 91, 87, 90, 99, 95, 93, 96, 110, 98, 100, 64, 102, 105, 112
OFFSET
1,2
COMMENTS
The terms are concentrated along numerous lines, some of which curve upward while others curve downward. See the first linked image. Surprisingly these lines are not shared by terms which are a multiple of a given proper divisor count, but predominantly by terms sharing a certain prime factor. See the second linked image.
The sequence is conjectured to be a permutation of the positive integers although it may take an extremely large number of terms for the primes to appear; e.g., 263 has not occurred after 500000 terms. Also although the vast majority of primes will appear in their natural order, some may not; e.g., a(455) = 840, which has 31 proper divisors, so a(456) = 31, and then a(457) = 29.
In the first 500000 terms the only fixed points beyond the first two are 3, 4, 1159, 1207. It is possible that no more exist, although this is unknown.
LINKS
Michael De Vlieger, Annotated log-log scatterplot of a(n), n - 1..2^16, showing records in red, local minima in blue, fixed points in gold, primes in green, and prime powers in cyan.
Michael De Vlieger, Log-log scatterplot of a(n) n = 1..2^12, with a color function indicating tau(a(n-1))-1.
Scott R. Shannon, Image of the first 50000 terms. The green line is y = n.
Scott R. Shannon, Image of the first 50000 terms with color. Terms containing prime factors 17, 13, 11, 7, 5, 3, 2 are colored purple, blue, green, yellow, orange, red, and white respectively. All other terms are colored gray.
EXAMPLE
a(3) = 3 as a(2) = 2 which has one proper divisor, and 2 is the smallest unused multiple of 1.
a(5) = 6 as a(4) = 4 which has two proper divisors, and 6 is the smallest unused multiple of 2.
a(9) = 5 as a(8) = 12 which has five proper divisors, and 5 is the smallest unused multiple of 5.
MATHEMATICA
nn = 76; c[_] = False; Array[Set[{a[#], c[#]}, {#, True}] &, 2]; u = 2; Do[k = DivisorSigma[0, a[n - 1]] - 1; m = 1 + Floor[u/k]; While[c[m k], m++]; a[n] = m k; c[m k] = True; If[a[n] == u, While[c[u], u++]], {n, 3, nn}]; Array[a, nn] (* Michael De Vlieger, Jul 24 2022 *)
CROSSREFS
Sequence in context: A056230 A285321 A253561 * A373623 A119919 A036561
KEYWORD
nonn,look
AUTHOR
Scott R. Shannon, Jul 23 2022
STATUS
approved