@firefox00
Don't look at RadApo. It's a keplerian apoapsis, not real. You can trust RadPer here (because it's the starting point) but not RadApo.
So, change RadPer to your periapsis (3000km), reduce numbers of orbits to 3 (For I = 1:1:3;), run, apply correction, run again, apply, increase to 4...