Buenos días. Hago mis mapas con el código que os copio abajo, pero me
gustaría que me dibujase las líneas del mapa después de poner los
puntos para 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_point(data=Data,aes(x=lon,y=lat,color=
value),size=1.5) +
scale_colour_gradient2(low = "white", mid =
"blue",high = "red", midpoint = 175,
guide="colourbar",limits=c(0,350))+
labs(title = "Depth of changes"))
.
--
Dr Manuel Mendoza
Department of Biogeography and Global Change
National Museum of Natural History (MNCN)
Spanish Scientific Council (CSIC)
C/ Serrano 115bis, 28006 MADRID
Spain
Juan Diego Alcaraz-Hernández
2018-Nov-14 11:58 UTC
[R-es] Los puntos no tapen el mapa hecho ggplot
No entieno muy bien lo que preguntas. Además, los datos de Data no están
disponibles por lo que no puedo ver como quedaría el gráfico.
Sin embargo, si lo que quieres es que la linea de los mapas "tape" los
puntos que están cerca de los puntos, debes de copiar el mismo código para
visualizar el mapa debajo de los línea de puntos, de esta manera:
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_point(data=Data,aes(x=lon,y=lat,color= value),size=1.5) +
scale_colour_gradient2(low = "white", mid =
"blue",high = "red",
midpoint = 175,guide="colourbar",limits=c(0,350))+
geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+
labs(title = "Depth of changes"))
Es lo que yo hago, no se si habrá otra manera... :-)
Tambien pudes unir los "theme" con comas y como preferencia personal,
yo lo
pondría al final del código...
ggplot(legend=FALSE)+
geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+
geom_point(data=Data,aes(x=lon,y=lat,color= value),size=1.5) +
scale_colour_gradient2(low = "white", mid = "blue",high =
"red", midpoint
= 175,guide="colourbar",limits=c(0,350))+
geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+
theme(panel.background=element_blank(),
panel.grid.major = element_blank(),
panel.grid.minor = element_blank(),
axis.text.x=element_blank(),
axis.text.y=element_blank(),
axis.ticks = element_blank())+
xlab("") +
ylab("")+
labs(title = "Depth of changes"))
El mié., 14 nov. 2018 a las 12:35, Manuel Mendoza (<mmendoza en
mncn.csic.es>)
escribió:
> Buenos días. Hago mis mapas con el código que os copio abajo, pero me
> gustaría que me dibujase las líneas del mapa después de poner los
> puntos para 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_point(data=Data,aes(x=lon,y=lat,color>
value),size=1.5) +
> scale_colour_gradient2(low = "white", mid >
"blue",high = "red", midpoint = 175,
> guide="colourbar",limits=c(0,350))+
> labs(title = "Depth of changes"))
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
> .
>
> --
> Dr Manuel Mendoza
> Department of Biogeography and Global Change
> National Museum of Natural History (MNCN)
> Spanish Scientific Council (CSIC)
> C/ Serrano 115bis, 28006 MADRID
> Spain
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
--
Juan Diego Alcaraz Hernández
http://juandiegoalcaraz.wordpress.com/
Research Group on Ecology of Inland Waters (GRECO)
Research Group on Aquatic Ecology (EcoAqua)
Institute of Aquatic Ecology
University of Girona
·´¯`·.¸¸..><((((º>.·´¯`·.¸¸.·´¯`·.¸><((((º>`·.¸¸.·´¯`·.¸
<º))))><`·.¸¸.·´¯`·.¸.<º))))><.¸. , . .·´¯`·..
<º))))><¸.·
[[alternative HTML version deleted]]
Gracias Juan Diego, se trataba exactamente de eso, y claro, funcionó. Como decía, ese es el código que utilizo para hacer los mapas, pero no sé exactamente cómo funciona cada una de sus partes. Yo probé a copiar esa misma línea más abajo pero me daba error porque no lo hacía correctamente. Gracias, Manuel Quoting Juan Diego Alcaraz-Hernández <jdalcaraz en gmail.com>:> No entieno muy bien lo que preguntas. Además, los datos de Data no están > disponibles por lo que no puedo ver como quedaría el gráfico. > Sin embargo, si lo que quieres es que la linea de los mapas "tape" los > puntos que están cerca de los puntos, debes de copiar el mismo código para > visualizar el mapa debajo de los línea de puntos, de esta manera: > > 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_point(data=Data,aes(x=lon,y=lat,color= value),size=1.5) + > scale_colour_gradient2(low = "white", mid = "blue",high = "red", > midpoint = 175,guide="colourbar",limits=c(0,350))+ > geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+ > labs(title = "Depth of changes")) > > Es lo que yo hago, no se si habrá otra manera... :-) > > Tambien pudes unir los "theme" con comas y como preferencia personal, yo lo > pondría al final del código... > > ggplot(legend=FALSE)+ > geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+ > geom_point(data=Data,aes(x=lon,y=lat,color= value),size=1.5) + > scale_colour_gradient2(low = "white", mid = "blue",high = "red", midpoint > = 175,guide="colourbar",limits=c(0,350))+ > geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))+ > theme(panel.background=element_blank(), > panel.grid.major = element_blank(), > panel.grid.minor = element_blank(), > axis.text.x=element_blank(), > axis.text.y=element_blank(), > axis.ticks = element_blank())+ > xlab("") + > ylab("")+ > labs(title = "Depth of changes")) > > > El mié., 14 nov. 2018 a las 12:35, Manuel Mendoza (<mmendoza en mncn.csic.es>) > escribió: > >> Buenos días. Hago mis mapas con el código que os copio abajo, pero me >> gustaría que me dibujase las líneas del mapa después de poner los >> puntos para 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_point(data=Data,aes(x=lon,y=lat,color>> value),size=1.5) + >> scale_colour_gradient2(low = "white", mid >> "blue",high = "red", midpoint = 175, >> guide="colourbar",limits=c(0,350))+ >> labs(title = "Depth of changes")) >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> >> . >> >> -- >> Dr Manuel Mendoza >> Department of Biogeography and Global Change >> National Museum of Natural History (MNCN) >> Spanish Scientific Council (CSIC) >> C/ Serrano 115bis, 28006 MADRID >> Spain >> >> _______________________________________________ >> R-help-es mailing list >> R-help-es en r-project.org >> https://stat.ethz.ch/mailman/listinfo/r-help-es >> > > > -- > Juan Diego Alcaraz Hernández > > http://juandiegoalcaraz.wordpress.com/ > Research Group on Ecology of Inland Waters (GRECO) > Research Group on Aquatic Ecology (EcoAqua) > Institute of Aquatic Ecology > University of Girona > > ·´¯`·.¸¸..><((((º>.·´¯`·.¸¸.·´¯`·.¸><((((º>`·.¸¸.·´¯`·.¸ > <º))))><`·.¸¸.·´¯`·.¸.<º))))><.¸. , . .·´¯`·.. <º))))><¸.·-- Dr Manuel Mendoza Department of Biogeography and Global Change National Museum of Natural History (MNCN) Spanish Scientific Council (CSIC) C/ Serrano 115bis, 28006 MADRID Spain