df1 <- data.frame(
term = paste0('term', 1:4),
p.val = runif(4, 1, 5)
)
样例数据集
之后,使用 geom_col()...在此之前,创建一个新的数据框,根据你的 x 值,手动划分 x 轴尺度范围。...df2 <- data.frame(x = c(0,2,4,6), y = df1$term)
然后进行一些细节的调整,得到下面的图形。...df1 <- data.frame(
term = paste0('term', 1:8),
p.val = runif(8, 1, 5),
score = rnorm(8, 0, 1)
)...df2 <- data.frame(x = c(0:6,6), y = df1$term)
ggplot(df1, aes(p.val, term)) +
geom_col(aes(fill =