替换环境中所有数据框中的字符

Question

我正在运行一个函数，该函数将环境中的多个数据集返回给我。但是，这些数据集的名称中都有一个空格。有没有办法用另一个符号替换全局环境中每个数据框中的空间？我的全局环境中将有 100 个数据集，因此手动重命名它们会很乏味。我曾尝试使用 assign 和 str_replace_all 想出一个解决方案，但到目前为止还没有奏效。

MRE:

`Data frame` <- data.frame(x = sample(1:100, 10, replace = T), y = sample(letters[1:24], 10, replace = T))
`Shame data` <- data.frame(x = sample(1:100, 10, replace = T), y = sample(letters[1:24], 10, replace = T))
`Lambda dito` <- data.frame(x = sample(1:100, 10, replace = T), y = sample(letters[1:24], 10, replace = T))

Answer 1

以下改编自最近的 answer我的 R-Help question .另见 Duncan Murdoch's answer .
您可以将所有要更改的对象放入列表中，更改列表的名称属性并分配回 .GlobalEnv。类似于以下内容。

# create a vector of names of the objects
# whose names are to be changed
obj_names <- ls(pattern = " ")

# get the objects into a list
tmp_list <- mget(obj_names, envir = .GlobalEnv)
# change the list's names
names(tmp_list) <- sub(" +", "_", obj_names)
# assign them to the global environment
list2env(tmp_list, envir = .GlobalEnv)

# clean up
rm(tmp_list)
rm(list = obj_names)