search for: opars

Displaying 20 results from an estimated 128 matches for "opars".

Did you mean: pars
2006 Apr 28
4
par(mfror=c(1,2))
dear list, i have a problem using the par function. in one graphic device i want to have two plots so i tried to use par(mfror=c(1,2)). of course it worked out, but the height now is twice the length of the width for each single plot. what i actually wanted is something like par(mfrow=c(2,2)) where only the top (or bottom) two plots are drawn with entire length proportions of 1 to 2 ( height 1,
2007 Jan 02
3
graphical parameters: margins
Hi all, Please, while using image() which is the graphical parameter which control the space between ylab and the y axis? I do need to write a number of relatively long y labels and I am not able the control, if possible, this space. See the effect I need to avoid... http://nvx.environmentalchange.net/@rrodriguez/images/overlapping.jpg Thanks for your help, Ricardo -- Ricardo Rodr?guez Your
2005 Jul 13
1
unexpected par('pin') behaviour
hi everybody, I noticed the following: in one of my scripts 'layout' is used to generate a (approx. square) grid of variable dimensions (depending on no. of input files). if the no. of subplots (grid cells) becomes moderately large (say > 9) I use a construct like ###layout grid computation and set up occurs here### ... opar <- par(no.readonly = T);
2007 Oct 30
0
Plotting question: how to plot SNP location data?
Hello, I would like to plot specific SNPs with their exact locations on a chromosome. Based on my genotyping results I would like to separate these SNPs in three different categories: 1, 2 and 3 and use different colours to represent these categories. The script below generates the sample data. I can plot these with the image function using the following: val <- 1:3 samp <- sample(val,
2011 Feb 22
2
Plotting a functional time series
Hello, I'm willing to plot a sequence of densities on a 3d graph, something like ----------------------------------------------------------------- x <- sapply(1:10, function(i)rnorm(1000)) f <- sapply(1:10, function(i)density(x[,i], from=-5,to=5)$y) grid <- density(x[,1], from=-5,to=5)$x win.graph() persp(grid1, 1:10, f,theta=-50, phi=30, d=2)
2006 May 16
3
multiple plots in a function()
Dear all, I have the following problem: I have written a function genereating to plots, eg myfunction <- (data, some.parameters) { #some calculations etc . par (mfrow=c(1,2)) plot1(......) plot2(.....) } which works fine. But for analysing several variants, I tried a slope, eg: par (mfrow=c(5,5)) for ( i in 1:10) { myfunction(data, i) } Off
1997 Jul 28
0
R-alpha: R 0.50.a1: small patches for graphics and image demo
Applying the following patches closes the following task (part 1 was already taken care of). TASK: New Problems STATUS: Open FROM: <Kurt.Hornik@ci.tuwien.ac.at> New minor remarks: * The documentation for `image' still has the old order z, x, y. * Perhaps one should add `par(ask = T)' in the image demo? * Perhaps one should save the original value
2006 Dec 20
3
How to use strings from a data.frame as the argument of an expression() for plot
Greetings, I would like to use a data.frame with strings to feed the expression() in the title of a plot. The way I did this is: molecules <-data.frame(name=c("o3","no","no2"),expression=c("quote(O[3])","quote(NO)","quote(NO[2])")) for (mol in c(5,7,9)) { plot(x, y, type="b",
2000 Feb 02
1
Outer margin (oma) settings for pairs()
I propose the following small changes to pairs.default. The point is to allow control of the outer margin settings, so that there is for example room for legends. [Note also the issue re the setting of par()$usr on exit] ---------------------------------------------------------------- (1) Replace function (x, labels, panel = points, main = NULL, font.main = par("font.main"),
2006 Nov 30
1
strange error from R CMD check about xaxp
Dear R-devel, Kurt had alerted me to the problem that the randomForest package that I maintain has been failing checks in R-devel. However, I just can't see why or where it's failing. I'd very much appreciate any pointer. The failure occur when running the example code in varImpPlot.Rd: > varImpPlot(mtcars.rf) Error in par(opar) : invalid value specified for graphical parameter
2001 Nov 30
1
mosaic.by(): vectorizing args passed by apply()?
I've just started learning R, so I'm still on the steep part of the learning curve, but my enthusiasm was heightened by learning that there's a very nice implementation of mosaicplot(). As a learning project, I've already done a basic implementation of a pairs.table() function which does a mosaic scatterplot matrix, and now I'm trying to do conditional mosaic plots (discrete
2001 Jan 10
1
Auto Demonstration...
Dear List, Suppose I want to do a demonstration with R, which I will be showing a couple of different graphs (e.g. demo(graphics) ). However I want R to run through each graphics automatically. I can achieve this by changing the line in demo(graphics): opar <- par(ask = interactive() && (.Device %in% c("X11", "GTK", "windows",
2006 Dec 28
2
Plot window - save as Postscript question
R 2.4.0 for Windows The following plot appears as a squared window (as all r-plots) Not all subtitles are visible, but all subtitle will appear, when changing the aspect ratio of the plot window with the mouse to a wide format. But does not work when using the save as postscript menu item from the plot window. is there any solution for that? opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1,
2007 Aug 31
1
Question on shardsplot
Dear All, Would you please tell me how to display the sample No. on the map ? ---Below commands don't display the sample No.(from 1 to 150).--- library(som) library(klaR) iris.som3 <- som(iris[,1:4], xdim = 14,ydim = 6) library(klaR); opar<- par(xpd = NA) shardsplot(iris.som3, data.or = iris,label = TRUE) legend(3.5,14.3, col = rainbow(3), xjust =0.5, yjust = 0,legend =
2011 Jan 11
1
Alphabetic labels on multi-plot graphics
Is there a way to achieve lbl=c("a", "b", "c", "d") par(mfrow=c(2,2), ann=FALSE) for (t in 1:4){ plot(seq(from=1,to=2*pi,length=100), sin(t*seq(from=1,to=2*pi,length=100)), type="l") title(main=paste("(", lbl[t], ")", sep="")) } without having to use an object like 'lbl'? More generally: is it possible
2008 Oct 31
0
R help for invoking nmmin()
My code is as follows: #include <iostream> #include <cmath> using namespace std; #define MATHLIB_STANDALONE 1 extern "C" { #include "R_ext/Applic.h" } typedef struct TT{ double ** tempX; double * tempY; int tempN; } TT, *MM; double fn(int N, double * beta, void * ex){ double total = 0; int i = 0,j = 0; double * betaFn = new double[N]; MM tmp = (MM)ex;
2009 Mar 20
1
Howto Supress Extra Blank Page in gridBase
Dear all, I have a simple plot using "gridBase" like this. The problem occurs whenever I execute this code there is always a blank page created before the actual plot. How can we disable that blank page? I am using: R version 2.7.2 (2008-08-25) and gridBase version: 0.4-3 __ BEGIN__ library(grid) library(gridBase) opar <- par(no.readonly=TRUE) par(opar) grid.newpage()
1997 Aug 04
0
R-alpha: `axes' argument for barplot()
Clearly, barplot should have an `axes' argument. The following trivial patch does that ... pls apply. -k *** src/library/base/funs/barplot.orig Sat Aug 2 15:58:44 1997 --- src/library/base/funs/barplot Sat Aug 2 16:00:22 1997 *************** *** 1,7 **** "barplot" <- function (height, names.arg, col=NULL, border=par("fg"), beside=FALSE, space=0.2,
2001 Sep 08
0
barplot forces xpd=TRUE (PR#1088)
<<insert bug report here>> barplot hardcodes xpd as "TRUE" causing the bars to go outside of the plot region. True can be the default, but it shouldn't be the only option. *** barplot.R Sat Sep 8 10:15:16 2001 --- barplot.R.orig Sat Sep 8 10:03:39 2001 *************** *** 5,11 **** legend.text = NULL, beside = FALSE, horiz = FALSE, col =
2002 Feb 11
2
demo(graphics) problem under rw1041 (PR#1307)
I just downloaded rw1041 (the latest windows binary). Everything installed fine. When I start a new Rgui, and type "demo(graphics)", after pressing return to start, a graphics window appears. When I get to the second prompt: > opar <- c(opar, par(bg = "white")) > plot(x, ann = FALSE, type = "n") Hit <Return> to see next plot: at this