Hi all, I plotted a dotplot based on the data below and code below. I would like to add another yaxis on the right with a different col, different tickmarks and a different label. Can anyone give some help?Thanks very much!! Hanna> tmp1result lot trt trtsymb trtcol 1 98 lot1 trt1 1 blue 2 99 lot2 trt1 1 blue 3 98 lot3 trt1 1 blue 4 100 lot4 trt1 1 blue 5 100 lot5 trt1 1 blue 6 101 lot6 trt1 1 blue 7 101 lot7 trt1 1 blue 8 99 lot8 trt1 1 blue 9 100 lot9 trt1 1 blue 10 94 lot1 trt2 16 red 11 105 lot2 trt2 16 red 12 87 lot3 trt2 16 red 13 119 lot4 trt2 16 red 14 96 lot5 trt2 16 red 15 113 lot6 trt2 16 red 16 106 lot7 trt2 16 red 17 71 lot8 trt2 16 red 18 95 lot9 trt2 16 red library(lattice) dotplot(result ~ lot, tmp1, cex=1.1, ylab = "values", xlab="lot", jitter.y = F, aspect=1.0, pch=tmp1$trtsymb, col=tmp1$trtcol, scales=list(rot=30), main="", key = list(text = list(labels = c("trt1", "trt2"),cex=c(0.9,0.9)), points = list(pch =c(1,12), col =c("blue", "red")), space = "right"))
Hi Hanna, Not within lattice, but you could try this: plot(as.numeric(tmp1$lot[tmp1$trt=="trt1"]), tmp1$result[tmp1$trt=="trt1"],xlab="lot", ylab="Values",type="p",axes=FALSE, col="red",pch=1,ylim=c(68,120)) abline(v=1:9,col="lightgray",lty=2) box() library(plotrix) axis(1,at=1:9,labels=as.character(tmp1$lot[tmp1$trt=="trt1"])) points(as.numeric(tmp1$lot[tmp1$trt=="trt2"]), tmp1$result[tmp1$trt=="trt2"],col="blue",pch=2) fullaxis(2,at=seq(70,120,by=10),col="red") fullaxis(4,at=seq(70,120,by=10),labels=7:12,col="blue") axis.break(2,breakpos=68.5) axis.break(4,breakpos=68.5) Jim On Sat, Sep 12, 2015 at 3:30 AM, li li <hannah.hlx at gmail.com> wrote:> Hi all, > I plotted a dotplot based on the data below and code below. I would > like to add another yaxis on the right with a different col, different > tickmarks and a different label. Can anyone give some help?Thanks very > much!! > Hanna > > > > tmp1 > result lot trt trtsymb trtcol > 1 98 lot1 trt1 1 blue > 2 99 lot2 trt1 1 blue > 3 98 lot3 trt1 1 blue > 4 100 lot4 trt1 1 blue > 5 100 lot5 trt1 1 blue > 6 101 lot6 trt1 1 blue > 7 101 lot7 trt1 1 blue > 8 99 lot8 trt1 1 blue > 9 100 lot9 trt1 1 blue > 10 94 lot1 trt2 16 red > 11 105 lot2 trt2 16 red > 12 87 lot3 trt2 16 red > 13 119 lot4 trt2 16 red > 14 96 lot5 trt2 16 red > 15 113 lot6 trt2 16 red > 16 106 lot7 trt2 16 red > 17 71 lot8 trt2 16 red > 18 95 lot9 trt2 16 red > > > library(lattice) > dotplot(result ~ lot, tmp1, cex=1.1, ylab = "values", xlab="lot", > jitter.y = F, aspect=1.0, > pch=tmp1$trtsymb, col=tmp1$trtcol, scales=list(rot=30), > main="", key = list(text = list(labels = c("trt1", "trt2"),cex=c(0.9,0.9)), > points = list(pch =c(1,12), col =c("blue", "red")), > space = "right")) > > ______________________________________________ > R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see > 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. >[[alternative HTML version deleted]]
Hi see https://stat.ethz.ch/pipermail/r-help/2007-June/134524.html to get you started. Its toolate or too early here Regards Duncan Duncan Mackay Department of Agronomy and Soil Science University of New England Armidale NSW 2351 Email: home: mackay at northnet.com.au -----Original Message----- From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of li li Sent: Saturday, 12 September 2015 03:30 To: r-help Subject: [R] Adding a second Y axis on a dotplot Hi all, I plotted a dotplot based on the data below and code below. I would like to add another yaxis on the right with a different col, different tickmarks and a different label. Can anyone give some help?Thanks very much!! Hanna> tmp1result lot trt trtsymb trtcol 1 98 lot1 trt1 1 blue 2 99 lot2 trt1 1 blue 3 98 lot3 trt1 1 blue 4 100 lot4 trt1 1 blue 5 100 lot5 trt1 1 blue 6 101 lot6 trt1 1 blue 7 101 lot7 trt1 1 blue 8 99 lot8 trt1 1 blue 9 100 lot9 trt1 1 blue 10 94 lot1 trt2 16 red 11 105 lot2 trt2 16 red 12 87 lot3 trt2 16 red 13 119 lot4 trt2 16 red 14 96 lot5 trt2 16 red 15 113 lot6 trt2 16 red 16 106 lot7 trt2 16 red 17 71 lot8 trt2 16 red 18 95 lot9 trt2 16 red library(lattice) dotplot(result ~ lot, tmp1, cex=1.1, ylab = "values", xlab="lot", jitter.y = F, aspect=1.0, pch=tmp1$trtsymb, col=tmp1$trtcol, scales=list(rot=30), main="", key = list(text = list(labels = c("trt1", "trt2"),cex=c(0.9,0.9)), points = list(pch =c(1,12), col =c("blue", "red")), space = "right")) ______________________________________________ R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.
I forgot to put a line about latticeExtra's doubleYScale library(latticeExtra) ? doubleYScale Duncan -----Original Message----- From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of Duncan Mackay Sent: Sunday, 13 September 2015 00:56 To: R Subject: Re: [R] Adding a second Y axis on a dotplot Hi see https://stat.ethz.ch/pipermail/r-help/2007-June/134524.html to get you started. Its toolate or too early here Regards Duncan Duncan Mackay Department of Agronomy and Soil Science University of New England Armidale NSW 2351 Email: home: mackay at northnet.com.au -----Original Message----- From: R-help [mailto:r-help-bounces at r-project.org] On Behalf Of li li Sent: Saturday, 12 September 2015 03:30 To: r-help Subject: [R] Adding a second Y axis on a dotplot Hi all, I plotted a dotplot based on the data below and code below. I would like to add another yaxis on the right with a different col, different tickmarks and a different label. Can anyone give some help?Thanks very much!! Hanna> tmp1result lot trt trtsymb trtcol 1 98 lot1 trt1 1 blue 2 99 lot2 trt1 1 blue 3 98 lot3 trt1 1 blue 4 100 lot4 trt1 1 blue 5 100 lot5 trt1 1 blue 6 101 lot6 trt1 1 blue 7 101 lot7 trt1 1 blue 8 99 lot8 trt1 1 blue 9 100 lot9 trt1 1 blue 10 94 lot1 trt2 16 red 11 105 lot2 trt2 16 red 12 87 lot3 trt2 16 red 13 119 lot4 trt2 16 red 14 96 lot5 trt2 16 red 15 113 lot6 trt2 16 red 16 106 lot7 trt2 16 red 17 71 lot8 trt2 16 red 18 95 lot9 trt2 16 red library(lattice) dotplot(result ~ lot, tmp1, cex=1.1, ylab = "values", xlab="lot", jitter.y = F, aspect=1.0, pch=tmp1$trtsymb, col=tmp1$trtcol, scales=list(rot=30), main="", key = list(text = list(labels = c("trt1", "trt2"),cex=c(0.9,0.9)), points = list(pch =c(1,12), col =c("blue", "red")), space = "right")) ______________________________________________ R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see 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. ______________________________________________ R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.