Hello, I am trying to plot bargraphs susing Sciplot. Is there a way to increase the width of the bar graphs and decrease the space b/n the groups? I am pasting the script as well as attaching the graph. Bio6 <- read.csv("Data/Plin1.csv",na.strings="",header=T) attach(Bio6) head(Bio6) par(family="serif", font=11) Bio6$Sps <- factor(Bio6$Sps, levels = c("FFA1", "FFA2","FFA3")) Bio6$Gp <- factor(Bio6$Gp, levels = c("N-FFA1", "FU1","FA1","N-FFA2","FU2","FA2","N-FFA3","FU3","FA3")) bargraph.CI(Sps, O.D, group = Gp, data = Bio6,ylab = "Relative expression levels", cex.lab = 1.5, y.leg = 6,cex.leg = 0.82,cex=1.5, axisnames=TRUE, col = c("red","blue","grey"),space=c(0, 0.5), ylim=c(0,7),cex.names = 1.0,density = c(30,30,30), legend = TRUE, main="PLIN1") detach(Bio6) O.D Gp Sps 1 1.000000 N-FFA1 FFA1 2 2.996432 FU1 FFA1 3 3.223413 FU1 FFA1 4 3.524465 FU1 FFA1 5 1.311971 FA1 FFA1 6 6.755860 FA1 FFA1 7 1.566000 FA1 FFA1 8 1.000000 N-FFA2 FFA2 9 2.741612 FU2 FFA2 10 2.800644 FU2 FFA2 11 3.569509 FU2 FFA2 12 4.141500 FA2 FFA2 13 7.049476 FA2 FFA2 14 4.694674 FA2 FFA2 15 1.000000 N-FFA3 FFA3 16 4.163601 FU3 FFA3 17 3.903986 FU3 FFA3 18 4.730000 FU3 FFA3 19 0.000000 FA3 FFA3 20 0.000000 FA3 FFA3 21 0.000000 FA3 FFA3 Any help would be appreciated. Thanks in advance, Roopa

Hi Roopa, If I am not mistaken, sciplot is a CRAN package, in which case you are using the wrong listserv. Please use R-help for CRAN packages (r-help at r-project.org). Best, Jim On 5/5/2014 2:54 PM, Roopa Subbaiaih wrote: > Hello, > > I am trying to plot bargraphs susing Sciplot. Is there a way to increase > the width of the bar graphs and decrease the space b/n the groups? I am > pasting the script as well as attaching the graph. > > Bio6 <- read.csv("Data/Plin1.csv",na.strings="",header=T) > attach(Bio6) > head(Bio6) > par(family="serif", font=11) > Bio6$Sps <- factor(Bio6$Sps, levels = c("FFA1", "FFA2","FFA3")) > Bio6$Gp <- factor(Bio6$Gp, levels = c("N-FFA1", > "FU1","FA1","N-FFA2","FU2","FA2","N-FFA3","FU3","FA3")) > bargraph.CI(Sps, O.D, group = Gp, data = Bio6,ylab = "Relative expression > levels", cex.lab = 1.5, y.leg = 6,cex.leg = 0.82,cex=1.5, axisnames=TRUE, > col = c("red","blue","grey"),space=c(0, 0.5), ylim=c(0,7),cex.names = > 1.0,density = c(30,30,30), legend = TRUE, main="PLIN1") > detach(Bio6) > > O.D Gp Sps > 1 1.000000 N-FFA1 FFA1 > 2 2.996432 FU1 FFA1 > 3 3.223413 FU1 FFA1 > 4 3.524465 FU1 FFA1 > 5 1.311971 FA1 FFA1 > 6 6.755860 FA1 FFA1 > 7 1.566000 FA1 FFA1 > 8 1.000000 N-FFA2 FFA2 > 9 2.741612 FU2 FFA2 > 10 2.800644 FU2 FFA2 > 11 3.569509 FU2 FFA2 > 12 4.141500 FA2 FFA2 > 13 7.049476 FA2 FFA2 > 14 4.694674 FA2 FFA2 > 15 1.000000 N-FFA3 FFA3 > 16 4.163601 FU3 FFA3 > 17 3.903986 FU3 FFA3 > 18 4.730000 FU3 FFA3 > 19 0.000000 FA3 FFA3 > 20 0.000000 FA3 FFA3 > 21 0.000000 FA3 FFA3 > Any help would be appreciated. > > Thanks in advance, Roopa > > > _______________________________________________ > Bioconductor mailing list > Bioconductor at r-project.org > https://stat.ethz.ch/mailman/listinfo/bioconductor > Search the archives: http://news.gmane.org/gmane.science.biology.informatics.conductor -- James W. MacDonald, M.S. Biostatistician University of Washington Environmental and Occupational Health Sciences 4225 Roosevelt Way NE, # 100 Seattle WA 98105-6099