R 使用传递给函数的数据帧的名称作为绘图标题

我有一个函数foo，它接受一个数据帧作为输入，并返回一个ggplot对象作为输出。我需要使用数据框的名称作为绘图的标题。我不知道该怎么做

如果我没有将其传递给函数，我知道我可以使用

deparse（substitute（df））

来获得所需的标题。但我无法在函数内部执行此操作

---

你有什么想法吗？

你没有给出一个简单的例子来说明这个问题。以下是我的作品：

a <- expand.grid(x=1:3, y=1:2)
f <- function(df){qplot(x, y, data=a, main=deparse(substitute(df)))}
f(a)

---

a您没有给出一个最小的示例来说明问题。以下是我的作品：

a <- expand.grid(x=1:3, y=1:2)
f <- function(df){qplot(x, y, data=a, main=deparse(substitute(df)))}
f(a)

a