我已经使用 R 6 个月了(相当新)。我使用 facet_wrap 函数和 geom_point 创建了一个漂亮的图形。
但是,在绘制我感兴趣的另一个参数时,我似乎没有成功使用 geom_col。
代码如下:
T <- Titers %>%
ggplot(aes(Sample_ID, Titer)) +
geom_col(aes(col=Day), size=1.1) +
facet_wrap(Strategy~Additives) +
scale_color_manual(values = Ahmad) +
ylab('Titer mg/L') +
xlab('Time (Day)') +
ggtitle('All data') +
geom_label_repel(aes(label = Sample_ID), data = tail(Titers, 14), nudge_x =
2, direction = "y", segment.size = 0.2, hjust = 0) + theme(strip.text.x =
element_text(size = 12), axis.title = element_text(size = 14), axis.text =
element_text(size = 14), legend.position = "none")
一直运行良好的代码如下:
Q2 <- USP20005 %>%
ggplot(aes(Day, Diameter)) +
geom_line(aes(col=Sample_ID), size=1.1) +
facet_wrap(Strategy~Additives) +
scale_color_manual(values = Ahmad) +
ylab('VCD E6 cells/mL') +
xlab('Time (Day)') +
ggtitle('All data') +
geom_label_repel(aes(label = Sample_ID), data = tail(USP20005, 24), nudge_x
= 2, direction = "y", segment.size = 0.2, hjust = 0) +
theme(strip.text.x = element_text(size = 12), axis.title = element_text(size =
14), axis.text = element_text(size = 14), legend.position = "none") +
scale_x_continuous(breaks = seq(0, 14, 2), limits = c(0, 14)) +
scale_y_continuous(breaks = seq(10, 20, 2), limits = c(10, 20))
为什么列之间有空格,即使我使用 facet_warp 将样本分成不同的盒子(似乎 R 仍在保留空白点?)
需要说明的是:我想在盒子里看到每 2-4 个样本,其中每个样本在不同日期的条相互粘在一起。我能够将它们堆叠起来,但我不想要那样。
我在这里做错了什么?任何帮助将非常感激。
提前谢谢你艾哈迈德