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.

Showing 1-5 of 5 results.

A352541 Number of iterations of A352544 (half if even, add largest anagram if odd) until a value is reached for the second time; 0 if this never happens.

Original entry on oeis.org

1, 2, 2, 2, 3, 2, 2, 2, 4, 2, 2, 2, 3, 4, 2, 3, 5, 5, 2, 3, 3, 2, 2, 3, 4, 3, 5, 3, 3, 5, 4, 2, 6, 2, 6, 5, 3, 3, 4, 4, 4, 2, 2, 2, 3, 3, 4, 5, 5, 21, 4, 2, 6, 2, 4, 2, 4, 4, 6, 3, 5, 2, 2, 2, 7, 2, 2, 21, 7, 7, 6, 2, 4, 2, 4, 2, 5, 2, 5, 6, 5, 2, 2, 2, 3, 2, 2, 2, 4, 0, 4
Offset: 0

Views

Author

M. F. Hasler, Mar 20 2022

Keywords

Comments

A352544 is a variant of the Collatz map, where for an odd argument x, the number A004186(x) (= digits of x arranged in decreasing order) is added.
The first zero appears for initial value n = 89. See A352542 for the trajectory of n = 89. See A352540 for the indices of zeros.

Examples

			The trajectory of n = 4 is 4 -> 8 -> 16 -> 8 -> 16 -> .... The value 8 is the first one to appear for a second time after the third iteration, therefore a(4) = 3.
a(8) = 4 because the trajectory of 8 is 8 -> 4 -> 2 -> 1 -> 2 -> 1 ..., so the number 2 is the first one to appear for a second time, after the 4th iteration of the map A352544.
The trajectory of n = 49 is (49, 143, 574, 287, 1159, 10670, 5335, 10868, 5434, 2717, 10438, 5219, 14740, 7370, 3685, 12338, 6169, 15830, 7915, 17666, 8833, 17666, 8833, ...): The number 17666 is the first one to appear for a second time, after the (a(49) = 21)-st iteration.
		

Crossrefs

Cf. A352544 (half or add largest anagram), A004186 (largest anagram: arrange digits in decreasing order).
Cf. A352542 (trajectory of 89 under A352544), A352540 (indices of zeros).

Programs

  • PARI
    apply( {A352541(n,U=[n],L=200)=for(i=1,L, setsearch(U,n=A352544(n))&& return(i); U=setunion(U,[n]))}, [0..99])

Formula

a(n) = 0 iff n is in A352540.

A352542 Trajectory of initial value 89 under iterations of the map A352544: half if even, add largest anagram if odd.

Original entry on oeis.org

89, 187, 1058, 529, 1481, 9892, 4946, 2473, 9905, 19855, 118406, 59203, 154523, 708844, 354422, 177211, 949322, 474661, 1241102, 620551, 1275761, 9040972, 4520486, 2260243, 8692463, 18558895, 117444446, 58722223, 146254445, 801698866, 400849433, 1385292733, 11260625954
Offset: 0

Views

Author

M. F. Hasler, Mar 20 2022

Keywords

Comments

89 is the smallest nonnegative integer with an orbit of infinite size under iterations of x -> A352544(x) = {x/2 if x is even, x + A004186(x) if x is odd}. The list of all such numbers is given in A352540, which contains this sequence as subset.
We conjecture that there is a strictly increasing sequence (b(k), k >= 0) = (32, 37, 46, 52, 88, 91, 118, 122, 141, ...) such that all terms a(n) with n >= b(k) have more than k digits 0.
As a consequence, the sequence tends to a 10-adic limit ...27057751007.
Similarly, the number of leading digits 1 appears to grow to infinity; more precisely, a(n) has more than k leading digits 1 for all n > c(k >= 0) = (50, 70, 95, 121, 122, 123, 130, ...).

Examples

			The initial term a(0) = 89 and its successor a(1) = 187 are odd, so the number with the same digits in decreasing order, 98 resp. 871, are added to find the successor a(n+1).
Then a(2) = 1058 is even (as are a(5..6), a(10), a(13..14), ...), so the successor is obtained dividing it by two.
a(32) = 11260625954 appears to be the last even term. It appears that from this terms on, all terms have at least one digit 0 and therefore all subsequent terms end in the digit 7.
From a(37) = 11079547822507 on, all terms appear to have at least two digits 0, and therefore all end in the digits ...07.
From a(46) = 11109941625118561459007 on, all terms appear to have at least three digits 0, and therefore all end in the digits ...007.
From a(52) = 1119999530692487035860091007 on, all terms appear to have at least four digits 0, and therefore all end in the digits ...1007.
a(49) = 9999653161399504894770007 ~ 9.999653e24 appears to be the last term to have:
    (i) not more digits than the preceding term,
   (ii) its leading digit different from 1,
  (iii) a successor a(n+1) ~ 1.999965e25 ~ 2*a(n) and a(51) ~ 1.1999964e26 ~ 6*a(50).
For all n >= 51, a(n) has one more digit than a(n-1), and a(n+1) > 9*a(n).
		

Crossrefs

Cf. A352544 (the iterated map), A352540 (starting values with infinite orbit), A352541 (number of iterations until a value is repeated).

Programs

Formula

log_10 a(n) ~ n (asymptotical equivalence, as n -> oo).
a(n+1) > 9*a(n) for all n > 50. (Conjectured.)

A352540 Values for which the iteration of A352544 (half if even, add largest anagram if odd) does not end in a loop.

Original entry on oeis.org

89, 109, 117, 137, 149, 178, 187, 203, 205, 207, 209, 213, 217, 218, 223, 225, 234, 239, 247, 253, 255, 257, 267, 273, 274, 277, 279, 293, 295, 297, 298, 299, 307, 319, 327, 335, 347, 356, 365, 374, 405, 406, 407, 409, 410, 414, 415, 418, 426, 427, 434, 436, 437, 445, 446
Offset: 1

Views

Author

M. F. Hasler, Mar 20 2022

Keywords

Comments

The iterated map A352544 is a variant of the Collatz map, A352544(x) = x/2 if x is even, A352544(x) = x + A004186(x) (add x with digits in decreasing order) if x is odd.
All the terms are only conjectured to have this property; we don't have a completely rigorous proof. But for all the listed initial terms, the trajectory quickly reaches numbers with many (>> 10) digits and grows larger with every iteration: When the number is odd and has a digit 0, then its successor is again odd and at least twice as large, most often more than 9 times larger. Roughly 1/10th of the digits are zeros, and similarly for 9s, so as the terms get larger, it becomes increasingly less probable that they could end up having no digit 0 at all, which is only a necessary condition that they might become even and not grow upon for one iteration, but still most likely resume growth immediately after. See sequence A352542, the trajectory of a(1) = 89, for an example studied in detail.

Examples

			See A352541 for examples of trajectories which end in a loop, and A352542 for the trajectory of 89 which grows to infinity.
		

Crossrefs

Cf. A352544 (iterated map: half if even, add largest anagram if odd), A352541 (number of iterations to see a value again), A352542 (trajectory of 89), A352543 (starting values ending in cycles of length > 2), A352545 (representatives of cycles of length > 2).

Programs

Formula

{ n >= 0 | A352541(n) = 0 }.

A352543 Numbers that end in a loop of size > 2 under iterations of A352544 (= half or add largest anagram).

Original entry on oeis.org

549, 639, 801, 1035, 1098, 1278, 1503, 1602, 1611, 2025, 2070, 2196, 2511, 2556, 3006, 3123, 3159, 3204, 3222, 3411, 3861, 4050, 4140, 4149, 4383, 4392, 4635, 5022, 5112, 5589, 5679, 5913, 6012, 6165, 6246, 6318, 6345, 6408, 6444, 6795, 6813, 6822, 7047, 7245, 7713, 7722, 7785, 8100, 8280, 8298, 8757, 8766, 8784, 9203, 9270, 9459
Offset: 1

Views

Author

M. F. Hasler, Mar 20 2022

Keywords

Comments

Most small starting values end in a cycle or loop of length 2 under iterations of A352544 (like 1 -> 2 -> 1, 3 -> 6 -> 3, or 49 -> 143 -> ... -> 7915 -> 17666 -> 8833 -> 17666), and some (listed in A352540) have an unbounded orbit like 89 (cf. A352542).
This sequence lists all other starting values, i.e., those which have a bounded orbit but don't end in a cycle of length 2. (A352544 obviously has no fixed points.)
All terms below a(54) = 9203 lead to the same loop 1611 -> 7722 -> 3861 -> 12492 -> 6246 -> 3123 -> 6444 -> 3222 -> 1611 of size 8.
The starting value 9203 is the only one below 10^4 leading to a different loop, of size 22: cf. EXAMPLE.
Sequence A352545 lists the representatives (smallest elements) of the distinct cycles of length > 2.

Examples

			The number a(1) = 549 is the smallest starting value which leads into a cycle of length > 2 under iterations of the map A352544: namely, 549 -> 1503 -> 6813 -> 15444 -> 7722 which is element of the cycle [3861, 12492, 6246, 3123, 6444, 3222, 1611, 7722] of length 8, with representative = smallest member A352545(1) = 1611.
The starting value a(54) = 9203 is the only one below 10^4 leading to a different loop: it goes at once to 18523 -> 103844 -> 51922 -> 25961 -> 122482 -> 61241 -> 125452 -> 62726 -> 31363 -> 94694 -> 47347 -> 124790 -> 62395 -> 158927 -> 1146448 -> 573224 -> 286612 -> 143306 -> 71653 -> 148184 -> 74092 -> 37046 -> 18523, a loop of size 22, with representative = smallest member A352545(2) = 18523.
		

Crossrefs

Cf. A352544 (the iterated map) and further references there: A352540 (starting values not ending in a loop), A352541 (number of iterations to reach a value for the second time), A352545 (representatives of cycles of length > 2).

Programs

  • PARI
    is_A352543(n,L=99,a=[n])={for(i=1,L, a=concat(a,n=A352544(n)); #Set(a)>i||break); #a < L && #Set(a[-3..-1]) > 2}

A352545 Representatives, i.e., minimal elements of cycles of length > 2 under iterations of A352544 (half or add largest anagram).

Original entry on oeis.org

1611, 18523, 207441, 305429
Offset: 1

Views

Author

M. F. Hasler, Mar 20 2022

Keywords

Comments

All terms are odd, since the smallest (resp. largest) element of a cycle of A352544 is always odd (resp. even).
3886083 is also in the sequence, cf. EXAMPLE.
a(5) > 500000.
To compute the sequence we look for odd initial values ending in a cycle of more than two elements. This gives terms of the sequence, but we don't know the position of a term until we have scanned all (relevant) initial values up to that number, cf. EXAMPLES.

Examples

			The starting value x = 549 leads to 1503 -> 6813 -> 15444 -> 7722 which is element of the cycle [3861, 12492, 6246, 3123, 6444, 3222, 1611, 7722] of length 8, with representative = smallest member a(1) = 1611.
The starting value x = 9203 leads to the cycle (18523, 103844, 51922, 25961, 122482, 61241, 125452, 62726, 31363, 94694, 47347, 124790, 62395, 158927, 1146448, 573224, 286612, 143306, 71653, 148184, 74092, 37046, 18523) of length = 22 with (smallest) representative a(2) = 18523.
The starting value x = 36037 leads to 112367 -> 875578 -> 437789 -> 1425532 -> 712766 -> 356383 -> 1221716, element of the cycle (610858, 305429, 1259749, 11235170, 5617585, 14383136, 7191568, 3595784, 1797892, 898946, 449473, 1423916, 711958, 355979, 1353532, 676766, 338383, 1221716) of length 18, with (smallest) representative a(4) = 305429.
The starting value x = 84807 leads to 173547 -> ... -> 5637789 -> 15515442 which is part of the cycle (7772121, 15544332, 7772166, 3886083, 12772413, 90204624, 45102312, 22551156, 11275578, 5637789, 15515442, 7757721, 15535242, 7767621, 15544242) of length 15 and (smallest) representative 3886083.
The starting value x = 104481 leads to 948591 -> 1947132 part of the cycle (973566, 486783, 1374426, 687213, 1563534, 781767, 1659528, 829764, 414882, 207441, 951651, 1917162, 958581, 1947132) of length 14 with (smallest) representative a(3) = 207441.
We actually don't know that this is a(3) until we have checked that no smaller starting value will produce a smaller term. Similarly, we know the index of a(4) only after checking all (odd) starting values less than a(4).
		

Crossrefs

Cf. A352544 and references there.
Subsequence of A352543: starting values ending in a loop of size > 2.

Programs

  • PARI
    check(n,L=1e99,U=List(n),i)={ while(i=setsearch(U, n=A352544(n),1), n>L&&return; listinsert(U,n,i)); U=List(n); while(U[1]!=n=A352544(n), listput(U,n)); if(#U>2,Set(U)[1])}
    a=[0];forstep(n=1,1e5,2,my(t=check(n)); t && #a<#(a=setunion(a,[t])) && print(a[^1]" at n = "n))
Showing 1-5 of 5 results.