A278974
In the ternary Pi race between digits zero and one, where the race leader changes.
Original entry on oeis.org
1, 3, 8, 1481, 1505, 1509, 1513, 1541, 1567, 1596, 1730, 1734, 1739, 1741, 1769, 1772, 1783, 1790, 66446, 66489, 66493, 66496, 68547, 68554, 68871, 69116, 69146, 69190, 69194, 69268, 69270, 69379, 69381, 69389, 241170
Offset: 1
Ternary Pi is 10.01021101222201021100211...
With no digits of ternary Pi, there are an equal number of zeros and ones. 1 is in the sequence because with the initial digit of ternary Pi, 1 has now taken the count lead over 0 (1-0). 3 is the next term because with 3 initial digits of ternary Pi, 0 has now taken the count lead over 1 (2-1). 8 is the next term because with 8 initial digits, 1 regains the count lead over 0 (4-3).
-
pib = RealDigits[Pi, 3, 5000000][[1]]; flag = 1; z = o = t = 0; k = 1; lst = {}; While[k < 5000001, Switch[ pib[[k]], 0, z++, 1, o++, 2, t++]; If[(z > o && flag != 1) || (z < o && flag != -1), AppendTo[lst, k]; flag = -flag]; k++]; lst
A278975
In the ternary Pi race between digits zero and two, where the race leader changes.
Original entry on oeis.org
2, 14, 17, 33, 156, 189, 4853, 5494, 5541, 5548, 5663, 5665, 5668, 5673, 5686, 5689, 5702, 5704, 5719, 5732, 5739, 5831, 5834, 5839, 5845, 5847, 5905, 5913, 5925, 5928, 5950, 5978, 5980, 5986, 6000
Offset: 1
Ternary Pi is 10.01021101222201021100211...
With no digits of ternary Pi, there are an equal number of zeros and twos. 2 is in the sequence because with the initial 2 digits of ternary Pi, 0 has now taken the count lead over 2 (1-0). 14 is the next term because with 14 initial digits of ternary Pi, 2 has now taken the count lead over 0 (5-4). 17 is the next term because with 17 initial digits, 0 regains the count lead over 2 (6-5).
-
pib = RealDigits[Pi, 3, 5000000][[1]]; flag = -1; z = o = t = 0; k = 1; lst = {}; While[k < 5000001, Switch[ pib[[k]], 0, z++, 1, o++, 2, t++]; If[(z > t && flag != 1) || (z < t && flag != -1), AppendTo[lst, k]; flag = -flag]; k++]; lst
A278976
In the ternary Pi race between digits one and two, where the race leader changes.
Original entry on oeis.org
1, 216, 334, 349, 351, 426, 434, 576, 591, 632, 636, 638, 649, 656, 660, 665, 764, 771, 936, 939, 953, 1125, 1127, 1165, 1168, 1198, 190780, 190793, 190797, 190870, 190880, 191094
Offset: 1
Ternary Pi is 10.01021101222201021100211...
With no digits of ternary Pi, there are an equal number of ones and twos. 1 is in the sequence because with the initial digit of ternary Pi, 1 has now taken the count lead over 2 (1-0). 216 is the next term because with 216 initial digits of ternary Pi, 2 has now taken the count lead over 1 (75-74). 334 is the next term because with 334 initial digits, 1 regains the count lead over 2 (119-118).
-
pib = RealDigits[Pi, 3, 5000000][[1]]; flag = -1; z = o = t = 0; k = 1; lst = {}; While[k < 5000001, Switch[ pib[[k]], 0, z++, 1, o++, 2, t++]; If[(o > t && flag != 1) || (o < t && flag != -1), AppendTo[lst, k]; flag = -flag]; k++]; lst
Showing 1-3 of 3 results.