Displaying 20 results from an estimated 46 matches for "element_text".
2016 Apr 09
1
Run script R
...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)),
? ? ?...
2013 Sep 26
1
Less than equal to symbol in ggplot2 legend text
...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...
2013 Sep 18
1
ggplot2: changing strip text in facet_grid and a legend text problem
...=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)) +...
2017 Nov 17
2
How to produce rainfall maps
...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-----...
2018 Jul 18
2
Legendas en una gráfica de ggplot2
...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]]
2017 Nov 21
0
How to produce rainfall maps
...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()
>...
2018 Jul 18
2
Legendas en una gráfica de ggplot2
...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...
2017 Jun 16
2
point size
...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]]
2015 Nov 13
2
Colores en labels de un mapa
...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...
2018 Apr 04
2
Plot data in sequence
...TAM 13142 2.79
STAM 14151 2.79
STAM 14152 2.77
')
ggplot(data=datn, aes(x=STATUS, y=CGPA, group=LEVEL,
colour=LEVEL),cex.axis=0.2, ylim=c(0,4)) +
geom_line(size=1.3) +
geom_point()+
#guides(fill=FALSE) +
theme(legend.title=element_blank(),legend.position=c(.3,
.3),axis.text.x = element_text(size=8),axis.text=element_text(size=10))
Thank you very much.
--
*Roslinazairimah Zakaria*
*Tel: +609-5492370; Fax. No.+609-5492766*
*Email: roslinazairimah at ump.edu.my <roslinazairimah at ump.edu.my>;
roslinaump at gmail.com <roslinaump at gmail.com>*
Faculty of Industrial Scienc...
2017 Jun 16
0
point size
You could add size = log10_P to the aes() inside geom_point().
Untested code below.
See also http://ggplot2.tidyverse.org/reference/geom_point.html
ggplot(mydata, aes(x = X, y = log10_P)) +
theme_bw() +
theme(panel.border=element_blank(), legend.position="top",
axis.text=element_text(size = 8)) +
geom_point(aes(color = Traits, size = log10_P))
Jean
On Fri, Jun 16, 2017 at 9:33 AM, greg holly <mak.hholly at gmail.com> wrote:
> Hi all;
>
> I am running the following ggplot codes. Runs well. However, I need to
> reflect the numeric values of the log10_P to t...
2017 Nov 02
3
ggplot inside function doesn't plot
...eturnData=TRUE)
png(paste("img/", X, ".png", sep=""))
ggplot(d, aes(x=condition, y=count, color=condition)) +
geom_point(position=position_jitter(w=0.1,h=0)) +
scale_y_log10(breaks=c(25,100,400)) +
ggtitle(X) +
theme(plot.title = element_text(hjust = 0.5))
dev.off()
}
'd' is a dataframe
count condition
E11.5 F20HET BA40_quant 955.9788 E11.5 F20HET
E11.5 F20HET BA45_quant 796.2863 E11.5 F20HET
E11.5 F20HET BB84_quant 745.0340 E11.5 F20HET
E11.5 F9.20DKO YEH3_quant 334.2994...
2017 Nov 02
3
ggplot inside function doesn't plot
...", X, ".png", sep=""))
>> ggplot(d, aes(x=condition, y=count, color=condition)) +
>> geom_point(position=position_jitter(w=0.1,h=0)) +
>> scale_y_log10(breaks=c(25,100,400)) +
>> ggtitle(X) +
>> theme(plot.title = element_text(hjust = 0.5))
>>
>> dev.off()
>> }
>>
>> 'd' is a dataframe
>>
>> count condition
>> E11.5 F20HET BA40_quant 955.9788 E11.5 F20HET
>> E11.5 F20HET BA45_quant 796.2863 E11.5 F20HET
>> E...
2017 Oct 13
4
[FORGED] can't print ggplot with Chinese characters to pdf files
...+geom_line()+ggtitle("test2")
> p1<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??")
> #Chinese title
> p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??")
> #Chinese title
> p1<-p1+theme(text = element_text(family = "Kaiti TC"))
> p2<-p2+theme(text = element_text(family = "Kaiti TC"))
>
> p<-array(list(NA), dim=2)
> p[[1]]<-p1
> p[[2]]<-p2
> p_series <- lapply(1:(length(p)), function(.x) p[.x][[1]])
>...
2016 Sep 06
2
Ayuda con gráfico típico de histograma más linea
...= "5 mins", date_labels = "%H:%M") +
> theme(panel.background = element_rect(fill = "white")) +
> scale_y_continuous(limits=c(0,1500)) +
> labs(x = "Minutos", y = "Tweets") + # Etiquetas o títulos de los ejes
> theme(axis.text.x=element_text(angle=90)) # Orientación texto eje x
>
> ggshr <- ggplot(ft, aes(x = hora, y = Share)) + geom_line(color="blue") +
> scale_x_datetime(date_breaks = "5 mins", date_labels = "%H:%M") +
> theme(panel.background = element_rect(fill = "white"))...
2017 Oct 13
1
[FORGED] can't print ggplot with Chinese characters to pdf files
...st1")
> #p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("test2")
> p1<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??") #Chinese title
> p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??") #Chinese title
> p1<-p1+theme(text = element_text(family = "Kaiti TC"))
> p2<-p2+theme(text = element_text(family = "Kaiti TC"))
>
> p<-array(list(NA), dim=2)
> p[[1]]<-p1
> p[[2]]<-p2
> p_series <- lapply(1:(length(p)), function(.x) p[.x][[1]])
> m2 <- marrangeGrob(p_series, nrow=2, ncol...
2017 Oct 12
2
can't print ggplot with Chinese characters to pdf files
...e()+ggtitle("test1")
#p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("test2")
p1<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??") #Chinese title
p2<-ggplot(df1, aes(x=x, y=y))+geom_line()+ggtitle("??") #Chinese title
p1<-p1+theme(text = element_text(family = "Kaiti TC"))
p2<-p2+theme(text = element_text(family = "Kaiti TC"))
p<-array(list(NA), dim=2)
p[[1]]<-p1
p[[2]]<-p2
p_series <- lapply(1:(length(p)), function(.x) p[.x][[1]])
m2 <- marrangeGrob(p_series, nrow=2, ncol=1)
ggsave("test_plot_chinese....
2017 Nov 02
0
ggplot inside function doesn't plot
...png(paste("img/", X, ".png", sep=""))
> ggplot(d, aes(x=condition, y=count, color=condition)) +
> geom_point(position=position_jitter(w=0.1,h=0)) +
> scale_y_log10(breaks=c(25,100,400)) +
> ggtitle(X) +
> theme(plot.title = element_text(hjust = 0.5))
>
> dev.off()
> }
>
> 'd' is a dataframe
>
> count condition
> E11.5 F20HET BA40_quant 955.9788 E11.5 F20HET
> E11.5 F20HET BA45_quant 796.2863 E11.5 F20HET
> E11.5 F20HET BB84_quant 745.0340 E...
2017 Nov 22
2
How to produce rainfall maps
..., 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?,
> >...
2018 Apr 04
0
Plot data in sequence
...77
> ')
>
> ggplot(data=datn, aes(x=STATUS, y=CGPA, group=LEVEL,
> colour=LEVEL),cex.axis=0.2, ylim=c(0,4)) +
> geom_line(size=1.3) +
> geom_point()+
> #guides(fill=FALSE) +
> theme(legend.title=element_blank(),legend.position=c(.3,
> .3),axis.text.x = element_text(size=8),axis.text=element_text(size=10))
>
> Thank you very much.
>
> --
> *Roslinazairimah Zakaria*
> *Tel: +609-5492370; Fax. No.+609-5492766*
>
--
Sarah Goslee
http://www.functionaldiversity.org