无FC值的KEGG通路富集分析Dotplot绘制报错求助

报错原因 #

Error: Discrete value supplied to continuous scale的核心原因是：你数据框中的pval列是离散类型（如字符格式），但scale_color_gradientn是为连续数值设计的颜色映射工具，二者类型不兼容导致冲突。

解决步骤 #

1. 将P值转换为数值型 #

这是最直接的解决方案，在ggplot代码前先处理pval的类型：

# 处理带特殊符号的P值（比如"<0.001"），转为纯数值
df$pval <- as.numeric(gsub("<", "", df$pval))

# 若P值本身是纯数字但存为字符，直接转换
# df$pval <- as.numeric(df$pval)

2. 替换为离散颜色映射（可选） #

如果你的P值是分组后的离散区间（比如"P<0.05"、"P<0.01"），可以把连续色阶换成离散配色：

# 替换原scale_color_gradientn为离散调色板
ggplot(df, aes(x=rf,y=pathway_term)) + 
  geom_point(aes(color=pval,size=gene)) + 
  scale_color_brewer(palette = "Set1") + # 改用离散配色
  labs(x='Rich Factor', y=NULL, color='P-value',size='Gene\nnumber' ) + 
  theme( axis.title = element_text(face='bold'), axis.text = element_text (face='bold') )

3. 完整修正代码示例（数值型P值场景） #

# 先转换P值类型
df$pval <- as.numeric(df$pval)

# 绘制Dotplot
ggplot(df, aes(x=rf,y=pathway_term)) + 
  geom_point(aes(color=pval,size=gene)) + 
  scale_color_gradientn(colours = rainbow(5)) + 
  labs(x='Rich Factor', y=NULL, color='P-value',size='Gene\nnumber' ) + 
  theme( axis.title = element_text(face='bold'), axis.text = element_text (face='bold') )

额外优化建议 #

• 检查rf（富集因子）和gene（基因数）列的类型，确保都是数值型，避免同类报错。
• 若P值过小（如1e-10），可以用-log10(pval)替代原pval作为颜色映射变量，提升颜色区分度：

  geom_point(aes(color=-log10(pval),size=gene))
  

内容的提问来源于stack exchange，提问作者Luiza Veiga