search for: gray60

...ualize time series of water level measurements. The code I wrote does exactly what I want: plot(x, a$B112, axes=FALSE, ylim=c(405,410), col="red", pch=15, type="o", ylab="metres above sea level", main="Main Plot Title") axis(2, at=405:410, tck=1, col="gray60") axis.Date(1, at=seq(as.Date("2004-01-01"), as.Date("2008-06-01"), by="month"), labels=seq(as.Date("2004-01-01"), as.Date("2008-06-01"), by="month"), tck=1, col="gray60") Now I wanted to shift the data visualized by 6 mo...

...t; artificial example. > > > > plot(1:100, seq(405,410,length=100), axes=FALSE, ylim=c(405,410), > > col="red", pch=15, > > type="o", ylab="metres above sea level", main="Main Plot Title") > > axis(2, at=405:410, tck=1, col="gray60") > > axis.Date(1, at=seq(as.Date("2004-01-01"), as.Date("2008-06-01"), > > by="month"), labels=seq(as.Date("2004-01-01"), as.Date("2008-06-01"), > > by="month"), tck=1, col="gray60") > > > > I...

Eric Recordé un ejemplo rápido ## Setup up coordinate system (with x == y aspect ratio): plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab = "y", asp = 1) ## the x- and y-axis, and an integer grid abline(h = 0, v = 0, col = "gray60") text(1,0, "abline( h = 0 )", col = "gray60", adj = c(0, -.1)) abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3) abline(a = 1, b = 2, col = 2) text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1)) ¿Es eso lo que necesita? Javier Marcuzzi El 18...

..."), as.Date("2009-01-01")), ylim=c(423,428), col="red", pch=15, type="o", ylab="Kote [m a.s.l.]", main="Dummy Plot") points(x, a$P2, col="red", pch=17, type="o", lty="dotted") axis(2, at=423:428, tck=1, col="gray60") axis.Date(1, at=seq(as.Date("2004-07-01"), as.Date("2009-01-01"), by="month"), labels=seq(as.Date("2004-07-01"), as.Date("2009-01-01"), by="month"), tck=1, col="gray60") So far, I've been using this type of date for...

...cordé un ejemplo rápido >> >> ## Setup up coordinate system (with x == y aspect ratio): >> plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab = "y", asp = 1) >> ## the x- and y-axis, and an integer grid >> abline(h = 0, v = 0, col = "gray60") >> text(1,0, "abline( h = 0 )", col = "gray60", adj = c(0, -.1)) >> abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3) >> abline(a = 1, b = 2, col = 2) >> text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1)) >> >...

...e=..., names=mycolors)) to define my own color palette. After doing this, the names `mycolors' are not stored in palette() anymore, so that palette() returns a mix of built-in color names and RGB values. Eg: > palette() [1] "black" "#EAA200" "#FF6633" "gray60" I wish that palette() would return a _named vector_ like this: > palette() black orange tomato gray "#000000" "#EAA200" "#FF6633" "#999999" One application: I want to specify colors by name, where the names returned by palette...

...5294 1.1307222 cry7y 84 1.43454545 1.2690701 cry10y 120 0.500000 1.5101821 cry13y 156 0.165000 7.1850000 using the following code: graph<- ggplot(data=NULL, aes(table[,1],table[,2]))+ geom_line(data=NULL, aes(table[,1],table[,2]), color="gray60") + geom_errorbar(aes(ymin=mrsa, ymax=mrsa+semrsa), width=.35, color="gray60")+ graph The line starts obviously at 3 month, I have tried rbind to add a first line of zeros but since I am putting Error bars in the graph the ggplot renders an error. The data used for errorbars is:...

...t; Eric > > Recordé un ejemplo rápido > > ## Setup up coordinate system (with x == y aspect ratio): > plot(c(-2,3), c(-1,5), type = "n", xlab = "x", ylab = "y", asp = 1) > ## the x- and y-axis, and an integer grid > abline(h = 0, v = 0, col = "gray60") > text(1,0, "abline( h = 0 )", col = "gray60", adj = c(0, -.1)) > abline(h = -1:5, v = -2:3, col = "lightgray", lty = 3) > abline(a = 1, b = 2, col = 2) > text(1,3, "abline( 1, 2 )", col = 2, adj = c(-.1, -.1)) > > ¿Es eso lo que nece...

...it almost does not apear in the graph. I was trying the plot.window but with no success. Can someone help me with this? If possible, I'd like to plot this curves in a perfect cartesian plane. f = function(x) { x^2 } f2 = function(x) { -x^2 } plot(f,-10,10) abline(h=0, v=0, col = "gray60") curve(f2,col="orange", add=T) Thanks in advanced! *pablo de camargo cerdeira* pablo.cerdeira@gmail.com | pablo@fgv.br Phone: +55-(21)-3799-6065 [image: Facebook] <http://www.facebook.com/pablo.cerdeira>[image: LinkedIn]<http://br.linkedin.com/in/pablocerdeira>[image...

...on the label using the actual value contained in the date column of the data.frame (which is a "date" variable type). Fixing the position as I have doesn't seem...pure? 4) The grid is meant to partition the data from year to year and was generated using >grid(nx=9,ny=0,col="gray60",lty=1) but it is clearly off. Is there a way to draw the grid lines exactly between december and January? I wasn't sure how much code I should include, so here it all is: (images follow) my.dat<-read.table("C:/Eric/Programs/UtilityProgram_Summarize_UNSAT_Zone_Results_8Class/Pr...

Hi, I try to create a vertical line in my plot, which has a xaxis comprising time formated data. This is what I tried: ---------------- y<-152833 x<-strptime(y, format="%H%M%S") abline(v=x, col="red") ---------------- for some reason, it doesn't work and no error msg is displayed... I hope someone can tell me what I do wrong, or maybe an alternative. Thanks

Estimados, tengo un grafico al que agregue una linea con abline(), este es el codigo ... library(Hmisc) # agregar una linea horizontal con el valor del angulo de contacto del control trellis.device(color = FALSE) xYplot(Cbind(ca.med[,3],ca.med[,5],ca.med[,6])~ca.med[,2], groups=Sol, data=ca.med, xlab=list(label="Concentration (mM)", cex=1.3), ylab=list(label="Contact Angle

Hi all, I'm trying to figure out a way to create a data graphic that I haven't ever seen an example of before, but hopefully there's an R package out there for it. The idea is to essentially create a heatmap, but to allow each column and/or row to be a different width, rather than having uniform column and row height. This is sort of like a Marimekko chart in appearance, except that

...(ap0[1:139], freq=12) ?# bad fits for length < 140(fit <- StructTS(ap, type= "BSM"))ftd<-fitted(fit)plot(cbind(ap, ftd[,1], ftd[,3]), # data, level, cyclic terms?? ? plot.type = "single", col=c("black", "red", "green"))abline(h=0, col="gray60") A plot is attached, for series lengths 139 and 140. The red line is the fitted level and the green line is the seasonal term. ?Clearly, for length = 139, the red line does not represent a local average level, and the green line does not represent a zero mean cyclic term with a period of 12 m...

I would like to organize my data as follows: I have a table that contains various data, and the numbers represent a level of similarity between these data, eg RF00013 has 100% similarity with the data RF00014. I would leave my table as a heatmap where darker colors represent higher similarity, and the lighter colors represent less level of similarity. I'm using version 2.11 of R. these

Hi, I am interested in ggplot2 and I found this lattice code very interesting (http://addictedtor.free.fr/graphiques/graphcode.php?graph=48). Code: library(lattice) lattice.options(default.theme = canonical.theme(color = FALSE)) tmp <- expand.grid(geology = c("Sand","Clay","Silt","Rock"), species = c("ArisDiff",

...asic plot p <- p + geom_boxplot() p <- p + facet_grid(variable ~ trt, scales = 'free_y') # Median line - again, want to reflect across rows p <- p + stat_summary(aes(group = 1), subset(ecg, trt == 'Placebo'), fun.y = 'median', geom = 'line', colour = 'gray60') # Formatting p <- p + labs(x = '', y = '') p <- p + theme(legend.position = 'none') p <- p + theme(axis.text.x = element_text(angle = 90, hjust = 1, vjust = 0.5)) print(p) -- View this message in context: http://r.789695.n4.nabble.com/Lattice-to-ggplot...

Hello! I apologize - I never used lattice before, so my question is probably very basic - but I just can't find the answer in the archive nor in the documentation: I have a named numeric vector p of 6 numbers (of the type 6 numbers with people's names to whom those numbers belong). I want a simple bar chart. I am doing: library(lattice) trellis.par.set(fontsize=list(text=12)) #

...878787", "gray54", "#8A8A8A", "gray55", "#8C8C8C", "gray56", "#8F8F8F", "gray57", "#919191", "gray58", "#949494", "gray59", "#969696", "gray60", "#999999", "gray61", "#9C9C9C", "gray62", "#9E9E9E", "gray63", "#A1A1A1", "gray64", "#A3A3A3", "gray65", "#A6A6A6", "gray66", "#A8A8A8&q...

Dear R list members I am trying to improve a boxplot with 2 data sets. I run somethinkg like boxplot(data1 ~ month, add=F, col = "red", ...) boxplot(data2 ~ month, add=T, col = "blue", ...) The problem is that the data from February are missing for data2, so R think that must take little more space between the data classes in data 2 and then both data gropus are not aligned.