studio - superponer graficas en r ggplot
Dibuja más de una curva de función en la misma trama (4)
Una forma de dibujar la curva correspondiente a una función dada es esta:
fun1 <- function(x) sin(cos(x)*exp(-x/2))
plot (fun1, -8, 5)
¿Cómo puedo agregar la curva de otra función (por ejemplo, fun2, que también está definida por su fórmula matemática) en la misma gráfica?
Usa la función de points
. Tiene la misma sintaxis exacta que plot
.
Entonces, por ejemplo:
fun1 <- function(x) sin(cos(x)*exp(-x/2))
x <- seq(0, 2*pi, 0.01)
plot (x, fun1(x), type="l", col="blue", ylim=c(-0.8, 0.8))
points (x, -fun1(x), type="l", col="red")
Tenga en cuenta que los parámetros de trazado como ylim
, xlim
, títulos y otros solo se utilizan desde la primera llamada de plot
.
Usando matplot
:
fun1<-function(x) sin(cos(x)*exp(-x/2))
fun2<-function(x) sin(cos(x)*exp(-x/4))
x<-seq(0,2*pi,0.01)
matplot(x,cbind(fun1(x),fun2(x)),type="l",col=c("blue","red"))
Usando par ()
fun1 <- function(x) sin(cos(x)*exp(-x/2))
fun2 <- function(x) sin(cos(x)*exp(-x/4))
plot(fun1, -8,5)
par(new=TRUE)
plot(fun2, -8,5)
plot (fun2, -8, 5, add=TRUE)
Verifique también la página de ayuda para la curve
.