R ggplot aes评估（解析（文本））

我的数据

DT

具有以下结构：

structure(list(Ticker = c("MSDLWI Index", "MSDLWI Index", "MSDLWI Index", "MSDLWI Index","MSDLWI Index", "MSDLWI Index", "NDLEACWF Index", "NDLEACWF Index", "NDLEACWF Index","NDLEACWF Index", "NDLEACWF Index", "NDLEACWF Index"), Date = structure(c(-1L, 89L, 180L, 272L, 364L, 454L, 15705L, 15793L, 15884L, 15978L, 16070L, 16136L), class = c("IDate", "Date")), Value = c(NA, -0.02925, -0.180118465104301, 0.124488001005151, 0.0497217814923236,0.0966385660152425, 0.0323951658690891, 0.0842289682913797, 0.00992717655157427, 0.0631103139013451, 0.0782204344979787, 0.00855027196875335)), .Names =c("Ticker", "Date", "Value"), row.names = c(NA, -12L),class=c("data.table","data.frame"))

水头（DT，3）

但是，列名可能不稳定，因此我尝试在

ggplot

调用中对其进行参数化：

var.col="Ticker"
ggplot(DT, aes(x=Date, y=Value, colour=eval(parse(text=var.col)))) + geom_line()

---

在绘图图例中，如何显示

Ticker

而不是

eval（parse（text=var.col））

？

您只需在色标中添加一个名称即可：

ggplot(DT, aes(x=Date, y=Value, colour=eval(parse(text=var.col)))) + geom_line() +
  scale_color_discrete(name=var.col)

---

没有理由使用funky

eval（parse（））

business：

ggplot(DT, aes_string(x="Date", y="Value", colour=var.col)) + 
    geom_line()

---

可能的重复：（在研究我的问题时没有找到它。这将两者联系起来，我们只是用不同的语言来描述问题。

ggplot(DT, aes_string(x="Date", y="Value", colour=var.col)) + 
    geom_line()