Zeichnen mehr als eine Funktionskurven in der gleichen Parzelle

Question

Ein Weg, um die Kurve entsprechend einer bestimmten Funktion zu zeichnen, ist dies:

fun1 <- function(x) sin(cos(x)*exp(-x/2)) 
plot (fun1, -8, 5) 

Wie kann ich von einer anderen Funktion Kurve hinzufügen (zB fun2, die auch durch definiert ist, seine mathematische Formel) in der gleichen Handlung?

Answer 1

plot (fun2, -8, 5, add=TRUE) 

prüfen auch Seite für curve helfen.

Answer 2

Verwenden Sie die points Funktion. Es hat dieselbe exakte Syntax wie plot.

So zum Beispiel:

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") 

Beachten Sie, dass Plotparameter wie ylim, xlim, Titel und so werden nur von dem ersten plot Aufruf verwendet.

Answer 3

Mit 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) 

Answer 4

Mit 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"))