在 ggplot2 中绘制堆积条形图：将变量表示为另一个变量的百分比

我仍然不确定，如果我理解正确的话。但我决定用一个例子来澄清事情更容易。所以这里有一个可能的（但可能不是最优雅的）解决你的问题的方法：

temp <- dplyr::tibble(type=c("Core","Mainframe","Network","Oracle","Unix"),
                      sample=c(2,2,3,2,2),
                      pop=c(4,17,31,3,2))
temp %>%
    dplyr::mutate(diff=pop-sample) %>%
    tidyr::pivot_longer(cols=c(sample,pop,diff)) %>%
    dplyr::filter(name!="pop") %>%
    ggplot2::ggplot(ggplot2::aes(x=type,y=value,fill=name)) +
    ggplot2::geom_bar(stat="identity")