search for: gray30

Dear R-sians! I am trying generate a bunch of xyplots library(lattice) myPanel <- function(x,y,xl=range(x),yl=range(y),...) { panel.xyplot(x,y, pch=20,col='blue',cex=0.7,xlim=xl,ylim=yl,...) panel.abline(v=0, col='gray30',lty=2,lwd=1.5,...) panel.loess(x,y, span=2/3,family='gaussian',normalize=T,col='red',lwd=1.5,...) # panel.lmline(x,y, col='red',lwd=1.5,...) } nms <- names(tmp7)[c(3:7,9)] for (i in nms) { tmp1 <- xyplot(i~pk, data=tmp7, # different y's in...

...ne cars vector with 8 values cars <- c(1,1,1,1,1,1,1,1) # Define colors in each sector color1 <- c("grey80","grey80","grey80","grey80","gray80","grey30","grey20","gray10" ) ## gray10=<0.0001, gray20<0.001, gray30<0.01, gray40=<0.05, gray 80=>0.05 # Putting sector levels car_labels <- c(1,2,3,4,5,6,7,8) car_labels <- paste(car_labels,sep="") # Create a pie chart with defined heading and custom colors # and labels pie(cars, main="Sectors", col=color1, labels=" ",...

...size=2)) + scale_x_discrete(labels=Jurisdiction)+ scale_y_continuous(breaks=seq(245, 305, 10))+ geom_errorbar(data=tabla, aes(y=Mean, ymin=Mean - 1.96*Mean.Error, ymax = Mean + 1.96*Mean.Error),col="gray40", width=0.3, size=1) + geom_point(data=tabla, aes(y=Mean), size = 3, colour ="gray30", pch=16) + labs(x="", y="")+ theme(panel.background=element_rect(fill="white", colour="#B4CDFF"), panel.grid.minor=element_blank(), panel.grid.major.y=element_blank(), axis.text = element_text(colour = "black"), legend.position="none&quot...

Dear R-Experts. I collected different datas about Nitrogen content (mg/ml) in Dung. The dung was eighter fresh (day=0) or had different ages (15,29,47) to observe nutrient changes over time. Now I like to draw a boxplot. boxplot(nmgml~day) abline((nmgml~day) The Problem is, that the boxplot considers the day values as groups and not as time series (neighter when the days are numeric or

Is there a grayscale equivalent to alpha levels in rgb? Example: I have the following to make red transparent circles overlap with previously plotted blue symbols. symbols(x=sites$long,y=sites$lat,circles=log(sites$prop.nem +1),add=T,inches=F,bg=rgb(red=1,green=0,blue=0, alpha=0.5),fg=rgb(red=1,green=0,blue=0, alpha=0.5)) I'm having a hard time coming up with a grayscale equivalent.

Dear all, I generated a Correlograms and used the panel.ellipse (confidence ellipse and smoothed line) option. Is there a way to get instead of the smoothed line the linear regression? Thanks, As hz -- View this message in context: http://r.789695.n4.nabble.com/Correlograms-and-linear-regression-tp2331071p2331071.html Sent from the R help mailing list archive at Nabble.com.

...ize=2)) + scale_x_discrete(labels=tabla$Country)+ scale_y_continuous(breaks=seq(245, 305, 10))+ geom_errorbar(data=tabla, aes(y=Mean, ymin=Mean - 1.96*Mean.Error, ymax = Mean + 1.96*Mean.Error),col="gray40", width=0.3, size=1) + geom_point(data=tabla, aes(y=Mean), size = 3, colour ="gray30", pch=16) + labs(x="", y="")+ theme(panel.background=element_rect(fill="white", colour="#B4CDFF"), panel.grid.minor=element_blank(), panel.grid.major.y=element_blank(), axis.text = element_text(colour = "black"), legend.position="none&q...

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

Hello, I've a question concerning the display of interval data. A sample dataset where X is an interval between Xa and Xb which should be displayed: Y=c(15,14,23,18,19,9,19,13) Xa=c(17,22,21,18,19,25,8,19) Xb=c(22,22,29,34,19,26,17,22) X = (Xa+Xb)/2 It's easily possible to plot the mean of the interval like: plot(X,Y) afterwards I can create lines for the interval with:

Hello! I promise I looked into help files before asking. Still cannot figure it out. I think it's because I am totally confused what packages use lettice, which use trellis, etc. Sections 1 and 2 below produce the data and the data to plot. My question is about barplot in Section 3. I am trying to: 1. add only horizontal gridlines and manipulate the type and color of that line. tck = 1 is not

...2) legend(2,22, legend=c("A really long label","B","Cee What I can do?","D"), col=1:2) ### Now lets gain some control on the colors and bars ### The default colors are so dark. You can't write on top ### of them. You can grab shades of gray like "gray30" or such. ### I'll just specify 4 colors I know will work. I prefer ### the light gray colors because they can be written over. mycols <- c("lightgray","gray70","gray80","gray90","gray75") barplot(x, names=mynames, las=2, col=mycols)...

...3B3B3B", "gray24", "#3D3D3D", "gray25", "#404040", "gray26", "#424242", "gray27", "#454545", "gray28", "#474747", "gray29", "#4A4A4A", "gray30", "#4D4D4D", "gray31", "#4F4F4F", "gray32", "#525252", "gray33", "#545454", "gray34", "#575757", "gray35", "#595959", "gray36", "#5C5C5C&q...