+Soporte x=c() para graficar f(x) y g(x),
+Plot() para f(x) y g(x),
+Tamaño de muestra n como variable,
+Algunas etiquetas renombradas,
+Corrección variable  Teta.n.anti,
+Añade xlab y ylab a plot(),
+Comentarios en código.