A125284 Lower indices of duplicate terms in A125204, i.e., k such that A125204(k) = A125204(k + 1).

3, 18, 35, 37, 148, 741, 752, 6814, 13976, 150095, 517213, 11874105

Offset: 1

Author

Ryan Propper, Jan 25 2007

Keywords

• hard
• more
• nonn

Examples

			18 is in the sequence because A125204(18) = A125204(19) = 266.
		

Crossrefs

Cf. A125204.

Programs

Mathematica

l = {0, 1}; Do[x = l[[n]] + l[[Mod[l[[n]], n] + 1]]; If[x == l[[n]], Print[n - 1]]; AppendTo[l, x], {n, 2, 10^9}]