similar to: xyplot,grid.text segfault (PR#948)

Using lattice the posscript(file="") device gives false margins: zz <- data.frame( y=rnorm(100),x=rnorm(100),z=round(rnorm(100)), g=as.character(rep(1:2,50))) postscript(file="/tmp/tmp.ps") xyplot(x~y|g,data=xx) dev.off() whereas dev.print(postscript,file="") works fine dev.print(postscript,file="/tmp/tmp.ps")

g'day R friends, can anyone please help me with a frustrating merge? The number of rows of a resulting merge is the smaller of the 2 dataframes used as input. What am I doing wrong? I'm using 1.1.0 on redhat 6.2 thanks, John Strumila > xx[1:10,] datetime c 948992940 948992940 0 948993000 948993000 0 948993060 948993060 0 948993120 948993120 0 948993180 948993180 0

Hi, I have a basic question about aligning date labels for the x-axis in an xyplot so that they align with the grid lines from the panel.grid argument. For example, with x <- data.frame( date = seq(as.Date("2005/01/01"), as.Date("2006/06/01"), length.out = 20), value = runif(20)) xyplot(value ~ date, data = x, panel = function(x, y, subscripts, ...) {

Hello, I have been trying to make a graph that have error bars and text at specific position. I used the following code from the help file of xYplot(Hmisc) as an example except I add a myPanel function, which is just supposed to add letters from the alphabet at the position aligned at y = 3. It constantly gives me error: "Error using packet 1 argument "subscripts" is

I would like to add auxiliary information to the bottom of two strips on each panel that comes from a table look-up using the values of two variables that define the panel. For example I might panel on sex and race, showing 3 randomly chosen time series in each panel and want to add (n=100) in the bottom strip to indicate the 3 curves were sampled from 100. Is there a not-too-hard way to do

Hello folks, So I'd like to use the lattice xyplot function, but here's the thing; I'd like a grid on it and a bit of annotation (line and text). So I tried just using the panel.grid, panel.text and panel.line but they didn't work after the plot had been called seemingly using the device coordinate system. So I made a new proxy panel function (calling panel.xyplot and passing

Perhaps this might be a font problem, it might be that my font dirs are broken (but I don't think so, it is a standard potato inst.): > xyplot(rnorm(10) ~ rnorm(10) ,main=list("???dsa",cex=2)) ...displays German special characters false (as greek letters). Curiously these work o.k.: > xyplot(rnorm(10) ~ rnorm(10) ,main="?dsa") > xyplot(rnorm(10) ~ rnorm(10)

Perhaps this might be a font problem, it might be that my font dirs are broken (but I don't think so, it is a standard potato inst.): > xyplot(rnorm(10) ~ rnorm(10) ,main=list("???dsa",cex=2)) ...displays German special characters false (as greek letters). Curiously these work o.k.: > xyplot(rnorm(10) ~ rnorm(10) ,main="?dsa") > xyplot(rnorm(10) ~ rnorm(10)

One Question: if I make a lattice-plot (beware: under development!) with a special layout e.g. c(2,2,4): p1 <- xyplot(y~x|id,data=data,layout=c(2,2,3)) is there a way to print.trellis e.g. the second page of the trellis object "p1"? print.trellis(p1,page=2) #!wrong! I want this to automatically dev.print the pages (no, I don't want multiple postscript pages). If this

The following reproducable code shows the setting of my problem: set.seed(260808) n = 50 x = rnorm(n) y = rnorm(n) z = ceiling(runif(n,0,4)) g = runif(n,0,6) G = factor(ceiling(g)) xyplot(y ~ x | G) plsy <- trellis.par.get("plot.symbol") plsy$pch = z trellis.par.set("plot.symbol",plsy) xyplot(y ~ x | G) plsy$pch = as.character(z)

All, I can't seem to get auto.key to work properly in an xyplot that is employing panel.text. Specifically, I often change the default grouping colors then use auto.key accordingly, but for some reason the same functionality isn't working for this different type of plot. Any help much appreciated. Cheers, David library("lattice") dat = data.frame( Y = c(rnorm(18,1),

Hi, Is there a command that will give the total size of an R object in bytes? thanks Nicholas -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-help mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html Send "info", "help", or "[un]subscribe" (in the "body", not the subject !) To: r-help-request at

Dear R users, My apologies for a simple question for which I suspect there is a simple answer that I have yet to find. I'd like to plot panels in lattice with different graphical parameters for the axes. For example, the code x<-rnorm(100) y<-rnorm(100) z<-c(rep(1,50), rep(2,50)) library(lattice) xyplot(y~x|z) plots two panels with the default black axes. Running the following

I wish to create a multipanel plot (map) from several datasets ("d" and "q" in the example below). I can condition the main xyplot statement on the "site" variable, but I don't know how to pass a conditioning variable to panel.xyplot plot so that the x-y coordinates from dataset q are only plotted at the appropriate site. library(lattice) d <-

Hallo, I'd like to add grid lines to a lattice graph having 2 series of Y data. See these 2 examples: data(iris) [1] xyplot(Sepal.Length + Sepal.Width ~ Petal.Length , data = iris, allow.multiple = TRUE, scales = "same",type="l", ) [2] xyplot(Sepal.Length + Sepal.Width ~ Petal.Length , data = iris, allow.multiple = TRUE, scales =

Hi list, This is a very basic question about lattice: I wish to add some vertical lines in each panel of a xyplot as demonstrated in this example: > library(lattice) > > xx <- seq(1, 10, length=100) > x <- rep(xx, 4) > y <- c(cos(xx), sin(xx), xx, xx^2/10) > fact <- factor(rep(c("cos", "sin", "id", "square"), each=100))

Dear List, Some days ago, it was posted in this list a question regarding "How to generate graphics (jpeg) files dynamically". Although it was responded, there is a particular case in which I do not find the rigth solution. My question also goes in the same direction but for the particular case of generating jpeg/bmp or png files when using xyplot (grid/lattice libraries) and the

I have stumbled across something in the Lattice package that is vexing me. Consider the code below: __________________________________________________________ library(lattice) myData <- expand.grid(sub = factor(1:16), time = 1:10) myData$observed <- rnorm(nrow(myData)) myData$fitted <- with(myData, ave(observed, sub, FUN = mean)) myData$event.time <- with(myData, ave(observed, sub,

Hi - I am not R expert and I would appreciate your time if you can help me about my xyplot question. I would like to add text (p-value) in a 4 panels xyplot. I thought panel = function{} should work but I am not sure where I did it wrong. The error message from the following code is "Argument subscripts is missing with no default values" xyplot(GLG ~ PD | factor(TRT) , groups =

Hi: In lattice, how does one handle separate graphical behavior for two different factors? In the xyplot below, the objective is to use the levels of one factor to distinguish corresponding shapes and colors, and the levels of the other factor to perform level-wise loess smooths. # Illustrative data: d <- data.frame(time = rep(1:8, each = 6), val = rnorm(48), gp1 =