search for: bty

Is it possible to create plot bty=o with different scale of left- and right x-axis? In my documents, by typesetting, bty=u looks disruptively. At 2nd: how to frame the whole box (including title and axes labels) and resize to landscape-oriented rectangle? Tomas Bayer

Dear list: Is there any way of getting the equivalent to what you get with bty="l" for the right and bottom axes? and the equivalent to bty="7" for the upper and left axes? Thanks! Agus -- Dr. Agustin Lobo Institut de Ciencies de la Terra "Jaume Almera" (CSIC) LLuis Sole Sabaris s/n 08028 Barcelona Spain Tel. 34 934095410 Fax. 34 934110012 ema...

hi all, I'm trying for quite some time to have an x- and y-axis, but no entire box. >plot(..,axes=F) >axis(1) >axis(2) Gives this, but their axes do not go to the origin. Quite a number of people find this gap between the two axes disturbing. Has anyone an idea how to let these axes go to the origin? thank you in advance [[alternative HTML version deleted]]

Dear all, maybe I have misunderstood something but to me it seems like a minor error in the help for ?legend for the argument 'bg'. There it says: bg: the background color for the legend box. (Note that this is only used if 'bty = "n"'.) I think, however, that it should be changed to: bg: the background color for the legend box. (Note that this is only used if 'bty = "o"'.) Here is some example code. And only in the upper panel we can see a legend with a blue background....

Full_Name: Claus Ekstrøm Version: 1.2.0 OS: Linux (RedHat 7.1) Submission from: (NULL) (212.54.75.68) For some reason two extra lines keep appearing when making graphics with no box, bty="n" (a vertical line along the leftmost side of the graphics region and a horizonal line along the bottom side). The lines are very visible if the plot is saved as a postscript file and is later included in a document. Example code: # postscript("test.ps") y <- rnorm(100...

...with either of them. What I want is a legend with tile "Legend" and underneath a line with a name and a value like that: value = 2. #Code begin: # ------------------- a = 2 # result of a function for example plot(1:10, a*(1:10)) legend(1, 20, c("Legend", bquote(value ==.(a))), bty = 'n') val <- substitute("value" ==.(a), list(a = a)) legend(6, 5, do.call("expression",list("Legend", val)), bty = 'n') # ------------------- # Code end In the first legend I don't like that value == 2 instead of value = 2, in the second lege...

This is my first post so hopefully I haven't mucked up the rules. I'm trying to change the default borders in either boxplot or barplot so that, at the request of a journal, all of my figures have the same type of border. I've successfully used par(bty="o") using plot(1:10, bty="o"), but it seems that barplot and boxplot have their own defaults that override this. I've tried both par( bty="o") barplot(stuff) and barplot(stuff, bty="o") Does anyone know a trick that doesn't involve using abline...

...e estado tratando varias formas de colocar el subíndice para los grados de libertad del F test y la expresión adj; y sencillamente no funciona. legend("topright",legend=c(expression('r[adj]=0.40'),expression('F[3,23]=15.43'),expression('P < 0.001')),col=black, bty='n',cex=0.9) Luego al tratar de colocar las cusriva utilizando par(font=3) tampoco funciona. ¿Alguna idea de un script para hacer esto? Gracias Eric Flores De Gracia School of Biosciences University of Exeter, Cornwall Campus Penryn, Cornwall TR10 9EZ United Kingdom Mobilephone: +044 07...

...aphics device? For instance, I want to have two plots on stacked top of each other (mfrow=c(2,1)) but with underlying grid lines spanning both figures vertically. I can put the grid lines on top if I add them last: par(mfrow=c(2,1)) plot.new() plot.window(c(0,1),c(0,1)) for( i in 1:2) axis(i) box(bty="L") rect(0.2,0.2,0.5,0.5,col=8) plot.new() plot.window(c(0,1),c(0,1)) for( i in 1:2) axis(i) box(bty="L") par(mfrow=c(1,1)) plot.window(c(0,1),c(0,1)) abline(v=seq(0,1,by=0.2),lty=3) But ideally I would like to draw the grid lines before drawing other objects on top of it, b...

Attention R users, especially those that are experienced enough to be opinionated, I need your input. Consider the following simple plot: x <- rnorm(100) y <- rnorm(100) plot(x, y, bty='n') A colleague (and dreaded SAS user) commented that she thought that my plots could be "cleaned up" by connecting the X and Y axes. I know that I can do that with bty='l' but I don't want to, I find that the plots look less cluttered with disjoint axes. However,...

Hi all. I have defined a plot thus: par(mar=c(5,5,4,5),las=1, xpd=NA) plot(Day, Ym1Imp, ylim=c(0,100), type="b", bty="l", main="Ym1 Expression", cex=1.3, xaxt="n", yaxt="n") #plot implant data axis(side=1, at=c(0,1,3,5,7,10,14,21), labels=c(0,1,3,5,7,10,14,21)) # label x axis mtext("Day", side =1, at=10, line=3, cex=1.2) # title x axis The problem with this gra...

...eg(file="Tabh2.jpg",quality=100) plot(Temp3,bew2log,xlab="log(T/K)",ylab=expression(paste("log(",mu,"/cm^2/VS)")),xlim=range(c(Temp3)),cex.axis=1.5,cex.lab=1.5) abline(reg=fitbew,lty=1) lines(Temp3,bewt2,lty=2) legend(1.932,2.9,c("Experiment"),pch=1,bty="n") legend(1.9,2.88,c("Regression","Theorie"),bty="n",lty=c(1,2)) dev.off() Somewhere I have to add a bigger plot-region... and I don't know the code. thanks Markus

I have following syntax for putting a legend : legend("bottom", fill=c("red","blue"), legend=expression(p==0.30, p==0.50), bty="n") However what I want is that : the value "0.30" should be a value of a variable instead of a constant, so that I can put the name of this variable and in legend it's value will be displayed. Can anyone tell me how to do that? Regards, thanks in advance ------...

...;green") lbls <- round(value/sum(value)*100,1) lbls <- paste(lbls,"%",sep="") postscript(file="H:/test.eps", height = 8, width = 8,onefile = FALSE, paper = "special") par(mfrow=c(2,2),mar=c(0,0,0,0)) pie(value,labels=lbls,col=colors,radius=0.5) box(bty="o",col = 'black') leg <- paste(concentration,lbls,sep=", ") legend(-1,0.85,leg,cex=0.8,fill=colors) par(mfrow=c(2,2),mar=c(0,0,0,0)) pie(value,labels=lbls,col=colors,radius=0.5) box(bty="o",col = 'black') leg <- paste(concentration,lbls,sep=&quo...

...ersions (the first three lines of each version are identical). I would like the right end of the added text to be the same distance from the legend in both versions. ### v1 dev.new() plot(c(0,1),c(0,1),ylim=c(0,2)) legend("topright",c("data1","data2"),col=c(1,2),lty=1,bty="n") mtext("text",side=3,line=-2,adj=0.8) ### v2 dev.new() plot(c(0,1),c(0,1),ylim=c(0,2)) legend("topright",c("data1","data2"),col=c(1,2),lty=1,bty="n") mtext("really long text",side=3,line=-2,adj=0.8) Thank you for your help...

Hi, does anybody know why the following is not working: > hist(rnorm(200)) > box(bty="o") gives me a box without rounded corners. System: > R.Version() $platform [1] "i386-pc-mingw32" $arch [1] "i386" $os [1] "mingw32" $system [1] "i386, mingw32" $status [1] "" $major [1] "2" $minor [1] "0.0"...

Hi, I am trying to add a line plot of barplot, and while the following script works: barplot(DATA1,bty='c') par(new=T) plot(DATA2,type="l",axes=F,xlab="",ylab="",bty='c') axis(4) for some reason the y axis' do not align (the 0s are not in the same position). Is this because I am trying to overlay plot on barplot, and is there any way around this?...

Dear R helpers, I would like to have abline, for a lm model for example, lying within data range. Do you know how to get it? Thank in advance Nguyen D Nguyen #CODE x<- rnorm(200, 35,5) y<- rnorm(200, 0.87,0.12) plot(y~x, xlim=c(0,50), pch=17, bty="l") abline(lm(y~x)) # I would like abline is between min(x) and max(x) [[alternative HTML version deleted]]

...he code showing the various propositions and checks: library(fields) D <- matrix(c(10, 20, 25, 30, 12, 22, 32, 35, 13, 25, 38, 40), nrow=3) (pplt <- par()$plt) #### [1] 0.08844944 0.95469663 0.14253275 0.88541485 # original problem. Axis() not shown image.plot(D, col=rev(heat.colors(128)),bty="n", xlab="Lines", ylab="Columns", cex.lab = 0.5, zlim=range(D, na.rm=TRUE), las=1, axes=FALSE) # Check the value of par()$plt; it is indeed modified par()$plt #### [1] 0.08844944 0.86408989 0.14253275 0.88541485 # axis() does not work axis(1, a...

Dear R-Group, the first example is working as expected, but I need the plot without the box, normally no problem, but I am not able to get the x-axis formatted as times with the axis, command. I tried a lot of things, nothing was working so I used the most easy axis command in the second example here .... # working library(chron) # for times() library(graphics)# for axis