search for: blue

...x with 3 colums. With cbind I add an additional column called "col". I need this column "col" because in a later step and want to specify here some plot details which I will get from another analysis If I want to plot with this code, I have the problem that the legend is wrong. Blue changed to green and green to blue. Furthermore the colors in the plot seem a little bit strange. Can anybody help me out? All the best and thanks Peter #####THE CODE p0 <- ggplot(DATA, aes(Freq, Var1)) p1 <- p0+ geom_point(aes(Freq, reorder(Var1, rep(score,cl.count)), colour=col)) p2...

...re two localites (loc) with values 75 or 56 in my data ZZ. The f column has 4 levels: P1, S1, S8, R6. The dataframe is ordered by N value, pchloc value is assign to use "pch" in plot. > head(ZZ) loc f N color ordered pchloc 98 75 S1 6.39 green 1 16 99 75 S8 6.44 blue 2 16 71 75 S8 6.60 blue 3 16 100 75 R6 6.64 black 4 16 70 75 S1 6.81 green 5 16 51 75 S8 6.83 blue 6 16 > dput(ZZ) structure(list(loc = c(75L, 75L, 75L, 75L, 75L, 75L, 75L, 75L, 56L, 56L, 75L, 75L, 75L, 75L, 75L, 75L, 75L, 56L, 75L, 75...

Two questions that was not always clear for me [sorry for posting to this list :\]: ############################################################################################## Q1) when cabling, is the color order important? like: straight cabling: A side: white-orange, orange, white-green, blue, white-blue, green, white-brown, brown B side: white-orange, orange, white-green, blue, white-blue, green, white-brown, brown could be eg.: like this?? A side: white-orange, brown, white-blue, green, white-green, blue, white-brown, orange B side: white-orange, brown, white-blue, green, white-green...

I have a data set similar to the following: Color Score RED 10 RED 13 RED 12 WHITE 22 WHITE 27 WHITE 25 BLUE 18 BLUE 17 BLUE 16 and I am trying to to select just the values of Color that are equal to RED or WHITE, excluding the BLUE. I've tried the following: myComp1<-subset(dataset, Color =="RED" | Color == "WHITE") myComp1<-subset(dataset, Color != "BLUE&...

Hi, An example data set is: group level color A 1 "blue" A 1 "Red" B 1 "blue" B 2 "Red" A 2 "Red" B 2 "Red" B 2 "blue" B 2 "blue" A 2 "blue" A 2...

Hello friends!! I have two questions, and I would like that you could answer me!!! I have created a plot as plot(range(10,-10),range(10,-10),col="blue",col.axis="blue",col.lab="blue",col.main="blue",col.sub="blue"); 1?) I want that the square of plot and the lines that indicates the value -10,-5,0,5,10 have a blue colour too. 2?)It?s different to the question one. I want that the plot start and fini...

...X-axis where the labels for the years line up after every two bars in the plot (there is one bar for hardwood, and another for softwood). Below is my script: density<-read.table("F:\\Megan\\Vtest.csv", header=TRUE, sep=",") attach (density) barplot(DENSITY,YEAR, col=c("blue", "green", "green", "blue", "blue", "green", "blue", "green", "green", "blue", "green", "blue", "blue", "green" , "green", "blue", "blue&qu...

...ific ext3 filesystem is hanging. kernel is 2.2.19pre7 (with openwall patches, although it should not matter), ext3 is 0.05e. All filesystems are ext3 (in journal data mode). Machine is PIII/600 with 128MB RAM, 300MB swap. Journals are 5-15MB in size. Partitions are 150MB to 7,5GB. Feb 5 12:28:28 blue kernel: Buffer locked in journal_write_metadata_buffer, flags 0x00004a0f, count 1 Feb 5 12:28:28 blue kernel: kernel BUG at journal.c:306! Feb 5 12:28:28 blue kernel: invalid operand: 0000 Feb 5 12:28:28 blue kernel: CPU: 0 Feb 5 12:28:28 blue kernel: EIP: 0010:[journal_write_metadata...

...the ggplot2. Here's a small example: --8<-- library(ggplot2) molten <- data.frame(date=c('01','01','01','01', '02','02','02','02'), channel=c('red','red','blue','blue', 'red','red','blue','blue'), product=c('product1','product2', 'product1','product2', 'product1...

Hi guys I've got an easy question but couldn't find any quick solution. I woulk like to change the following matrix good bad worse Blue 1 2 2 Yellow 2 1 3 Black 3 4 4 Into the following structure good 1 Blue Bad 2 Blue Worse 2 Blue Good 2 Yellow Bad 1 Yellow Worse 2 Yellow Good 2 Black Bad 4 Black Worse 4 Black Thanks a lot. Regards Beat Huggler --- Beat Huggler Quantitative Analysis RMF Investment Products Huobstrasse 16...

..."B", "B"), Detail = c( "b", "c", "1", "2"), resp = runif(4, min = 0.5, max = 1)) ggplot(dataset, aes(x = Detail, y = resp)) + facet_grid(.~Main, scales = "free_x")+ geom_point(aes( size=6,shape = c(16,16,15,15) ),colour="blue")+geom_hline(aes(yintercept=0.25),colour='blue', size=2) with this code all the point are blue (like the line below) But if i try the following code, where my goal is to have the point on the left blue and the one on the right red, a problem appears: dataset <- data.frame(Mai...

....circle(4,5,radius=3.40,border="red",lty=3,lwd=3) draw.circle(4,5,radius=3.45,border="red",lty=3,lwd=3) draw.circle(4,5,radius=3.50,border="red",lty=3,lwd=3) draw.circle(7.5,5,radius=3,border="#0000ffaa",lwd=75) draw.circle(7.5,5,radius=2.50,border="blue",lty=3,lwd=3) draw.circle(7.5,5,radius=2.55,border="blue",lty=3,lwd=3) draw.circle(7.5,5,radius=2.60,border="blue",lty=3,lwd=3) draw.circle(7.5,5,radius=2.65,border="blue",lty=3,lwd=3) draw.circle(7.5,5,radius=2.70,border="blue",lty=3,lwd=3) draw.circle...

I suspect there is a simple solution to this problem, but have been unable to find it. Below is some code that I have run to create 3 lattice graphs. I have been asked to change the legend so that the 'No' and dark blue are above "Y" and light blue in the legend to mirror the stacked bars in the graph which feature dark blue above light blue. I have tried changing the data as well as the order of the legend text, without success. Any assistance is much appreciated, regards Bob Green library(latt...

How do I get output with "\color{blue}", i.e. with only one backslash??? > "\color{blue}" [1] "color{blue}" Warning messages: 1: '\c' is an unrecognized escape in a character string 2: unrecognized escape removed from "\color{blue}" > "\\color{blue}" [1] "\\color{blue}...

...I think). But I don?t know how to specify this?. I'm getting lost with the par() function Hard to give my data online for a reproducible example but with for example this, I have the same problems: par(mfrow=c(4,2),oma=c(2,2,2,2), mai=c(0.6, 0.6, 0.6, 0.6)) hist(islands, freq=FALSE,col="blue",main="test") mtext("testen") hist(islands, freq=FALSE,col="blue",main="test") mtext("testen") hist(islands, freq=FALSE,col="blue",main="test") mtext("testen") hist(islands, freq=FALSE,col="blue",main=&qu...

Ein eingebundener Text mit undefiniertem Zeichensatz wurde abgetrennt. Name: nicht verf?gbar URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130513/fe848ce7/attachment.pl>

Hi, I'm interested in using mtext(), but with the option of having multiple colors in the same line of text. For example, creating a line of text where: Red is red and blue is blue How do you create a text argument that lets you do this within mtext()? Thanks, Andrew MGH Cancer Center [[alternative HTML version deleted]]

Hi all, I''m still not quite happy with the NA and factor handling of lm and predict.lm in R1.6.1 (forcing me to use my not very skillfully crafted patches). Here is the problem 1: > print(data<-data.frame(y=c(0.9,2.05,3.02,NA,5.2),x1=c(1:4,NA),x2=factor(c("blue","blue","green","green","green"),levels=c("blue","green")))) y x1 x2 1 0.90 1 blue 2 2.05 2 blue 3 3.02 3 green 4 NA 4 green 5 5.20 NA green > fit<-lm(y~x1+x2,data=data,na.action=na.exclude) > predict(...

I am having trouble understanding how the 'by' function works. Using this bit of code: i <- data.frame(x=c(1,2,3), y=c(0,0,0), B=c("red","blue","blue")) j <- data.frame(x=c(1,2,3), y=c(1,1,1), B=c('red','blue','green')) plot(0, 0, type="n", xlim=c(0,4), ylim=c(0,1)) by(i, i$B, function(s){ points(s$x, s$y, col=s$B) }) by(j, j$B, function(s){ points(s$x, s$y, col=s$B) }) I would have ex...

Hi, In the example dataset below - how can I cahnge "gray20", to "blue" # data black <- rep(c("black","red"),10) gray <- rep(c("gray10","gray20"),10) black_gray <- data.frame(black,gray) # none of this desperate things works # replace(black_gray$gray, gray=="gray20","red") # if(black_gray$gray...