Hi all. Using the following code:
plot(bsa, abs, col='blue', pch=16, xlim=c(0, 25), ylim=c(0.0, 1.0), xlab = expression(paste(BSA, " (", mu, "g)", sep="")), ylab=expression(A[595])) plot(unknown1, abs2, col='blue', pch=16, xlim=c(0, 25), ylim=c(0.0, 1.0), xlab = expression(paste(Unknown_1, " (", mu, "g)", sep="")), ylab=expression(A[595])) plot(unknown2, abs3, col='blue', pch=16, xlim=c(0, 25), ylim=c(0.0, 1.0), xlab = expression(paste(Unknown_2, " (", mu, "g)", sep="")), ylab=expression(A[595])) myline.fit <- lm(abs ~ bsa) summary(myline.fit) abline(myline.fit) axis(side=1, col="gray", tck=1, lty="dotted") axis(side=2, col="gray", tck=1, lty="dotted") box() minor.tick(nx=2, ny=2, tick.ratio=0.5) title(main="Quantifying Protein Content via Bradford Microassay", col='blue') ...I have constructed three individual plots. Is there a convenient way to plot three vectors (not from a file) into one window? With three individual lines of best fit? Probably using three symbols, e.g., pch=16, 17, 18, to distinguish them. Thanks, ~Caitlin [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.