Displaying 20 results from an estimated 1000 matches similar to: "ANN: rproto v1 (Protocol Buffers and R)"
2009 Sep 11
0
ANN: rproto v1 (Protocol Buffers and R) [repost]
Hello,
(Previous message was scrubbed)
I apologize if this is not the list for package announcements. Having
said that I've released a package called rprotos which implements a
simple
serialization using Googles protocol buffers[1].
The package also includes some miscellaneous functions for
writing/reading variable length encoded integers, and Base64
encoding/decoding related functions.
The
2008 Sep 19
0
Fwd: Lines between panels in lattice
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)))
>
2008 Sep 19
1
Lines between panels in lattice
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
2009 Sep 23
2
Crash due to extreme example
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)
2008 Dec 12
1
Writing a Long across the network?
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
2008 Nov 30
1
Rserve and creating a list of lists
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 =
2008 Oct 06
1
Lattice and Axis height
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
2008 Nov 14
1
Splitting a lattice stripplot across several pages
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
2008 Apr 03
1
Question on spacing around plot and box in lattice
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',
2008 Sep 19
1
Axes Labels on the Right side of lattice panel
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"){
2008 Oct 05
1
Conditioning variables in lattice - not all combinations
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
2007 Feb 13
1
Multidimensional Integration over arbitrary sets
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
2007 Mar 06
1
Waiting for Key input
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
2007 Feb 06
1
A question regarding cex and pch="." in lattice
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
2008 Feb 17
1
Set length of axes in lattice
Hello,
It is possible to set the aspect ratio of the Y-axis to the X-axis
in xyplot
(a) xyplot(y~x,aspect=1.8)
Suppose I have only 1 panel and i wish to set the length of the X-
axis to 2" keeping the same aspect ratio as in (a). I would also like
to keep the same scales.
I suppose i need to do something in prepanel but what?
Is there any function i can call to set the actual
2009 Sep 20
1
Return a list from a .Call but segfaults
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
2007 Mar 06
1
Substituting functions in package - Lattice
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
2006 Dec 05
1
A question on grid - grid.points not spaced properly
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=".")
2007 Aug 05
2
Question regarding QT device
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
2009 Mar 24
0
A question about rJava and the classpath
Hello,
Since this an R package, I'm sending the email. I'm loading all the
jar files as:
library(rJava)
hadoop <- Sys.getenv("HADOOP")
allfiles <- c(list.files(hadoop,pattern="jar$",full.names=T),list.files(paste(hadoop,"lib",sep=.Platform$file.sep,collapse=""),pattern="jar$",full.names=T))
allfiles <-