我想知道如何使用不需要手动输入的代码在数据帧中创建具有重复对象名称的列。
例如,我可以使用以下代码手动完成此操作:
# displays df
mtcars
# adds column manually
# ---- NOTE: REQUIRES MANUAL INPUT
mtcars$dataset_name <- c("mtcars")
# gives unique values for mtcars$dataset_name
unique(mtcars$dataset_name)
有没有自动做到这一点?
谢谢。
我们可以创建一个函数,将对象作为输入,并返回一个对象名为的列
f1 <- function(dat) {
nm1 <- deparse(substitute(dat))
dat$dataset_name <- nm1
dat
}
f1(mtcars)