Une façon de tracer la courbe correspondant à une fonction donnée est la suivante:
fun1 <- function(x) sin(cos(x)*exp(-x/2))
plot (fun1, -8, 5)
Comment puis-je ajouter la courbe d'une autre fonction (par exemple fun2, qui est également définie par sa formule mathématique) dans le même graphique?
plot (fun2, -8, 5, add=TRUE)
Consultez également la page d'aide pour curve
.
Utilisation de 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"))
Utilisez la fonction points
. Il a la même syntaxe exacte que plot
.
Ainsi, par exemple:
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")
Notez que les paramètres de tracé comme ylim
, xlim
, titres et autres ne sont utilisés qu'à partir du premier appel plot
.
Utilisation de 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)