我无法让 ggplot2 在水平条中显示中断。代码如下:
dat <- data.frame(
result = c(replicate(50, 'ok'), replicate(17, 'error'), replicate(35, 'notrun')),
test = 'test',
count = 'count'
)
ggplot(data=dat, aes(x=test, y=count, fill=result)) +
geom_bar(stat="identity") +
scale_fill_manual(values = c(ok = '#00BA38', error='#F8766D', notrun='gray')) +
xlab("") + ylab("") +
scale_x_discrete(label="") +
scale_y_discrete(breaks = c(1, 7, 9)) +
coord_flip()