search for: green3

The following command produces red axis line in a pairs plot: pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species", pch = "+", col = c("red", "green3", "blue")[unclass(iris$Species)]) Trying to fool pairs in the following way produces the same plot as above: pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species",pch = "+", col = c("black", "red", "green3", "blu...

> G1=barplot(A,beside=FALSE,space=0.5,col=c("red","gray","green3"),cex.axis=0.8,cex.names=0.8,ylim=c(0,140000),las=1) > legend("topright",c("Civiles","Transaccionan","Demografica"),col=c("red","gray","green3"),pch=15,bty="n",cex=1) > text(G1,A,labels=format(round(A/length(...

Hi, Is it possible to create a legend in a pairs() plot? For example, suppose I have the following R codes: data(iris) pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species", pch = 21, bg = c("red", "green3", "blue")[codes(iris$Species)]) How can I created a legend that shows which colour represents to which Iris species? Thanks, Kevin ------------------------------------------------------------------------------ Ko-Kang Kevin Wang Statistical Analysis Division Leader Software Devel...

...r <- c(r, abs(sapply(lapply(split(cbind.data.frame(x, y), splitvar), cor), function(x)x[1,2]))) } txt <- format(c(r, 0.123456789), digits=digits)[1:4] txt <- paste(prefix, txt, sep="") if(missing(col.cor)) col.cor <- c("black", "red", "green3", "blue") for(i in 1:length(txt)) { text(0.5, (1/(length(txt)+1))*i, txt[i], col = col.cor[i]) } } pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species", pch = 21, bg = c("red", "green3", "blue")[unclass(iris$Speci...

...name="/home/valeria/Thesis/lung/fig/scatterplotcolnames.jpg") pairs(aggiunta[,1: 6],labels=c("ALCAM","ITGB5","MSN","CSTB","DHCR24","TRIM29"), main = "Scatterplots selected genes",pch=21, bg = c("red", "green3", "blue", "brown","orange")[aggiunta[,7]],upper.panel=panel.cor) dev.off() doesn't allow me to get the desidered matrix with colors and correlations. I also tried to create a function panel.col for the lower.panel: ## put colors on the lower panels...

...another perspective plot. data(volcano) z <- 2 * volcano # Exaggerate the relief x <- 10 * (1:nrow(z)) # 10 meter spacing (S to N) y <- 10 * (1:ncol(z)) # 10 meter spacing (E to W) ## Don't draw the grid lines : border = NA persp(x, y, z, theta = 135, phi = 30, col = "green3", scale = FALSE, ltheta = -120, shade = 0.75, border = NA, box = FALSE) and now I would like to include another surface. I was hoping for a possibility like add=TRUE such as in contour: persp(x, y, z+10, theta = 135, phi = 30, col = "red", add=TRUE) Can someone point out to m...

...ul threads on the archives. As usual, any advice would be greatly appreciated Sebastien pdf(file="C:/test.pdf", width=6, height= 6 + 0.2*6) par(mar=c(5 + 6,4,4,2)+0.1) pairs(iris[1:4], main = "Anderson's Iris Data -- 3 species", pch = 21, bg = c("red", "green3", "blue")[unclass(iris$Species)]) dev.off()

Hi list, not sure if this is the wanted behavior, but running the following code: > version platform i386-pc-mingw32 arch i386 os mingw32 system i386, mingw32 status major 2 minor 1.1 year 2005 month 06 day 20 language R > n <- 500 > d <- 4 > m <- matrix(runif(n*d, -1, 1), ncol=d) > c <- hsv(apply(m, 1, function(x) {sum(x*x)/d}),

Hi list, not sure if this is the wanted behavior, but running the following code: > version platform i386-pc-mingw32 arch i386 os mingw32 system i386, mingw32 status major 2 minor 1.1 year 2005 month 06 day 20 language R > n <- 500 > d <- 4 > m <- matrix(runif(n*d, -1, 1), ncol=d) > c <- hsv(apply(m, 1, function(x) {sum(x*x)/d}),

...with R and I have one problem left: Some of the labels of the axes do not show up, probably because there's not enough space. I use the following code to create the plot: modality <- read.table("results.table", header=TRUE, sep=",") color <- c("red3","green3","blue3","orange2","purple2","brown4") plot(modality, col=color) >From the manual I though one of the following might help: > plot(length, col=color, las=1) > plot(length, col=color, las=2) > plot(length, col=color, las=0) This is supposed...

...tails like font type, I just want the size of the fonts (especially the axes and axes labels) to be bigger! Thanks so much! Here is my code: # Poster figure 1 stationmean=c(19.4833,10.8000) fieldmean=c(14.6852, 15.5981) plot(c(0,1),fieldmean,xaxt='n',type="b",pch=20,col="green3", main="Foxtail Seeds Remaining vs.Field Type", ylab="Mean Number Foxtail Seeds Remaining", xlab="Field Type",ylim=c(10,20),xlim=c(-.25,1.25)) axis(1,at=c(0,1),labels=c("Cover Crop","Wheat Stubble")) # Poster figure 2 stationmean=c(19.4833,...

Hello >From the following script I received a grafic output when I called: - xyplot.test( 'green3' ) - call.xyplot.test( 'blue3' ) I did NOT receive a grafic output when I called: - loop.xyplot.test( 'red3' ) What's the Problem? NB: I am using R 1.4.1 on Linux. --------- START OF SCRIPT ---------------- n <- 1000 x <- seq( 1, n ) y <- rnorm( n ) xyplot....

...f colours in the "default" palette and that does not show up to well on my transparent (on white background). Of course it is easily fixed but I think white should not be a default colour. > palette("default") > palette() [1] "black" "red" "green3" "blue" "cyan" "magenta" "yellow" [8] "white" > par()$bg [1] "transparent" > > version _ platform i386-pc-mingw32 arch x86 os Win32 system x86, Win32 status major 1 minor 4.1 year 2002 month 01 da...

...uccessfully! How happy I am! To ensure my conclusion, I will paste the last few lines of messages displayed after running the command 'demo(graphics)' below: Could try check it for me please? "> usr <- par("usr") > rect(usr[1], usr[3], usr[2], usr[4], col = "green3") > contour(x, y, volcano, levels = l, col = "yellow", lty = "solid", add = TRUE) > box() > title("A Topographic Map of Maunga Whau", font = 4) > title(xlab = "Meters North", ylab = "Meters West", font = 3) > mtext(&...

Hi, I'm trying to create a plot using pair. Currently I'm doing the following pairs(~mpg + hp + wt , data=cars, labels = c("Miles per Gallon","Horsepower","Weight"),pch = c(24,25)[unclass(cars$tr + 1)], bg = c("red", "green3")[unclass(cars$tr + 1)],panel=panel.smooth) for the attached dataset. However,instead of using panel.smooth I would rather have two fitted regression lines for each car transmission type (cars$tr). Is this possible? Thank you Ben

...uestion, but I couldn't find the answer in the manual... http://www.nabble.com/file/p14618947/at-modality.png I created this image with R by using the following code: modality <- read.table("results.table", header=TRUE, sep=",") color <- c("red3","green3","blue3","orange2","purple2","brown4") plot(modality, col=color) The data I read in has this format: ... 38355 GeneralInfo Textual 38356 GeneralInfo Textual 38357 Person Textual 38358 Person Combination 38359 Advice...

Hi, there: Does anyone know how to specify the ranges in the axises when I make scatter plots using pairs()? In the general plot function, I can use xlim and ylim option. But how can I do this if I use pairs()? Thanks. Yulei [[alternative HTML version deleted]]

...-k *** demos/graphics/graphics.orig Thu Apr 17 11:02:39 1997 --- demos/graphics/graphics Thu Apr 17 11:03:08 1997 *************** plot(numeric(0), numeric(0), NULL, *** 129,135 **** type="n", ann=FALSE) usr <- par("usr") rect(usr[1], usr[3], usr[2], usr[4], col="green3") ! contour(volcano, x, y, l, col="yellow", lty="solid", add=TRUE) box() title("A Topographic Map of Maunga Whau",font=4) title(xlab="Meters North", ylab="Meters West", font=3) --- 129,135 ---- type="n", ann=FALSE) usr <...

...t;- c(0.12, 0.3, 0.26, 0.16, 0.04, 0.12) > names(pie.sales) <- c("Blueberry", "Cherry", "Apple", "Boston Cream", "Other", "Vanilla Cream") > piechart(pie.sales, col = c("purple", "violetred1", "green3", "cornsilk", "cyan", "white")) Hit <Return> to see next plot: /usr/lib/R/bin/R.bin: error while loading shared libraries: /usr/lib/R/bin/R.bin: symbol __sysconf, version GLIBC_2.2 not defined in file libc.so.6 with link time reference [dani@PLUTO amopt_sim]...

Hello, I am having difficulty obtaining the correct colors in my R charts. > colors()[c(552, 254, 26)] [1] "red" "green" "blue" But, if I specify col=552 in my barplot, I get gray bars. Likewise, col=254 gives bright pink, and col=26 is a red-orange. I get accurate results when I spell out the names, but I am making a pallet with 20- 30 colors and it is a