search for: linejoin

Hello R Users! I'm trying to use the panel.linejoin function to draw points and lines (type="o") but it wouldn't do it. Modifying the panel.linejoin function as such (adding type argument to the panel.lines call). *original* panel.lines(vals[xx], yy, col = col.line, lty = lty, lwd = lwd, ...) *modified p...

...ents for each location, and my datalogger organizes the output like this: Date A1L A2L A3L 2005-07-14 22:00 208.1 -178.5 196.8 2005-07-14 22:10 207.9 -184.3 200.0 Now I'm having trouble plotting A1L, A2L, A3L on the same plot as a function of Date. I thought I would try panel.linejoin, like so: xyplot(data=redox2, A1L + A2L + A3L ~ Date, panel=function(x,y,...){panel.linejoin(x,y,horizontal=F,col=1,...)}, scales=list(x=list(tick.number=10))) But of course, what I get is the mean of the measurements from those three columns plotted as one line, when what I want is a separat...

Dear All, I am using xyplot() with many groups like this: statselect <- levels(dat$stat) xyplot(relmse~T|lambda, groups=stat, data=dat, panel = panel.superpose, key=simpleKey(statselect, lines=T)) However, I want lines not scatterplots and if I set panel.groups=panel.linejoin that connects the lines according to the relmse and not according the consecutive values of T. Is there a short solution to this very simple problem, which doesn't require custom made panel function? Thanks in advance, Kati

...es of scatterplots with Lattice's xyplot(). Some of the plotting symbols are squares with thick borders. The corners of the squares are rounded by default; I would like them to be square. In base graphics this is easily done with par(ljoin = "mitre"), and in grid graphics with gpar(linejoin = "mitre"). Is there an analogous parameter in Lattice? Passing ljoin as an argument to xyplot() or panel functions doesn't seem to work, and I can't find anything promising in lattice.par.get(). Thanks, Andrew Morgan Department of Genetics University of North Carolina - Chapel...

On Mon, 15 Jul 2002 08:39:05 +0100, Paul Hewson <PHewson at devon.gov.uk> wrote regarding "RE: [R] lattice question: adding slopes to bwplot" Hi, Thanks. It made sense indeed: enough to discover the panel.linejoin function which does what I was looking for. <error here> I also understand now why I didn't find this, and associated, routine: library(help="lattice") does not list them, and on my installation, help(panel.functions) (which might) returns an error. </error> So what wor...

...each=30) sklong <- melt(Skulls, id=c("epoch", "year")) bwplot(value ~ epoch | variable, data=sklong, scales="free", ylab="Variable value", xlab="Epoch", panel = function(x,y, ...) { panel.bwplot(x, y, ...) panel.linejoin(x,y, col="red", ...) } ) bwplot(value ~ as.factor(year) | variable, data=sklong, scales="free", ylab="Variable value", xlab="Year", panel = function(x,y, ...) { panel.bwplot(x, y, ...) panel.linejoin(x,y, col="...

...5454" + sodipodi:rx="22.727272" + sodipodi:cy="31.636364" + sodipodi:cx="32.727272" + id="path10014" + style="opacity:1;fill:#000000;fill-opacity:0.49714285;stroke:none;stroke-width:1.50907874;stroke-linecap:butt;stroke-linejoin:miter;stroke-miterlimit:4;stroke-dasharray:none;stroke-dashoffset:0;stroke-opacity:1;filter:url(#filter11994)" + sodipodi:type="arc" /> + <path + sodipodi:type="arc" + style="opacity:1;fill:url(#radialGradient3151);fill-opacity:1.0;stroke:url...

...ge the color of box, and how to change the shape of the point in the box. I want it like other boxplot, like a horizontal line. 2) In every lattices, I want to add a mean line of the group. I try the >panel.abline(h) But I find in very lattice add the same line. Then I try the "panel.linejoin" etc. But I can not get my wish plot. Could anyone help me to settle these problems? Thanks very much! Best Regards! Ivy Li仯仺伬侇佽仭仯仼 YMS in Production & Testing Semiconductor Manufactory International(ShangHai) Corporation #18 ZhangJiang Road, PuDong New Area, Shanghai, China Tel: 021-5...

...ripts] == group.values[i]) current.val <- group.values[i] panel.stripplot(x[id], y[id], jitter.data = FALSE, horizontal = FALSE, col = trellis.par.get()$superpose.symbol$col[i], pch = trellis.par.get()$superpose.symbol$pch[i]) panel.linejoin( x[id], y[id], horizontal=F, col = trellis.par.get()$superpose.symbol$col[i], lty = trellis.par.get()$superpose.line$lty[i], lwd = trellis.par.get()$superpose.line$lwd[i]) } }, main = "Some Text", key = list( columns...

...ies the number swim from 1 to 6. Difference is my variable of interest (random). The book says I should run something like this: > library(nlme) > data(FREE) #FREE is my dataset > xyplot(Difference~Swim|Type, group=Swimmer, data=FREE, + panel.groups=function(x,y,...){ + panel.linejoin(x,y,horizontal=FALSE,...)} + ) > m1 <- lme(Difference~Swim+Type, data=FREE, random=~1+Type|Swimmer) > m2 <- update(m1, random=~1|Swimmer) I've pretty much decided that xyplot doesn't work. Instead, I think plot will work much better. I keep getting errors about Type. Can...

Hello, I'm running into a frustrating problem with the legend on a lattice plot I'm working with. The plot is a stripplot with a panel.linejoin () line running through the mean of each of the categories. Thus there are both points and lines in the plot. In trying to make a key for the plot, I can't figure out how to make a legend for both the points and the lines. What I'd like is something like: prices * means -----...

...e the lines and color of the legend in the "key" to the same lines and color as in the panel.groups. bwplot(means ~ age | scales , dat, panel = "panel.superpose", groups = sex,scales = list(x = list(rot = 45),cex=0.7,alternating=2), panel.groups = "panel.linejoin", lwd=1.2,lty=c(2:3),type="b",col=c ("red","green"), ylab = list(label = "mean value", cex = 0.8), xlab = list(label = "scales", cex = 0.8), key = list(lines = Rows(trellis.par.get("superpose.line"),c(1:2, 0)),...

...e actual plotting area is minimal CairoPNG("example.png",width = 480, height = 480, dpi=600, pointsize = 12, bg = "white") bwplot(decrease ~ treatment, OrchardSprays, groups = rowpos, panel = "panel.superpose", panel.groups = "panel.linejoin", xlab = "treatment", key = list(lines = Rows(trellis.par.get("superpose.line"), c(1:7, 1)), text = list(lab = as.character(unique(OrchardSprays$rowpos))), columns = 4, title = "Row position")) de...

...ing 39.90385 15 Kvinnor SF 2-utskrivning 64.62264 16 Kvinnor VT 2-utskrivning 51.97531 bwplot(Medelvärde ~ Skalor| Kön , kt, panel = "panel.superpose", groups = Tillfälle,scales = list(x = list(rot = 45),cex=0.7,alternating=2), panel.groups = "panel.linejoin",lty=c(1:3),lwd=3,col=c("steelblue","grey50","green4"), ylab = list(label = "skalpoäng (0-100)", cex = 0.8), xlab = list(label = "skalor", cex = 0.8), key = list(lines = Rows(list(col=c("steelblue","grey50&qu...

...doesn't Any idea? Thanks a lot Christophe # Example: #------------------------------------- library(ggplot2) library(lattice) library(grid) one <- bwplot(decrease ~ treatment, OrchardSprays, groups = rowpos, panel = "panel.superpose", panel.groups = "panel.linejoin", xlab = "treatment", key = list(lines = Rows(trellis.par.get("superpose.line"), c(1:7, 1)), text = list(lab = as.character(unique(OrchardSprays$rowpos))), columns = 4, title = "Row position"))...

...auto.key=TRUE)) ##********************************************************************** Main question: I want to create a plot that looks like Example 3, but with the coloured lines of Example 1. Suggestions? I've looked in RSiteSearch() for both "panel.average" and "panel.linejoin" but found nothing addressing this. Side question: I also read the source code to panel.average, panel.loess and panel.superpose. Which leads to a side question; how do I determine what parameters are being passed within '...'? I tried recreating my panel.groups function above as an...

...nd, default.units="native", gp = gpar( col = colour, lex = linewidth, lty = linetype, lineend = "butt" ) ) grob.points <- pointsGrob(x, y, pch=shape, size=unit(size, "char"), gp = gpar( col = colour, fill = fill, lex = linewidth, linejoin = "mitre" ) ) gTree(children = gList(grob.lines,grob.points)) } # example of use g <- barbedGrob(size=sample(1:3, 10, repl=T), fill=alpha("white", 0.3), col=alpha("cadetblue4", 0.8), linewidth=5, space=1.2) pushViewport(vp=viewport(width...

I have a data frame with three columns, type (a factor with two values: "Monolithic" and "Compositional"), size (numeric), and states (numeric). I want to create a plot where size goes on the x-axis and states goes on the y-axis. In this plot, I want two lines, one where the type is "Monolithic" and one where the type is "Compositional". I think this can

Hi, The behavior of panel.average has changed. In March 2010, I plotted the attached r_plotViolinOfAnnualE_old.eps. (I don't know the version of R). Today, I plotted the attached r_plotViolinOfAnnualE_new.eps using R version 2.12.0 (2010-10-15). Both figures were produced via the same script: ... plot <- bwplot(year ~ Eann, data=df, horizontal = T, xlab = "E / mSv", ylab =

...p up default number of contours * stat_density2d: make number of grid points used for density estimation user controllable (implements #9) * geom_bin now allows you to set whether bins used intervals of the form (a, b] or [a, b) with the "right" parameter (implements #20) * geom_path: linejoin, lineend and linemitre are now user controllable (implements #24) * scales: all scales check that breaks are supplied if labels are, and that breaks and labels are the same length (implements #40) * scales: if breaks are a named vector, the names will be used as labels (thanks to suggestion b...