Dear all,
I have a geom_boxplot where I have the boxes colored according to a factor. The
color scale given is very lovely and colorful, but I need it in grayscale. how
do I change this?
I also am worried that the grayscale may be too similar (black/white is also
not an option as in my real data I have much more than the two dummy factors I
have put in the dummy data). Therefore, I would like to hatch the boxes also
mapped according to the factors (see script and data below). How can I
accomplish this?
Also, I have a problem that I though would be easy to solve over Stack
Overflow, but turn out to be more complex. i would like to have one of my
legend titles in italics. Sounds basic, but can't solve it somehow. I have
marked in the script below where this is.
Many thank's for your help!
Dummydata:
mydata <- data.frame(
D15N = c(runif(100, min = -2), runif(100), runif(100, max = 2), runif(100)),
Year = rep(c('2007', '2008'), each = 100),
SampleType = rep(c('cyano', 'seston'), each = 200),
Station = sample(c('B1', 'H2', 'H3', 'H4'), 400, replace = TRUE),
Week = sample(c('19', '21', '23', '25'), 400, replace = TRUE))
library(ggplot2)
Summdata <- ddply(mydata, .(Week, SampleType, Year, Station), summarise, median
= median(D15N))
ggplot(Summdata, aes(x = Station, y = median)) +
(mapping=aes(group=interaction(Station, SampleType)))+
theme_bw() +
geom_boxplot(mapping=aes(fill=SampleType), #I would like to have grayscale
and hatched - how?
outlier.shape=1,
outlier.size=3)+
theme(strip.background = element_blank())+
ylab(expression(paste("",delta^{15}, "N")))+
xlab("Station") +
scale_shape(solid = FALSE)+
geom_hline(yintercept=0, linetype=3)+
scale_fill_discrete(guide = guide_legend("my stuff"),
labels=c("cyanobacteria", "seston")) #if I wanted to have
"seston" in italics - how would I do that?
with kind regards
Anna Zakrisson
PhD student
Department of Ecology, Environment and Plant Sciences
Stockholm University
Svante Arrheniusv. 21A
SE-106 91 Stockholm
Sweden/Sverige
Lives in Berlin.
For paper mail:
Katzbachstr. 21
D-10965, Berlin - Kreuzberg
Germany/Deutschland
E-mail: anna.zakris...@su.se
Tel work: +49-(0)3091541281
Mobile: +49-(0)15777374888
LinkedIn: http://se.linkedin.com/pub/anna-zakrisson-braeunlich/33/5a2/51b
><((((º>`. . `. . `. . ><((((º>`. . `. . `. .><((((º>`. . `. .
>`. .><((((º>
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
