我的数据看起来像这样
df <- data.frame(c("Cell1","Cell2","NK-Cell"),c("K","L","S","L","K","S","S","L","K"),abs(log2(abs(rnorm(180)))))
colnames(df) <- c("ctype","tissue","exp")
Run Code Online (Sandbox Code Playgroud)
我正在尝试创建一个看起来像这样的情节.

在这种情况下的一般想法是使用刻面来获得这种情节.
ggplot(df,aes(exp))+geom_density()+facet_grid(tissue~ctype)
Run Code Online (Sandbox Code Playgroud)
有两个空图,因为没有Cell2值tissue S和没有NK-Cell值tissue L.
