带有 R 的气泡图

Question

我有一张桌子，里面有不同月份的丰富物种。 我想制作一个气泡图，其中 y 轴代表物种丰度，x 轴代表月份，而气泡半径代表我在该月发现的物种丰度。

我的数据排列是这样的

我想像这样结束气泡图

请帮我。 谢谢

Answer 1

以下是使用模拟数据集创建的气泡图。 我试图展示如何绘制具有与问题中的数据集类似的结构的数据集，并且像往常一样，这类问题是数据重组问题。 请参阅从宽格式到长格式重塑 data.frame 。 在这种情况下，我必须首先将行名称作为新列。 只有这样，数据才被重新格式化。

library(tidyverse)
library(ggplot2)

df1 %>%
  rownames_to_column(var = "id") %>%
  gather(key, Abundance, -id) %>%
  ggplot(aes(key, id)) +
  geom_point(aes(size = Abundance), colour = "red", fill = "red", shape = 21) +
  labs(x = "", y = "") +
  theme(axis.text.x = element_text(angle = 90, vjust = 0.5))

数据创建代码。

set.seed(1234)
df1 <- matrix(0, nrow = 10, ncol = 5)
df1[sample(prod(dim(df1)), 10)] <- sample(200:250, 10)
df1 <- as.data.frame(df1)
dimnames(df1) <- list(letters[1:10], LETTERS[1:5])