login
A278975
In the ternary Pi race between digits zero and two, where the race leader changes.
4
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,1
LINKS
EXAMPLE
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).
MATHEMATICA
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
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved