R 为ggplot图形中的每一行设置单独的字母

我想用geom_线构建一个带有ggplot的图形。我编写了以下reprex以暴露问题：

库（ggplot2）
数据您需要在绘图中添加
scale\u alpha\u identity
。这允许将
Alpha
的值逐字解释为您想要的行的Alpha值：

ggplot(data, aes(x = Obs, y = Value, col = Var, alpha = Alpha)) +
  geom_line() +
  scale_alpha_identity()

将阿尔法美学更改为由
Var
确定，然后使用离散尺度。它将发出警告，因为
ggplot2
作者认为这样做很奇怪

ggplot(data, aes(x = Obs, y = Value, col = Var, alpha = Var)) +
  scale_alpha_discrete(limits = c("A","B"), range = c(0.7, 0.99), guide = FALSE) + 
  geom_line()

尝试
alpha=as.factor（alpha）
。或
…+比例α离散（…）
。默认情况下，
ggplot
使用连续比例表示透明度。