Re: [R] labels outliers in boxplot

From: <antoniababe_at_yahoo.se>
Date: Fri 12 Jan 2007 - 13:48:15 GMT


Dear talepande,

Thanks for your suggestion,
I have already tried to use it, but the identify function gave me only the observation number everytime I clicked on any point.What I want is instead of obervation numbers it would be block and/or slide numbers.

Any other idea how I can make it works ?

Thanks
--- talepanda <talepanda@gmail.com> skrev:

> because given data is a part of your data, I cannot
> examine,
> however, try:
>
> ##out.block<-identify(tb_ncs$y,tb_ncs$Slide)
> out.block<-identify(tb_ncs$Slide,tb_ncs$y)
>
>
> On 1/11/07, antoniababe@yahoo.se
> <antoniababe@yahoo.se> wrote:
> > Dear R-users,
> >
> > Following is part of my data, where slide has 36
> > levels and block 48 levels. I have done boxplot
> for
> > each slide on the same graph. There are outliers
> for
> > each slide and I tried to use indentify functtion
> to
> > identify outliers in such a way that when I click
> on
> > an outlier or point, the points will be labelled
> by
> > either their block or ID or by both but without
> > success. How can I make it work or are there other
> > ways to do it than using identify function?
> >
> >
> > Thanks in advance,
> >
> >
> >
> > dat1[1:10,]
> > y Slide Block ID Control
> > 1 0.03147823 1 1 IgG-human 5
> > 2 -0.23815974 1 1 LPPAANDVSVLTAAR 0
> > 3 -0.71926359 1 1 HTKHYRVVSKPAALV 0
> > 4 -0.14607826 1 1 FVALPAATADAYATT 0
> > 5 0.89553073 1 1 NYPAMMAHAGDMAGY 0
> > 6 -0.67587100 1 1 RRALRQIGVLERPVG 0
> > 7 0.32636034 1 1 DCGTIRVGSFRGRWL 0
> > 8 -1.44057259 1 1 MAKLSTDELLDAFKE 0
> > 9 -0.37064338 1 1 LELSDFVKKFEETFE 0
> > 10 -0.20387233 1 1 VSRRAKVDVLIVHTT 0
> >
> >
> > tb_ncs<-subset(dat1,dat1$Control==1) ### this
> > data contains only negative controls
> >
> > par(las=2,mar=c(10.1,4.1,4.1,2.1))
> >
> > boxplot(split(tb_ncs$y,tb_ncs$Slide),col="orange",
> > cex=.65,
> > outline=TRUE,main="Negative
> control
> > response of each patient", cex.main=1,
> font.main=1,
> > col.main="blue",
> > names=c(1:35,"B"))
> > grid(nx=NA, ny=NULL)
> > ### grid over boxplot
> > legend("bottomright", "B = Buffer +
> > sec",text.col="blue")
> >
> >
> > out.block<-
> > identify(tb_ncs$y,tb_ncs$Slide)
> >
> >
> >
> >
> >
> >
> >
>



> > Flyger tiden iväg? Fånga dagen med Yahoo! Mails
> inbyggda
> >
> > ______________________________________________
> > R-help@stat.math.ethz.ch 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.
> >
>
                                  

Flyger tiden iväg? Fånga dagen med Yahoo! Mails inbyggda

R-help@stat.math.ethz.ch 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. Received on Sat Jan 13 00:57:22 2007

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.1.8, at Sat 13 Jan 2007 - 07:30:26 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.