search for: element_text

...se_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 = "black", size = base_size, hjust = 0.5, vjust = 0.5, angle = 0, lineheight = 0.9),? ? ? axis.text = ? ? ? ? ?element_text(size = rel(0.8), colour = "grey50"),? ? ? strip.text = ? ? ? ? element_text(size = rel(0.8)), ? ? ?...

...N = length(Yvar), meanYvar=mean(Yvar), seYvar=sd(Yvar)/sqrt(length(Yvar))) df = df[df$N>=10,] PLot=ggplot(df, aes(x=AVST, y=meanYvar, shape=Extra.column)) + scale_y_continuous(name="Mean Yvar ± SE" )+ scale_x_continuous(name="Time (year)")+ theme(axis.text.x = element_text(size=16,colour="black"),legend.title = element_blank(), axis.text.y = element_text(size=16,colour="black"),plot.title = element_text( face="bold",size=18), legend.justification=c(0,1), legend.position=c(0,1), axis.title.x = element_text(f...

...=organism, group=organism))+ #must add jitter if using this geom_point(stat="summary", fun.y = "mean", size=2, mapping=aes(shape=organism))+ scale_shape(solid = FALSE) + #must be unfilled geom_hline(yintercept=0, linetype=3) + #draws dotted line at 0 theme(strip.text.x = element_text(size = 16, colour="black", family="serif", angle=00)) + theme(strip.text.y = element_text(size = 16, colour="black", family="serif", angle=00)) + theme(axis.text.x = element_text(size = 16, colour="black", family="serif", angle=00)) +...

...;,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), axis.title.x=element_text(color = "black", size = 15,angle=0, hjust=0.5,vjust=0.5), axis.title.y=element_t...

...plot(data = MS1, aes(x= Jahr, y= QI_A,group=Bio,color=Bio, linetype=Bio)) + geom_smooth(aes(fill=Bio) , method = "lm" , formula = y ~ x + I(x^2),linewidth=1) + theme(panel.background = element_blank())+ theme(axis.line = element_line(colour = "black"))+ theme(axis.text=element_text(size=18))+ theme(axis.title=element_text(size=20))+ ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ scale_color_manual(values=c("red","dark green"), labels=c("?LN", "BIO"))+ scale_fill_manual(values=c("red","dark green&quot...

...s(Jahr, fill = as.factor(Bio))) + geom_boxplot( aes(ymin = y0, lower = y25, middle = y50, upper = y75, ymax = y100), stat = "identity", notch=TRUE ) + theme(panel.background = element_blank())+ theme(axis.line = element_line(colour = "black"))+ theme(axis.text=element_text(size=18))+ theme(axis.title=element_text(size=20))+ ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ scale_color_manual(values=c("red","darkgreen"), labels=c("?LN", "BIO"))+ scale_fill_manual(values=c("red","darkgreen&quo...

...r/path/to/pointfile.csv?)) #Now make the map ggplot(data=df, aes(y=Latitude, x=Longitude)) + geom_raster(aes(fill=MAP)) + geom_point(data=sites, aes(x=x, y=y), color=?white?, size=3, shape=4) + theme_bw() + coord_equal() + scale_fill_gradient(?MAP (mm/yr)?, limits=c(0,2500)) + theme(axis.title.x = element_text(size=16), axis.title.y = element_text(size=16, angle=90), axis.text.x = element_text(size=14), axis.text.y = element_text(size=14), panel.grid.major = element_blank(), panel.grid.minor = element_blank(), legend.position = ?right?, legend.key = element_blank() ) (oo) --oOO--( )--OOo-----...

...min = y0, lower = y25, middle = y50, upper = y75, ymax = y100), > > stat = "identity", notch=TRUE > > ) + > > theme(panel.background = element_blank())+ > > theme(axis.line = element_line(colour = "black"))+ > > theme(axis.text=element_text(size=18))+ > > theme(axis.title=element_text(size=20))+ > > ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ > > scale_color_manual(values=c("red","darkgreen"), labels=c("?LN", "BIO"))+ > > scale_fill_man...

...type="twodash")+ geom_line(aes(y = o,x=t), color = "gray48", size=1.2,linetype="longdash") + geom_line(aes(y = l,x=t), color="gray48", size=1.2,linetype="solid")+ labs(x = expression(paste(theta)), y="Probabilidad")+ theme(axis.text=element_text(size=14, face="bold"), axis.title=element_text(size=14)) Saludos, Sebastián Rangel Quiñonez [[alternative HTML version deleted]]

...fill = as.factor(Bio))) + geom_boxplot( aes(ymin = y0, lower = y25, middle = y50, upper = y75, ymax = y100), stat = "identity", notch=TRUE ) + theme(panel.background = element_blank())+ theme(axis.line = element_line(colour = "black"))+ theme(axis.text=element_text(size=18))+ theme(axis.title=element_text(size=20))+ ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ scale_color_manual(values=c("red","darkgreen"), labels=c("?LN", "BIO"))+ scale_fill_manual(values=c("red","darkgreen...

...)+##, > 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), > axis.title.x=element_text(color = "black", size = 15,angle=0, > hjust=0.5,vjust=0.5), >...

...Bio, ymax=after_stat(y+se*sqrt(length(y))), ymin=after_stat(y-se*sqrt(y))) , method = "lm" , formula = y ~ x + I(x^2),linewidth=1) + theme(panel.background = element_blank())+ theme(axis.line = element_line(colour = "black"))+ theme(axis.text=element_text(size=18))+ theme(axis.title=element_text(size=20))+ ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ scale_color_manual(values=c("red","darkgreen"), labels=c("?LN", "BIO"))+ scale_fill_manual(values=c("red",&...

...ke the map > ggplot(data=df, aes(y=Latitude, x=Longitude)) + > geom_raster(aes(fill=MAP)) + > geom_point(data=sites, aes(x=x, y=y), color=?white?, size=3, shape=4) + > theme_bw() + > coord_equal() + > scale_fill_gradient(?MAP (mm/yr)?, limits=c(0,2500)) + > theme(axis.title.x = element_text(size=16), > axis.title.y = element_text(size=16, angle=90), > axis.text.x = element_text(size=14), > axis.text.y = element_text(size=14), > panel.grid.major = element_blank(), > panel.grid.minor = element_blank(), > legend.position = ?right?, > legend.key = element_blank() >...

...eriment" > > 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), > > axis.title.x=element_text(color = "black", size = 15,angle=0, > > hjus...

...ng <- gather(datos, Curva, Valor, 2:5) > datos_long > > ###Graficos > > ggplot(datos_long, aes(x = t, y = Valor, linetype = Curva)) + > geom_line(color="gray48", size=1.2)+ > labs(x = expression(paste(theta)), y="Probabilidad")+ > theme(axis.text=element_text(size=14, face="bold"), > axis.title=element_text(size=14)) > > > Como ves, datos_long ahora si que permite que asignes linetype a una > variable (Curva) y automáticamente te dibuja diferentes tipos de linea para > cada curva y te coloca una leyenda. > > Esp...

...l. However, I need to reflect the numeric values of the log10_P to the point size in the graph. Your help highly appreciated, Regards, Greg p <- ggplot(mydata, aes(x = X, y = log10_P)) + theme_bw() +theme(panel.border=element_blank()) + theme(legend.position="top", axis.text=element_text(size = 8)) (p1 <- p + geom_point(aes(color = Traits) [[alternative HTML version deleted]]

...= QI_A,group=Bio,color=Bio, > linetype=Bio)) + > geom_smooth(aes(fill=Bio) , method = "lm" , formula = y ~ x + > I(x^2),linewidth=1) + > theme(panel.background = element_blank())+ > theme(axis.line = element_line(colour = "black"))+ > theme(axis.text=element_text(size=18))+ > theme(axis.title=element_text(size=20))+ > ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ > scale_color_manual(values=c("red","dark green"), labels=c("?LN", > "BIO"))+ > scale_fill_manual(values=c("red&q...

...end = TRUE) + geom_point(data = base_puntos, aes(x = long.agencia.utm, y =lat.agencia.utm, colour="Agencia"), size = 3.05, pch = 20, fill = "Blue")+ labs(title=paste(base_titulos,"\n(por provincias)"),fill="Temperatura",colour=NULL)+ theme(title = element_text(colour="black", size = 16, face = "bold"))+ theme(legend.title = element_text(colour="black", size=13, face="bold"))+ theme(legend.text = element_text(colour="black", size = 10)) return(grafico) } El resultado es el siguiente: un mapa de...

...ength(y))), ymin=after_stat(y-se*sqrt(y))) , > method = "lm" , formula = y ~ x + I(x^2),linewidth=1) + > > theme(panel.background = element_blank())+ > > theme(axis.line = element_line(colour = "black"))+ > > theme(axis.text=element_text(size=18))+ > > theme(axis.title=element_text(size=20))+ > > ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ > > scale_color_manual(values=c("red","darkgreen"), labels=c("?LN", "BIO"))+ > > scale_fi...

...Jahr, y= QI_A,group=Bio,color=Bio, >linetype=Bio)) + > geom_smooth(aes(fill=Bio) , method = "lm" , formula = y ~ x + >I(x^2),linewidth=1) + > theme(panel.background = element_blank())+ > theme(axis.line = element_line(colour = "black"))+ > theme(axis.text=element_text(size=18))+ > theme(axis.title=element_text(size=20))+ > ylab("Anteil BFF an LN [%]") +xlab("Jahr")+ > scale_color_manual(values=c("red","dark green"), labels=c("?LN", >"BIO"))+ > scale_fill_manual(values=c("red",&...