使用plot_gg制作ggplot 3D时遇到问题

Question

我在2020年3月做了一张美国各州的COVID病例图，但当我尝试运行plot_gg函数时，它显示为一张平面图像。我觉得我没有告诉函数高度变量应该是什么(在本例中是count)，但我尝试了任何方法，它要么不起作用，要么把地图搞得一团糟。

# Libraries
library(leaflet)
library(tidyverse)
library(ggmap)
library(leaflet.extras)
library(htmltools)
library(ggplot2)
library(maps)
library(mapproj)
library(mapdata)
library(rayshader)
library(viridis)

# US States
s <- map_data('state')
ggplot(s, aes(x=long, y=lat, group = group, fill = region)) +
  geom_polygon(color='black') +
  coord_map('polyconic') +
  guides(fill = F)

#COVID DAta -USA
c <- read.csv(file.choose(), header = T)
usa <- c %>% filter(country  == 'United States')
usa <- usa %>% group_by(province)%>%
  summarise(count=n())%>%
  arrange(desc(count))

#Merge Data
usa$province<- tolower(usa$province)
data <- merge(s, usa,
              by.x = 'region',
              by.y = 'province')

#ggplot 
 gg_usa = ggplot(data, aes(x=long, y=lat,
      group=group,
      fill=count)) +
  geom_polygon(color='grey') +
  coord_map('polyconic') +
  scale_fill_gradient2(low='white', high='purple') +
  theme_void() +
  ggtitle('COVID CASES MARCH 2020')


#Plot3d
plot_gg(gg_usa, multicore = TRUE, width = 6, height = 4)

​

​

Answer 1

我想你可能错过了科幻套餐。然后你可以使用geom_sf而不是geom polygon，例如

Geom_sf(aes(填充=计数))+

在https://www.tylermw.com/3d-ggplots-with-rayshader/上查看北卡罗来纳州的例子

如果使用geom polygon，那么我认为您需要向plot_gg添加一个scale参数