A278975 In the ternary Pi race between digits zero and two, where the race leader changes.

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

Hans Havermann, Table of n, a(n) for n = 1..2508

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

Cf. A004602, A278920, A278974, A278976, A278978.

Sequence in context: A147832 A022369 A367461 * A096508 A374584 A355169

Adjacent sequences: A278972 A278973 A278974 * A278976 A278977 A278978

Keyword

nonn,base

Author

Hans Havermann and Robert G. Wilson v, Dec 03 2016

Status

approved