[R-es] Graficar una curva de tendencia potencial.

[Jimmy Erney Reyes Velasco]

AF_E PS_E
90.838 2.206
83.139 1.751
134.272 3.710
84.043 2.076
105.184 2.788
157.249 3.783
50.280 1.027
96.973 2.355
123.582 3.398
60.417 1.236
123.501 3.315
90.128 1.566
193.783 5.167
116.036 2.994
100.289 2.216
56.943 1.106
102.272 2.692
145.579 3.810
53.105 1.202
127.212 3.061
102.838 2.383
126.352 2.723
13.661 0.190
164.352 4.870
159.945 4.160
54.382 0.884
128.253 3.598
181.208 4.767
145.118 3.779
65.993 1.147 Hola buenas tardes
quiero graficar una curva de tendendia de un modelo potencial con estos
datos.
mi codigo es el siguiente:

ggplot(modelos_Garcia,aes(x = AF_E,y = PS_E)) +
  geom_point() +
  stat_smooth(method = 'nls', formula = 'y~a*x^b', start = list(a =
1,b=1),se=TRUE)

pero cuando ejecuto el código no me aparece la curva de tendencia
¿alguien sabe cómo podría hacerlo?.
por otro lado me gustaría añadir la ecuación del modelo.
agradezco mucho la información que puedan darme.

	[[alternative HTML version deleted]]