将注释颜色条添加到 ggplot 或 ggvis barplot

【问题标题】：Add annotation color bar to ggplot or ggvis barplot将注释颜色条添加到 ggplot 或 ggvis barplot
【发布时间】：2018-06-03 14:59:16
【问题描述】：

有人知道如何在ggplot 或ggvis/plotly/... barplot 中添加注释颜色条吗？

一个例子就像下面的“热图 1”，用一个颜色条（蓝色和红色）表示样本信息为类型 a 或类型 b：

【问题讨论】：

到目前为止您尝试过什么？ showing some effort 或者 reproducible example 怎么样？

标签： r ggplot2 visualization plotly ggvis

【解决方案1】：

如果您将type a/type b 变量用于fill 美学，您将获得彩色条和图例。

suppressPackageStartupMessages(library(tidyverse))

df <- data.frame(trt = c("a", "b", "c"), outcome = c(2.3, 1.9, 3.2))
ggplot(df, aes(trt, outcome, fill=trt)) +
  geom_col()

【讨论】：