search for: xleft

...apt maybe (i don't need time series really?) :/ : (http://tolstoy.newcastle.edu.au/R/help/04/03/1456.html) ## ## Description: A simple function which plots two time series on one plot where ## the series can have different value intervals over the same time interval. ## Usage: ts.plot.2Axis(xleft, xright) ## Arguments: xleft is the time series for the left vertical axis and xright ## is for the right axis. xleft and xright are defined as time series with ## the 'ts' function in package ts. ## ts.plot function must be available, do library(ts) to ensure this if ## necessary. ##...

...ds can I use? I have composed a simple R function to do this. See usage example in the function description. ## ## Description: A simple function which plots two time series on one plot where ## the series can have different value intervals over the same time interval. ## Usage: ts.plot.2Axis(xleft, xright) ## Arguments: xleft is the time series for the left vertical axis and xright ## is for the right axis. xleft and xright are defined as time series with ## the 'ts' function in package ts. ## ts.plot function must be available, do library(ts) to ensure this if ##...

Hi all, I am looking for a clever way to create the following graph using R: I got information on the shares of some subgroups over time (summing up to 1 in each year). The graph I want to create should display the development of the individual shares over time by shading rectangulars for each share in a different color. Is there a clever of doing this? Thanks for your help Stefan

...aph(rbinom(1000, 20, .7), grouping=TRUE, ngroups=5) - - - - - - - - - - - - - - - multiple.distribution.graph Description multiple.distribution.graph produces a number of distribution graphs of the data values, side by side. Usage multiple.distribution.graph(xx, grouping=FALSE, ngroups=10, xleft=0, xright=1, xmiddle=.5, xband=.5, xlab=c(1:length(xx)), ylab='', pch=16, lines=FALSE, lty='solid') Arguments xx list of numeric variables, a vector of values for which to produce the distribution graph. Missing values are allowed, and are disregarded. grouping logical, if FA...

...facB = toydf[[2]], x = toydf[[1]], y = rnorm(1000)) xyplot(y ~ x | facA, groups = facB, data = toydf, panel.groups = function(x, y, subscripts, ...) { panel.xyplot(x, y, ...) lindx <- which(y[subscripts] == max(y[subscripts], na.rm = TRUE)) xleft <- mean(x[lindx], na.rm = TRUE) fit <- lm(y[x >= xleft] ~ x[x >= xleft]) panel.abline(fit) }) ---<---------------cut here---------------end---------------->--- i.e. the left limit for fitting the line is defined by the mean of x values where y is equal to...

...lly ignored, as in the above code. With asp not set, R plays close attention to the value of ylim. This is not intuitive behaviour, or is it? How can I set the aspect ratio, and simultaneously set the plot region? The aspect ratio is one number and the plot region is given by four numbers (xleft, xright, yleft, yright). Logically, these 5 numbers are independent of each other and arbitrary, provided xleft<xright and yleft<yright. This should give a one-to-one bijection between 5-tuples and plots, determined up to a change of scale that is uniform in the x- and y-dirctions. My...

...y ... ... ... ... ... 115 127 ... ... ... ... ... 120 129 ... ... ... ... ... 0 0 ... ... ... ... ... 135 162 .... ... ect... i need to ask R tell me how many x-y pairs contain coords that are non-zero and fall within values that i'm callilng xleft, xright, ybottom and ytop and fall between certain indicies of the data frame. i am calling the indexes by referring to numbers i have storied in other variables. i am really looking for an efficient way to do this since when i try to pull the x and y columns out and assign them to their own varia...

Hi there, I found one reference to add a reactangle behind a plot using plot(...,add=T), I tried this but didn't obtain the desired result. If a I have the following code: plot(x,y) rect(xleft, ybottom, xright,ytop,col='green) The rectangle appear on top of the plot. Any help will be greatly appreciated, Judith ____________________________________________________________________________________ Never miss a thing. Make Yahoo your home page.

...ot(table(type3m[[xn]]), main = paste ("Barplot of", xn), width=0.75,legend.text=barnamesm, xlim=c(0,4),ylim=c(0,400)) The plots are produced and printed into a *.ps file. However, R gives an error message and aborts the script. The error message is: Fehler in rect(as.double(xleft), as.double(ybottom), as.double(xright), : ungültiges erstes Argument (it's in German. In English, it says something like "Error in rect(as.double(xleft), as.double(ybottom), as.double(xright), : invalid first argument) It seems to be some problem with the barplot fun...

Hi, I'm trying to construct a legend which has four lines of text and associated symbols. The first two symbols need to be normal lines which vary only in colour. The second two symbols should have filled boxes. How do I suppress the fill boxes in the first two lines? J.

Hi, I am looking for options to plot the following type of matrices: "A" "B" "C" "D" "A" "A" "C" "C" "A" "A" "A" "C" as a image like this: http://www.phaget4.org/R/image002.jpg

...NULL accidentally. It is easily fixed by adding one line to lrect -- see example and hack below ... I wasn't sure if this should be submitted as an R bug since it is part of a package, but a core/recommended package ... Ben Bolker x = runif(100) y = runif(100) my.lrect <- function (xleft, ybottom, xright, ytop, x = (xleft + xright)/2, y = (ybottom + ytop)/2, width = xright - xleft, height = ytop - ybottom, col = "transparent", border = "black", lty = 1, lwd = 1, alpha = 1, just = "center", hjust = NULL, vjust = NULL, ...) { if (mi...

Hello I am using lattice dotplot and I would like to put the strip under the panel. I found the code “strip” is for the strip above the panel, and “strip.left” for the strip left to the panel. Please kindly advise how to write the code for the strip under the panel Thank you Elaine [[alternative HTML version deleted]]

Hi, I'd like to construct a somewhat unusual barplot. In "barplot" I use beside=F as I'd like to have stacked bars. The height of each bar is always the same. Information in my plot is coded in the color of the bar. I therefore need to be able so assign a different combination (or order) of colors to each individual stacked bar. In the example below, the combination of

On 2024-06-06 4:37 a.m., Yosu Yurramendi wrote: > What is the HEX code for "transparent" color? > I've tried "00000000" "FFFFFF00" "FFFFFFFF", but they don't work. If the other answers don't solve your problem, you should give us some context. Not all graphics functions in R can handle transparency, so please show us some reproducible

Dear all, is there a possibility to display pictures (jpegs, pngs, ...) in R? Maybe the following (hypothetical) code makes it clearer what I have in mind: plot(x=0:100, y=0:100, type="n") rect(xleft=25, xright=75, ybottom=30, ytop=95, fill="apicture.png") Thank you, Roland [[alternative HTML version deleted]]

Dear R community, I would wish to color the background of my histogram differently to the left and right of an abline... Can you please help? Thankin you, Georg. **************************** Georg Ehret JHU Baltimore - USA [[alternative HTML version deleted]]

...quot;); panel.xyplot(x,y, type="l", ...); panel.grid(0,3); panel.abline(v= Hours24-4*3600, lty=2, col = rgb(0,0,1,0.5)); panel.abline(v=Hours24+6*3600, lty=2, col = rgb(0,1,0,0.5)); bb <- par('usr') y0 <- bb[3]; for (i in seq(r[1], r[2], by=48*3600)) panel.rect(xleft=i, ybottom=y0, xright=i+24*3600-1, ytop=bb[4], col = rgb(0.75,0.75,0.75,0.3), border = NA); panel.axis(1, at= Hours24-4*3600, labels=as.character(format(Hours24-4*3600,"%H"))); #panel.axis(1, at= Hours24+6*3600, labels=format(x,"%H")); #panel.axis(3, at= Hours24, labels=fo...

Dear list Is there any way that I can color the background (not the plotted points) of each box in "pairs" ? I'd like to color them according to the correlation coefficiency of each data pair. thanks. N

Dear all, Here is a simplified version of a function I made: ############ plotfunc<-function(x){ #x a vector cat("please select two points","\n") plot(x) points<-locator(2) return(points) } ############ Using R version 1.01 for mac os x (aqua GUI) I would like to know what should I do to make sure that my text line will be printed prior to the drawing of the plot.