[R-es] Superponer mapas en ggplot

[Manuel Mendoza]

Gracias Juan Diego. Esa es exactamente la idea. Ahora me surge otro
problema: aun mirando los ejemplos, y otros que busqué en Internet, no
consigo que me represente los dos mapas.

Uno es:
  geom_point(data=NCDS,aes(x=lon,y=lat,color= PA),shape=15,size=1) +
  scale_color_manual(values=c("white","grey70"))+

y el otro:
 geom_point(data=NCDS,aes(x=lon,y=lat,color= ExtTG7085),shape=15,size=1) +
 scale_colour_gradient2(low =
"white",high="RED",midpoint=0,guide="colourbar",limits=c(0,200))+

Manuel




El mar., 28 jul. 2020 a las 9:02, Juan Diego Alcaraz-Hernández (<
jdalcaraz using gmail.com>) escribió:

> Quizás lo tienes solucionado con el argumento alfa (para fijar un nivel de
> transparencia en el gráfico).
>
> Te mando un ejemplo:
>
> https://rpubs.com/daniballari/ggplot
>
>
>
>
>
> El mar., 28 jul. 2020 a las 8:26, Manuel Mendoza (<
> mmendoza using fulbrightmail.org>) escribió:
>
>> Buenos días. Tengo dos mapas que hago con ggplot (abajo) y necesito
>> superponer el 2º al 1º. En el 1º se representa la variable PA, binomial
>> (0,
>> 1), en gris, y en el 2º la variable ExtTG7085, que es numérica y va de 0 a
>> 200. La 2ª es un gradiente en rojo. Lo ideal sería que donde coinciden el
>> rojo de la 2ª se viera más oscuro, pero supongo que eso no es fácil.
>> Podría
>> también ser en otro color, pero manteniendo el gradiente. He pensado,
>> también, en crear una nueva variable, combinación de las dos, que me
>> permitiera hacer eso mismo, pero no encuentro la forma.
>>
>> Gracias por vuestra ayuda, una vez más,
>> Manuel
>>
>> ggplot(legend=FALSE)+
>>   geom_point(data=NCDS,aes(x=lon,y=lat,color= PA),shape=15,size=1) +
>>   scale_color_manual(values=c("white","grey70"))+
>>   geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))
>>
>> ggplot(legend=FALSE)+
>>   geom_point(data=NCDS,aes(x=lon,y=lat,color= ExtTG7085),shape=15,size=1)
>> +
>> # PTP o FTP
>>   scale_colour_gradient2(low =
>> "white",high="RED",midpoint=0,guide="colourbar",limits=c(0,200))+
>>   geom_path(data=map_data('world'), aes(x=long, y=lat,group=group))
>>
>>         [[alternative HTML version deleted]]
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es using 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]]