A360368 Positive integers k such that A360366(k) = A360366(k+1).

1, 5, 20, 25, 36, 57, 76, 79, 83, 100, 120, 138, 146, 155, 167, 187, 201, 210, 224, 229, 230, 309, 363, 372, 393, 401, 406, 414, 418, 423, 427, 432, 433, 434, 443, 449, 453, 460, 470, 492, 495, 499, 512, 517, 542, 571, 581, 588, 591, 601, 637, 650, 675, 676, 685

Offset: 1

Author

Stefano Spezia, Feb 04 2023

Keywords

• nonn

Comments

Equivalently, positive integers k such that A360367(k) = A360367(k+1).

Crossrefs

Cf. A000796, A011557, A360366, A360367.

Programs

Mathematica

b[i_]:=Rationalize[Pi,10^(-i)]; Select[Range[685],b[#]==b[#+1] &]