气泡图，包含按周期排序和按类型划分的分类数据

Question

我想知道是否有人能帮我，因为我正在试着画下一张图

​

​

但我只有这个，我不知道为什么，也不知道我要做什么

​

​

这是我的汉化

base = read.table(text = 
"sex;period;type;count
A;C;E;63
A; D; E;5
B; C; E; 82
B;D;E;50
A;C;F;99
A;D;F;9
B;C;F;121
B; D; F; 22",
                  header = TRUE, sep=";")
attach(base)
library(ggplot2)

ggplot(base, aes(x = sex, y = period)) + 
  geom_point(aes(size = count), alpha = 0.5) +
  scale_size(range = c(0.5, 12)) +
  geom_text(aes(label=count),size=4)

谢谢

Answer 1

在这里，一个可能的解决方案是对你的图进行分面。

我使用dplyr将管道序列传递给1)修改您的示例(在"period“和"type”变量中有一些额外的空格，以及2)修改"type“变量以在绘图上进行适当的标记。

使用facet_grid，您可以将两个面板一个放在另一个面板上，然后通过操作theme函数，可以获得所需的输出：

library(dplyr)
library(ggplot2)

base %>% mutate(type = sub(" ","",type), period = sub(" ","",period)) %>%
  mutate(type = paste("Type",type)) %>%
  ggplot(aes(x = sex, y = period, size = count))+
  geom_point(alpha = 0.5)+
  scale_size(range = c(0.5, 12)) +
  geom_text(aes(label=count),size=4)+
  facet_grid(type~.)+
  theme(strip.text.y = element_text(angle = 0),
        panel.spacing = unit(0, "lines"),
        strip.background.y = element_blank())

​

​

它回答了你的问题吗？