我已经生成了以下情节。当IV值高于0.0015时,我想用一条线切割条形图并显示该线。
ggplot(data = WOE_categorical_summary, aes(x = reorder(Variable, -IV), y = IV)) +
geom_bar(stat = "identity", fill = "orange") +
geom_text(aes(label=IV)) +
labs(xlab = "Variables") +
bar_theme1
答案 0 :(得分:2)
一种可能的解决方案是在代码中添加一个额外的图层:
+ geom_hline(aes( yintercept = 0.0015))