PI(), PI.anti(), PI2() y PI2.anti() ya estiman correctamente.
+Estimación de sumas parciales y En.teta y En.teta.anti para graficar plot(En.teta,m) y plot(En.teta.anti,m).