问题描述
library(datasets)
library(tidyr)
library(ggplot2)
data(mtcars)
wd_dat<-gather(mtcars,fun,val,c("hp","drat","wt"))
wd_dat<-wd_dat[,9:10]
p<-ggplot(wd_dat,aes(x=val,color=fun)) +
geom_density()+
labs(
x = " Value",y = "Density",title ="Title"
) +
theme_classic()
p
在这里,我想在x轴上为val添加50-200之间的间隙。我找到了一些用于y轴的软件包(gg.gap),但是我需要用于x轴的软件包。我不喜欢facet_grid,因为这会抑制趋势。任何建议将是非常有益的。情节的例子 https://www.google.com/search?q=break+on+x+axis&tbm=isch&ved=2ahUKEwiHis74pJ_sAhVCgHIEHdS7CZUQ2-cCegQIABAA&oq=break+on+x+axis&gs_lcp=CgNpbWcQAzIGCAAQBRAeOgYIABAHEB46CAgAEAcQBRAeOggIABAIEAcQHlD3YFi1Z2ClaWgAcAB4AIABPIgBowKSAQE1mAEAoAEBqgELZ3dzLXdpei1pbWfAAQE&sclient=img&ei=3gd8X4ejIcKAytMP1PemqAk&bih=937&biw=1920&rlz=1C1CHBF_enUS868US868#imgrc=3tbcePgcIq_ZHM
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)