[R-es] Los puntos no tapen el mapa hecho ggplot

[Manuel Mendoza]

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"))

























.

[Juan Diego Alcaraz-Hernández]

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"))

Post by Manuel Mendoza
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
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]]

[Manuel Mendoza]

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

Post by Juan Diego Alcaraz-Hernández
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
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"))

Post by Manuel Mendoza
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
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
·´¯`·.¸¸..><((((º>.·´¯`·.¸¸.·´¯`·.¸><((((º>`·.¸¸.·´¯`·.¸
<º))))><`·.¸¸.·´¯`·.¸.<º))))><.¸. , . .·´¯`·.. <º))))><¸.·