如何在数据框/小标题中添加额外的行?

时间:2019-07-08 10:04:30

标签: r ggplot2 dplyr

我要从一个大数据框中选择一些样本,然后根据这些样本的收集时间为其分配一个编号。然后,我用ggplot绘制图形(这不是问题!)。

我遇到的问题是这些示例中的某些缺少行,因此在任何示例中我都没有所有8个“ ref_name”的条目。如果另一个样本具有该特定“ ref_name”的值,是否可以将0加到“ rpkm”?还是一种加入所选样本的方法,该方法将显示出来并允许我绘制图形?

  • 从“数据”中选择样本,然后在同一样本中收集2-4个样本
sample_1<- data %>% 
filter(samp_id %in% "23") %>%
select(samp_id, ref_name, rpkm) %>%
mutate(samp_no="1")
  • 加入四人情节
plot <- bind_rows(sample_1, sample_2, sample_3, sample_4)
  • 情节
ggplot()+ 
geom_col(data=plot, aes(x=samp_no, y=rpkm, fill=ref_name), position="dodge"))

在结果图中,我看到了rpkm值的条形,但是由于输入数据在rpkm中没有显示0,所以我看不到想要显示的rpkm = 0空格。

the resulting plot

first 10 rows of the plot data

0 个答案:

没有答案