search for: darkblu

Displaying 20 results from an estimated 62 matches for "darkblu".

Did you mean: darkblue
2009 Jul 25
1
yaxp problem for more irregular time series in one plot
...) date_p <- as.POSIXct(date, "CET") par(mfrow=c(2,1), ylog = TRUE, yaxp = c(0.01, 100, 3)) plot(date_p, NO3, log = "y", type = "l", col = "darkred", main = "NVZ-1", xlab = "time", ylab = "NO3-" ) lines(date_p, NH4, col = "darkblue", lty = "dotted") plot(date_p, NH4, log = "y", type = "l", col = "darkblue", main = "NVZ-1", xlab = "time", ylab = "NH4+" ) So, as I anderstood, extreme (max and min) values on the y axis are conntrolled byt the yaxp, but...
2011 Oct 03
4
Question about ggplot2 and stat_smooth
I'm interested in creating a graphic -like- this: c <- ggplot(mtcars, aes(qsec, wt)) c + geom_point() + stat_smooth(fill="blue", colour="darkblue", size=2, alpha = 0.2) but I need to show 2 sets of bands (with different shading) using 5%, 25%, 75%, 95% limits that I specify and where the heavy blue line is the median. I don't understand how to do this with ggplot2. What I am doing currently is to generate 'boxplots' (w...
2008 Oct 19
1
convert lines to inches
...&height, everything is in cm): pdf("test.pdf",width=(20+2+4)/2.54,height=(10+3+1)/2.54) plot(10:30, 9*cos(10:30),type="l",xlim=c(10,30),ylim=c(-10,15),xaxs="i",yaxs="i",asp=1) #par(mar=c(0,0,0,0)) par(mai=c(2,3,4,1)/2.54) box("figure", col="darkblue") dev.off() The size of the darkblue box is fine, but I cannot yet control the size of the plot area (although http://research.stowers-institute.org/efg/R/Graphics/Basics/mar-oma/index.htm helped me a lot). And seeting the mar to zero (#) works in a R figure, but not in a pdf. Why? I alread...
2024 Mar 22
1
geom_edge & color
Hi, this seems to work (assuming that your problem was the setting of colours...): --- snip --- network %>% ggraph(., layout = "auto") + # This produces an error... # geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.factor(edge_list$relationship)], alpha=0.5)) + # ... this works :-) geom_edge_arc(curvature=0.3, aes(width=E(network)$weight/10, color=edge_list$relationship), alpha=.5) + scale_edge_color_manual(values=c("pos"="darkblue", "neg"...
2024 Mar 20
1
geom_edge & color
...ps of nodes: --> geom_node_point(aes(size = V(network)$hub_score*200, color= as.factor(V(network)$community))) I additionally want to consider different colors for different edge groups The grouping is defined in the edge_list$relationship: negative relationship = red and positive relationship = darkblue. The code is working in the way that the groups are separated by two colors. However, the code uses not the assigned colors. Does anyone have any idea how to adapt the code? --> geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.fac...
2006 May 15
1
Trying to get values to display on horizontal barchart
...39;Grade \n 3','Grade \n 4','Grade \n 5','Grade \n 6','Grade \n 7','Grade \n 8') o <- rev(order(math.bar)) math.bar <- math.bar[o] par(ps=10) math.barplot <- barplot(math.bar, main = list("Death Rates in Virginia", font = 1), col=c('darkblue'), names=c('Grade \n 3','Grade \n 4','Grade \n 5','Grade \n 6','Grade \n 7','Grade \n 8'), ylim=c(0,100), ylab="Percentage", xlab="Grade Level") text(math.barplot, math.bar+5, math.bar, xpd = TRUE) #Horizontal bars syntax: pa...
2012 Sep 24
3
boxplot of different colors
...font.axis=2, cex=1.5, las=1, bty="l", col=c("forestgreen", "darkgreen","chocolate1","darkorange2","sienna2", "red2","firebrick3", "saddlebrown","coral4","chocolate4","darkblue","navy","grey38")[obs.group])) op = par(mar = c(5,5,4,2) + 0.1) title(ylab = "Distance between Centers of B and NB Range (1000 km)", cex.lab = 1.4,line = 3) axis(side=2,yaxp=c(0,20000,4),cex.lab=1.4, cex.axis=1.2,font.axis=2, las=1) [[alternative...
2017 Dec 20
2
outlining (highlighting) pixels in ggplot2
...quot;, "UT3", "UT5", "GC1", "BC1", "WC1")), c(format(seq(as.Date('2000-10-01'), as.Date('2001-09-30'), by='month'), "%b")))) # palette definition palette <- colorRampPalette(c("darkblue", "blue", "white", "red", "darkred")) # find max stretch value zmax1 = max(abs(m1)) m1.melted <- melt(m1) names(m1.melted) <- c('Site','Month', 'Concentration') # Set up an example matrix with binary code for which resul...
2007 Dec 09
1
Setting the grid of a graph of timeseries
...tab), 3) labs <- format(time(tab), fmt) axis(1, at = time(tab)[ix], lab = labs[ix], tcl = -0.7, cex.axis = 0.9) } } plot.zoo(tab, plot.type="single", panel=my.panel, lty=c(1,2,3,4,5,1), lwd=c(8,2,2,2,2,8), col=c("darkorange", "red2","darkblue","darkblue","green","midnightblue"), xlab=" ",ylab = "euro/MWh",xaxt="n") #################################################################### This code produces a graph with a non-decimal x-axis but by far more (human...
2024 Mar 22
1
geom_edge & color
...quot;blue", "red"), layout=layout_with_mds(.)) tiff("figures/Test_network_bysubcatecory.tiff", width=1000, height=900, res=120) network %>% ggraph(., layout = "auto")+ geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), color=c("darkblue", "red")[as.factor(edge_list$relationship)], alpha=0.5)) + geom_node_point(aes(size = V(network)$hub_score*200, color= as.factor(V(network)$community))) + geom_node_text(aes(label = V(network)$name), size=3, color="white", repel=T)+ scale_color_scico_d(palette =...
2012 Sep 28
2
changing outlier shapes of boxplots using lattice
...13, each=20))) Diet.colors <- c("forestgreen", "darkgreen","chocolate1","darkorange2", "sienna2","red2","firebrick3","saddlebrown","coral4", "chocolate4","darkblue","navy","grey38") levels(dataN$Diet_B) <- Diet.colors bwplot(GE_distance ~ Diet_B, data=dataN, xlab=list("Diet of Breeding Ground", cex = 1.4), ylab = list( "Distance between Centers of B and NB Range (1000 km)",...
2024 Mar 21
1
geom_edge & color
...point(aes(size = V(network)$hub_score*200, color= > as.factor(V(network)$community))) > I additionally want to consider different colors for different edge > groups > The grouping is defined in the edge_list$relationship: negative > relationship > = red and positive relationship = darkblue. The code is working in the > way > that the? groups are separated by two colors. However, the code uses not > the > assigned colors. Does anyone have any idea how to adapt the code? > --> geom_edge_arc(curvature=0.3, aes(width=(E(network)$weight/10), > color=c("darkblue&...
2008 Dec 09
0
forestplot and x axis scale
..., 10) pdf(file = "myfile.pdf", pointsize = 7, paper="letter", width=6, height=9) forestplot(newcite,or,lcl,ucl,zero=0, graphwidth = unit(1.2,"inches"), clip=c(log(0.1),log(10)), xlog=TRUE, xticks=mytk10, xlab="Odds Ratio", col=meta.colors(box="darkblue",line="darkblue",zero="grey50")) title(main = list("My title", col="darkblue", font=2)) dev.off() --> I have changed the width of the pdf output and/or the graphwidth specified in the forestplot function -- and depending on the length of the text/ta...
2011 Mar 29
1
ggplot2: scale_y_log10() with geom_histogram
Dear ggplot2 users, is there an easy/elegant way to suppress zero count bars in histograms with logarithmic y axis ? One (made up) example would be qplot(exp(rnorm(1000))) + geom_histogram(colour = "cornsilk", fill = "darkblue") + scale_x_sqrt() + scale_y_log10() Thanks! Markus [[alternative HTML version deleted]]
2009 Sep 11
1
format (?) problems with data imported from postgres
...date_p <- as.POSIXct(date, "CET") par(mfrow=c(2,1), ylog = TRUE, yaxp = c(0.01, 100, 3)) plot(date_p, NO3,log = "y", type = "l", col = "darkred", main = "NVZ-1", xlab = "time", ylab = "NO3-" ) lines(date_p, NH4, col = "darkblue", lty = "dotted") plot(date_p, NH4, log = "y", type = "l", col = "darkblue", main = "NVZ-1", xlab = "time", ylab = "NH4+" ) The first problems comes with the definition maxy and miny (following a previous advice od Christi...
2004 Apr 08
2
lines and glm
...o replicate some examples in Franses' & Paap's Quantitative Models in Marketing Research. > t <- 1:1000 > e1 <- rnorm(1000) > e2 <- rnorm(1000) > x <- 0.0001*t+e1 > y2 <- -2+x+e2 > y <- ifelse(y2>0,1,0) > > plot(x, y, pch = 16, col = "darkblue", + main = expression(paste("Scatter diagram of ", italic(y[t]), " against ", + italic(x[t]))), + xlab = expression(italic(x[t])), + ylab = expression(italic(y[t]))) > lines(glm(y ~ x, family = binomial)) Error in xy.coords(x, y) : x and y lengt...
2017 Jun 07
1
rmarkdown and font size
Suppose I have a file (named "tmp.rmd") containing: --- title: Test --- ```{r example, echo=FALSE, results='asis'} tmp <- data.frame(a=1:5, b=letters[1:5]) print( knitr::kable(tmp, row.names=FALSE)) ``` And I render it with: rmarkdown::render('tmp.rmd', output_format=c('html_document','pdf_document')) I get two files: tmp.pdf tmp.html Is
2017 Jun 13
0
WG: Fw: Re: rmarkdown and font size
...> <style type="text/css"> > > body{ /* Normal */ > font-size: 12px; > } > td { /* Table */ > font-size: 8px; > } > h1.title { > font-size: 38px; > color: DarkRed; > } > h1 { /* Header 1 */ > font-size: 28px; > color: DarkBlue; > } > h2 { /* Header 2 */ > font-size: 22px; > color: DarkBlue; > } > h3 { /* Header 3 */ > font-size: 18px; > font-family: "Times New Roman", Times, serif; > color: DarkBlue; > } > code.r{ /* Code block */ > font-size: 12px; > } &g...
2017 Dec 20
0
outlining (highlighting) pixels in ggplot2
...= T) ggplot(m1.melted, aes(x = Month, y = Site, fill = Concentration), autoscale = FALSE, zmin = -1 * zmax1, zmax = zmax1) + geom_tile() + coord_equal() + scale_fill_gradient2(low = "darkred", mid = "white", high = "darkblue", midpoint = 0) +annotate("rect",ymin=ind[,"row"]-.5,ymax=.5+ind[,"row"], xmin=-.5+ind[,"col"],xmax=.5+ind[,"col"],colour="red", size=.5, linetype=1, fill=NA) Cheers Am 20.12.2017 um 01:32 schrieb Morway, Er...
2009 Jan 22
1
ggplot2
...give me the desired labels in the legend. Could someone explain? qplot(Year,CDR,data=b3,colour=Phase,geom=c("point","line"),legend.position="bottom")->p p+scale_colour_gradient2(limits=c(1,2), midpoint=1,low="magenta", mid="magenta", high="darkblue",breaks=c(1,2),labels=c("a","b")->p p Vikas [[alternative HTML version deleted]]