search for: element_blank

...ara que se vean. Puedo hacer los puntos más pequeños, pero entonces quedan separados y yo quiero que rellenen el mapa. Gracias, como siempre, Manuel print(ggplot(legend=FALSE)+geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+ theme(panel.background=element_blank())+theme(panel.grid.major = element_blank())+ theme(panel.grid.minor = element_blank())+theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ theme(axis.ticks = element_blank())+xlab("") + ylab("")+ geom_poin...

...le_fill_manual(values=c("#7b3294", "#c2a5cf", "#a6dba0", "#008837"))+ ylab("Performance (ns/day)") + facet_wrap(~specie,nrow=3, labeller = label_wrap_gen(width = 85), strip.position="bottom") + theme_bw() + theme(panel.grid = element_blank(), panel.spacing = unit(0, "mm"), legend.title=element_blank(), axis.title.x = element_blank(), panel.grid.major = element_blank(), panel.grid.minor = element_blank(), panel.background = element_blank(), axis.ticks.x=element_blank(),...

...os pone gris. Si pongo limits=c(-400, 200), me colorea bien los negativos (azul), pero los positivos apenas se ven. Necesito que me pinte los azules como el primero, y los azules como el segundo. Gracias Este es el código: ggplot(legend=FALSE)+ theme(panel.background=element_blank())+ theme(panel.grid.major = element_blank())+ theme(panel.grid.minor = element_blank())+ theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ theme(axis.ticks = element_blank()) + xlab("") + ylab("")+ geom_point(data=S...

...acuerdo a una de las 20 variables de GT. GT<- c("var1","var2", ? "var20") for(i in GT) { df2<-subset(df1, subset=get(GT[i])>0) windows();print(ggplot(legend=FALSE)+geom_path( data=world, aes(x=long, y=lat,group=group))+ theme(panel.background=element_blank())+theme(panel.grid.major = element_blank())+ theme(panel.grid.minor = element_blank())+theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ theme(axis.ticks = element_blank())+xlab("") + ylab("")+ geom_point(data=df2,aes(x=lon,y=lat,...

...iduevec),rep(NA,nrow(waffle)-length(residuevec))) png(paste('plot',i,'.png',sep='')) print(ggplot(waffle, aes(x = x, y = y, fill = residue)) + geom_tile(color = "white") + scale_fill_manual("residue",values = col4) + coord_equal() + theme(panel.grid.minor=element_blank(),panel.grid.major=element_blank()) + theme(axis.ticks=element_blank()) + theme(axis.text.x=element_blank(),axis.text.y=element_blank()) + theme(axis.title.x=element_blank(),axis.title.y=element_blank()) ) dev.off()} With my scripts, I could make a waffle plot, but not a *square* 10 X 10 waffle pl...

...os (azul), pero los > > positivos apenas se ven. Necesito que me pinte los azules como el > primero, > > y los azules como el segundo. > > Gracias > > > > Este es el código: > > ggplot(legend=FALSE)+ > > theme(panel.background=element_blank())+ > > theme(panel.grid.major = element_blank())+ > > theme(panel.grid.minor = element_blank())+ > > > > theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ > > theme(axis.ticks = element_blank()) + xlab("&quo...

...ot;var1","var2", ? "var20") >> >> for(i in GT) { >> >> df2<-subset(df1, subset=get(GT[i])>0) >> >> windows();print(ggplot(legend=FALSE)+geom_path( data=world, >> aes(x=long, y=lat,group=group))+ >> theme(panel.background=element_blank())+theme(panel.grid.major = >> element_blank())+ >>         theme(panel.grid.minor = >> element_blank())+theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ >>         theme(axis.ticks = element_blank())+xlab("") + ylab("")+ >>         g...

...que me pinte los azules como el >> > primero, >> > > y los azules como el segundo. >> > > Gracias >> > > >> > > Este es el código: >> > > ggplot(legend=FALSE)+ >> > > theme(panel.background=element_blank())+ >> > > theme(panel.grid.major = element_blank())+ >> > > theme(panel.grid.minor = element_blank())+ >> > > >> > > theme(axis.text.x=element_blank(),axis.text.y=element_blank())+ >> > > theme(ax...

...=c("ID","Type","Annee")) myplot =ggplot(df.long,aes(variable,value,fill=as.factor(Annee)))+ geom_bar(position="dodge",stat="identity")+ ylab("Simulation Progress (%)") + 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 ca...

...ylab('') + labs(fill='Goal') + theme( plot.title = element_text(lineheight=.8, face="bold"), panel.background = element_rect(fill = "transparent",colour = NA), panel.grid.minor = element_blank(), panel.grid.major = element_blank(), strip.background = element_rect(fill = "transparent",colour = NA), strip.text.y = element_text(face="bold", size=10), plot.background = element_rect(fill = "transparent&quot...

...lat, #y axis label = Number, #the value to display size=3)) + #size of the text theme(axis.ticks = element_blank(), #theme of the graph, no axis ticks axis.text = element_blank(), #no axis text panel.background = element_blank(), #blank background panel.border = element_blank())...

Hi all; I am running the following ggplot codes. Runs well. 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]]

...or=?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---------------- Stefano Sofia PhD Area Meteorologica e Area nivologica - Centro Funzionale Servizio Protezione Civile - Regione Marche Via del Colle Ameno 5 60126 Torre...

...r responses and supports. I just faced a different problem. I have the following R codes and work well. p <- ggplot(a, aes(x=Phenotypes, y=Metabolites, size=abs(Beta), colour=factor(sign(Beta)))) + theme(axis.text=element_text(size = 5)) p1<-p+geom_point() p2<-p1+theme(panel.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 = "bla...

...tried to increase the legend height in ggplot2, but it did not respond at all using the follwoing code. Do you have any suggestions for me? dat<-data.frame(temperature) P1<-ggplot(dat, aes(X, Y)) Scenario1<-P1+geom_point(aes(colour = value), size = 1)+ theme_bw()+ theme(axis.text.x = element_blank(),axis.text.y = element_blank()) Scenario1<-Scenario1+facet_wrap(~variable, ncol=2)+scale_color_gradientn(colours = rainbow(48)) Scenario1+guides(fill = guide_colorbar(bar width = 1.5, barheight = unit(10, "mm"))) Thanks, KG [[alternative HTML version deleted]]

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...

...e_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---------------- > Stefano Sofia PhD > Area Meteorologica e Area nivologica - Centro Funzionale > Servizio Protezione...

Muy buenas. Quiero hacer un loop en el que en cada iteración se hace un subset con el que se queda con las muestras para la que cierta variable es positiva. Si hago esto, sale bien: df2<-subset(df, subset = var1>0) Pero he probado así (y de no sé cuantas formas más), antes de hacer el for, y no sale: GT<- c("var1","var2", ? ) df2<-subset(df,

...r responses and supports. I just faced a different problem. I have the following R codes and work well. p <- ggplot(a, aes(x=Phenotypes, y=Metabolites, size=abs(Beta), colour=factor(sign(Beta)))) + theme(axis.text=element_text(size = 5)) p1<-p+geom_point() p2<-p1+theme(panel.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 = "bla...

Buenos días: A ver si alguien me puede iluminar, porque ya he sobrepasado los límites de mi paciencia y de mi imaginación con este asunto: Dado un gráfico creado con un plot (y funciones auxiliares como polygon, etc.) y una tabla creada debajo de ese gráfico (creada con addtable2plot), y dados unos text situados a modo de título encima del plot y otros encima de la tabla, ¿por qué cuando trato