r plot multiple lines on same plot code example

Example 1: plot multiple lines in r

# Plotting the electrical parameters around the detected failure
library(devEMF)
emf(file = "Electrical parameters on inverter saturation.emf", emfPlus = TRUE)
plot(y=yRange$Pac, x=yRange$Time, type='l', ylim=c(0,1100), xlab='Time', ylab='Vmp, Pac, Imp', lwd=2)
lines(y=yRange$Pmp, x=yRange$Time, col='blue', lwd=2)
lines(y=yRange$Vmp, x=yRange$Time, col='red', lwd=2)
legend(yRange$Time[round(0.725*nrow(yRange))], 1100, legend=c("AC Power (kW)", "DC Power (kW)", "DC Voltage (V)"),
       col=c("black", "blue", "red"), lty=1, cex=0.8,
       title='Legend', text.font=4, bg='lightblue')
#lines(y=yRange$Imp, x=yRange$Time, col='purple', lwd=2)
#lines(y=yRange$GI, x=yRange$Time, col='green3', lwd=2)
dev.off()

Example 2: plot multiple plots in r

# One figure in row 1 and two figures in row 2
# row 1 is 1/3 the height of row 2
# column 2 is 1/4 the width of the column 1
attach(mtcars)
layout(matrix(c(1,1,2,3), 2, 2, byrow = TRUE),
   widths=c(3,1), heights=c(1,2))
hist(wt)
hist(mpg)
hist(disp)