On 31.03.2012 15:03, Bryan Hanson wrote:
Attachments don't come through on this list.
It would be helpful to know what you mean by "junk graphs".
Your coding style is a little hard to follow as it is a mix of -> and<- but I
think you definitely have a problem in
for (i in refid)
which should probably be
for (i in 1:length(refid))
Never ever:
1. I believe that part is right, but we cannot know given the example is
not reproducible.
2. If it was wrong, then use seq_along(refid) rather than
1:length(refid) which is broken by design for length 0 objects.
Uwe Ligges
HTH. Bryan
On Mar 31, 2012, at 6:16 AM, Sri krishna Devarayalu Balanagu wrote:
Hi all,
Can anybody debug the following programme, as I am getting some Junk graphs in
the pdf.
Please find the attached raw data file.
Thank you
Regards
Rayalu
library(ggplot2)
setwd("D:\\General Check list")
library(RODBC)
conn<- odbcConnectExcel ("Book1.xls")
Orange1<- sqlFetch (conn, "Sheet3")
odbcClose(conn)
rm(conn)
#CDAI Change
unique(Orange1$BSCHSTAT) -> change
pdf("xxx.pdf")
for (j in 1:length(change)){
((Orange1$BASCHGAUT == "8-item scale")&(Orange1$BSCHSTAT == change[j])) -> b
FD<- Orange1[b, ]
unique(FD$REFID) -> refid
for (i in refid)
{
Orange2<- FD[i == FD$REFID, ]
Orange2$ARM<- factor(Orange2$ARM)
unique(Orange2$BSCHSTAT) -> x
y<- paste("REFID=", i,"; ", "BSCHSTAT=", x, sep="")
print(qplot(TIME1, BASCHGA, data=Orange2, geom= c("line", "point"), colour=ARM,
main=y))
}
}
dev.off()
______________________________________________
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.
______________________________________________
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.
______________________________________________
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.
