similar to: Set length of axes in lattice

Hello, My plots consist of 2 rows, 1 column, many pages I've managed to selectively turn of strips for the bottom panel and roll my own strip for the top par.strip.text = list(lines = c(0,3),cex=0.6) I have my own custom prepanel function too. What i'd like to do is turn off the x-axis for the top panel (since on a given page the xlim is same for both top and bottom panel, but the

Hello, I have some code which generates lattice objects. The function recieves serialized forms of the lattice objects which it then unserializes and then adds to an ArrayList<REXP>. REXPRaw rser = new REXPRaw( target ); //target contains the raw serialized forms of lattice objects rconn.assign("temp",rser); REXP ret =

Hello, How can i increase the padding between the axis and the data region(box just containing the figure) in xyplot? An example: new <- function(x){ if(x<0){ return(x^2) }else{ return(x) } } x <- seq(-1,1,length.out=100) y <- sapply(x,new) sc=list() sc$alternating=0 sc$tck=0 xyplot(y~x,type='l', aspect=0.05, scales=sc, col='black',

Hello, My plot has two curves on different scales. To create the scale on the extreme right hand side of a panel I followed the example in panel.axis (in this example, the tick marks are at the same location and labels are the same too) axis=function(side, ... ) { ylim <- current.panel.limits()$ylim if(side=="left"){

Hello, I have a multi-page display each consisting of two-panels above each other. I need to draw a line from the top panel to bottom panel. Using current.vpTree() i find that "plot1.panel.1.2.vp" and "plot1.panel.1.1.vp" are the top and bottom ones respectively. I am using the following code(inspired by Paul Murrell's R Graphics) to draw a line. (All the

Hello, I was trying this bit of code (i know it is an extreme case) g=function(r){ if(r==1) return(list(x=1)) else return(list(x=g(r-1))) } For z=g(500), the code runs but when I print z i.e >> z I get <environment: R_GlobalEnv> *** caught bus error *** address 0x1, cause 'non-existent physical address' Possible actions: 1: abort (with core dump, if enabled)

Hello, How can i 'fix' the following output. v=viewport(x=216/2, y=216/2,w=216, h=216,default.units = "bigpts") pushViewport(v) x=c(119,130,140,151) y=c(124,124,124,124) grid.points(x,y,size=unit(1,"bigpts"),default.units="bigpts",pch=".") grid.points(x-2,y,size=unit(1,"bigpts"),default.units="bigpts",pch=".")

Hello, I have to write single Long to a server written in java. The server passes the input as in.readLong() // it expects to receive 8 bytes In Python, i can do it by sending struct.pack( "!q", value) However, I have tried this writeBin(length(x),con=conn,endian="big") #conn opened in binary But the response on the server side is wrong, eg. 1 is received as

Hello, I'm using lattice and opened an X11 device with the following call X11(width=5,height=5,pointsize=1) I then ran the following code library(lattice) x<-rnorm(30,sd=2) y<-runif(30) xyplot(y~x,pch=".",col="black",cex=1) If i remove "cex=1", not all the points are plotted. From ?X11, i read,"pch='.' with cex=1 corresponds to a

Hello, I have a stripplot with 200+ labels i.e i have network connections. The y-axis are the server port numbers and am graphing the number of packets in a connection. Roughly stripplot(totpacks~portnum,data=network) Due to the large number of server ports in my dataset, the y-axis labels overlap so I would like to split it across several panels(1 panel per page) with about 25-50 per

Hello, I call a function via .Call passing to it a raw vector(D) and an integer(I) The vector is a series K1,KData1, V1,VData1, K2, KData2, ... where the integer K1 is the length of Data1 and similarly for Ki (wrt Datai)(similarly for V*) There 2*I such pairs( (Ki,KDatai), (Vi,VDatai)) The numbers Ki(and Vi) are written in network order. I am returning a list of I elements each element a

Hello, I have a shingle A and B. A has 5 levels and B has 4 levels. Also, I have 8 levels of a factor C. I wish to xyplot( x ~ y | C *A *B,data=data), I think this is how the lattice conditioning works: If i'm not mistaken, all possible combinations of C,A,B , a subset of the data is accordingly taken and x~y is plotted. However, I have empty sets for some levels and these are

Hi, I need to integrate a 2D function over range where the limits depend on the other e.g integrate f(x,y)=x*y over {x,0,1} and {y,x,1}. i.e \int_0^1 \int_x^1 xy dydx I checked adapt but it doesn't seem to help here. Are they any packages for this sort of thing? I tried RSitesearch but couldn't find the answer to this. Many thanks for you help. Regards Saptarshi Saptarshi Guha

Hi, I have another question. Is there any command that waits for key input? I am running R on OS X, so getGraphicsEvents doesn't work. I have put some debug print messages in a function and would like to pause the code every time the message is printed and continue on a keypress. Thank you Saptarshi Saptarshi Guha | sapsi@pobox.com | http://www.stat.purdue.edu/~sguha

Hi, After a few modifications in the makefiles, I successfully compiled the Qt device (written by Deepayan Sirkar) for OS X 10.4.9 on a Powerbook. However when loading into R If i remove this line from zzz.R in qtutils/R grDevices::deviceIsInteractive("QT") and then install >library(qtutils) loads fine and the QT() calls returns a QT window, however, if i switch to

Hi, I'm trying to learn how a package works but substituting a parituclart function with my own (basically the original one with some debug statements). The package is lattice and the method is "print.trellis" which is a S3 method and is not visible. To replace this, i sourced a file with the rewritten print.trellis, and the old one was replaced. However, i get this error

Forgot to send to the list. Begin forwarded message: > From: Saptarshi Guha <saptarshi.guha@gmail.com> > Date: September 19, 2008 1:43:50 PM GMT-04:00 > To: Gabor Grothendieck <ggrothendieck@gmail.com> > Subject: Re: [R] Lines between panels in lattice > > Certainly. > > x=cbind(runif(10),rnorm(10),c(rep(1,5),rep(2,5))) >

Hello, I downloaded R-2.5.1 and configured it on a AMD x86-74 running Redhat. During compilation i get this error configure --prefix=$HOME/mine make mkdir -p -- ../../../../library/methods/libs make[5]: Leaving directory `/home/sguha/tmp/R-2.5.1/src/library/ methods/src' make[4]: Leaving directory `/home/sguha/tmp/R-2.5.1/src/library/ methods/src' make[4]: Entering directory

Hello, I have a function that creates an expression object with some variables substituted e.g foo <- function(s){ expression({ v <- s print(v) }) } Thus foo returns an expression, however the expression has the symbol 's' contained within it and thus returns an error when eval'd e.g x <- foo(10) eval(x) Error in eval(expr, envir, enclos) : object 's'

Hello, The following code produces a quadrilateral: q<-matrix(c(1,3,1,2,3,1,2,4,2,1,4,2),nrow=4,byrow=T) qc<-xyz.coords(q) wireframe(z~y*x,qc) I have 2 questions 1) How can i remove the bounding box i.e the cube encompassing the quadrilateral? 2) Is there any function to get the 2D coordinates of the quadrilateral actually used in the final plot ? I could manually