时间戳

首页 > 解决方案 > 形状重叠的颜色 R

r - 形状重叠的颜色 R

问题描述

是否可以让两个透明形状重叠但让它成为单一颜色而不是更深的阴影。

library(ggplot2, "maps")
states<-map_data("state")
scenario<-subset(states, region %in% c("arizona", "new mexico", "texas", "oklahoma", 
          "kansas", "missouri", "louisiana", "arkansas", "colorado", "nebraska"))

Locations<-read.csv("FRIENDLY.csv", stringsAsFactors = FALSE)

map<-ggplot(data = scenario) +
  geom_polygon(aes(x = long, y = lat, group = group), fill = "palegreen", color = "black") +
  coord_fixed(1.3)

map +
  geom_point(data= Locations, aes(x = LONG, y = LAT), fill = "black", size=64, alpha=I(0.2))

[在此处输入图像描述]

标签： r

解决方案

你能不能只使用没有填充shape = 1的点和只有边缘的空心点？

library(ggplot2)
library(maps)
#> Warning: package 'maps' was built under R version 3.5.1
scenario <- subset(map_data("state"), region %in% c(
  "arizona", "new mexico", "texas", "oklahoma",
  "kansas", "missouri", "louisiana", "arkansas", "colorado", "nebraska"
))
set.seed(12345)
locations <- data.frame(
  LONG = runif(10, -115, -90),
  LAT = runif(10, 25, 40)
)

ggplot(data = scenario) +
  geom_polygon(
    mapping = aes(x = long, y = lat, group = group),
    fill = "palegreen",
    color = "black"
    ) +
  coord_fixed(1.3) +
  geom_point(
    data = locations,
    mapping = aes(x = LONG, y = LAT),
    fill = NA,
    size = 64,
    shape = 1
    )

由reprex 包（v0.2.0）于 2018 年 8 月 3 日创建。

推荐阅读