Question

我有一个名为NData4的数据框，我正在使用均值绘制以y轴为时间，x轴为均值的折线图。

我正在尝试使用geom_signif在时间6到12的折线图中添加显着水平。

geom_signif(comparisons = list(c("6", "9", "12")), y_position=70, annontation="****")

但是，始终显示错误“ check.length（gparname）中的错误：'gpar'元素'fontsize'不能为长度0”。只有删除了geom_signif命令，才会创建图形。有人可以帮我吗？

这是我的代码

d <- ggplot(NData4, aes(x=factor(Time.h.), y=mean, color=Conditions))+
  geom_point(aes(shape=Conditions), size = 3) +
 geom_line(aes(linetype=Conditions, group=Conditions), textsize=6)+
  geom_errorbar(aes(ymin=mean-se, ymax=mean+se), width=.2, 
            position=position_dodge(0.05))+
geom_signif(comparisons = list(c("6", "9", "12")), y_position=70, annontation="****")+
  scale_y_continuous(expand=c(0,0), breaks = seq(0,120,20), limits = lim)+
  scale_linetype_manual(values = c(1,1,1,1,1)) +
  scale_shape_manual(values=c(20,18,18))+
  scale_color_manual(values=c('#000000', '#E69F00', '#1966FF'))+
  labs(x="Time (h)", y="Wound Healing Closure Rate %")+
  theme_classic()+
theme(text = element_text(size = 15, family = "Times New Roman", color = "Black", face="bold"), legend.position = "bottom")
print(d)

这是我的数据

条件Time.h。 se 1个eGFP 0 0.000000 0.0000000 2个eGFP 3 6.562787 0.4799552 3个eGFP 6 21.504159 0.9974631 4个eGFP 9 36.787618 1.1079184 5个eGFP 12 50.019418 1.4305632 6个eGFP 24 97.479888 1.2509783 7硫1B 0 0.000000 0.0000000 8硫1B 3 5.951296 0.7021406 9硫1B 6 18.670877 0.8893744 10硫磺1B 9 32.599565 1.3664472 11硫磺1B 12 44.155682 1.9894969 12硫1B 24 96.244273 1.7977082 13硫2B 0 0.000000 0.0000000 14硫2B 3 13.619606 1.2743346 15硫2B 6 27.584158 1.1038792 16硫2B 9 41.353119 1.0956978 17硫2B 12 52.548611 1.2922331 18 Sulf2B 24 98.129991 0.7444856

R：geom_signif在折线图中显示“ check.length（gparname）中的错误：'gpar'元素'fontsize'的长度不能为0”

0 个答案: