Renvoie le nom de l'ensemble de données dans R

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