return the name of the dataset in r code example

Example: return the name of the dataset in r

# in r
a <- data.frame()
deparse(substitute(a))