search for: element_line

...------------------------------------------------------------------------script( graph-style.R) : library(grid) theme_custom <- function (base_size = 10, base_family = "serif") {? theme_grey(base_size = base_size, base_family = base_family) %+replace%? ? theme(? ? ? line = ? ? ? ? ? ? ? element_line(colour = "black", size = 0.5, linetype = 1, lineend = "butt"),? ? ? rect = ? ? ? ? ? ? ? element_rect(fill = "white", colour = "black", size = 0.5, linetype = 1),? ? ? text = ? ? ? ? ? ? ? element_text(family = base_family, face = "plain", colour =...

...c(1,1,1)) cvdf_melt<-reshape2::melt(cvdf) g5 <-ggplot( cvdf_melt, aes(x=variable, y=value))+geom_boxplot(color="black",fill=palette, alpha=0.8)+##, fill="Experiment" scale_y_continuous(limits=c(0,100), breaks=seq(0,100, by=10))+ theme_bw()+ theme(panel.grid.major = element_line(colour = "gray85"), panel.grid.minor = element_line(colour = "gray85"), axis.text.x = element_text(color = "black", size = 12,angle=45, hjust=1,vjust=1), axis.text.y= element_text(color = "black", size = 12,angle=0, hjust=0.5,vjust=0.5...

...2::melt(cvdf) > > g5 <-ggplot( cvdf_melt, aes(x=variable, > y=value))+geom_boxplot(color="black",fill=palette, alpha=0.8)+##, > fill="Experiment" > scale_y_continuous(limits=c(0,100), breaks=seq(0,100, by=10))+ > theme_bw()+ > theme(panel.grid.major = element_line(colour = "gray85"), > panel.grid.minor = element_line(colour = "gray85"), > axis.text.x = element_text(color = "black", size = 12,angle=45, > hjust=1,vjust=1), > axis.text.y= element_text(color = "black", size = 12,angle=0, &g...

...g5 <-ggplot( cvdf_melt, aes(x=variable, > > y=value))+geom_boxplot(color="black",fill=palette, alpha=0.8)+##, > > fill="Experiment" > > scale_y_continuous(limits=c(0,100), breaks=seq(0,100, by=10))+ > > theme_bw()+ > > theme(panel.grid.major = element_line(colour = "gray85"), > > panel.grid.minor = element_line(colour = "gray85"), > > axis.text.x = element_text(color = "black", size = 12,angle=45, > > hjust=1,vjust=1), > > axis.text.y= element_text(color = "black", s...

...df_melt, aes(x=variable, >>> y=value))+geom_boxplot(color="black",fill=palette, alpha=0.8)+##, >>> fill="Experiment" >>> scale_y_continuous(limits=c(0,100), breaks=seq(0,100, by=10))+ >>> theme_bw()+ >>> theme(panel.grid.major = element_line(colour = "gray85"), >>> panel.grid.minor = element_line(colour = "gray85"), >>> axis.text.x = element_text(color = "black", size = 12,angle=45, >>> hjust=1,vjust=1), >>> axis.text.y= element_text(color = &quot...

...%)") + facet_wrap(~Type,nrow=3) myplot + theme(panel.grid.major = element_blank(), legend.title=element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.title.x = element_blank(), axis.text.x = element_text(angle = 90, vjust = 0.5, hjust=1), axis.line = element_line(colour = "black")) My issue is that Y axis is crammed. How it can be cleaned up and say feature only say these values: 0, 10, 20,30, ...80. I tried using: scale_y_continuous(breaks = breaks_width(10))+ But I got this error: Error in breaks_width(10) : could not find function "break...

...anel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.border = element_blank(), axis.ticks = element_blank()) p3<-p2+theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.line = element_line(colour = "black")) p4<-p3+scale_color_manual(breaks = c("-1", "0", "1"), values=c("darkblue", "green", "red")) *My question is:* What if I was to repeat the analysis and standardize the beta (z-score...

...anel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.border = element_blank(), axis.ticks = element_blank()) p3<-p2+theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.line = element_line(colour = "black")) p4<-p3+scale_color_manual(breaks = c("-1", "0", "1"), values=c("darkblue", "green", "red")) My question is: What if I was to repeat the analysis and standardize the beta (z-score)...

Petr, there was a thinko in your response. tmp <- data.frame(m=factor(letters[1:4]), n=1:4) tmp tmp$m <- factor(tmp$m, levels=c("c","b","a","d")) ## right tmp[order(tmp$m),] tmp <- data.frame(m=factor(letters[1:4]), n=1:4) levels(tmp$m) <- c("c","b","a","d") ## wrong tmp[order(tmp$m),] changing levels

Hi After melt you can change levels of your factor variable. Again with the toy example. > levels(temp$variable) [1] "y1" "y2" "y3" "y4" > levels(temp$variable) <- levels(temp$variable)[c(2,4,1,3)] > levels(temp$variable) [1] "y2" "y4" "y1" "y3" > And you will get graphs with this new levels ordering.