如果我有一个2列4行数据框,例如:

structure(list(var = c("url.loc", "radius", "jt", "post.age"), 
value = c("london", "25", "fulltime", "7")), row.names = c(NA, 
-4L), spec = structure(list(cols = list(var = structure(list(), class = c("collector_character", 
"collector")), value = structure(list(), class = c("collector_character", 
"collector"))), default = structure(list(), class = c("collector_guess", 
"collector")), delim = ","), class = "col_spec"), problems = <pointer: 0x60000323fee0>, class = c("spec_tbl_df", 
"tbl_df", "tbl", "data.frame"))

... 如何将其转换为4个变量,使结果与以下相同:

url.loc <- "london"
radius <- "25"
jt <- "fulltime"
post.age <- "7"

我可以考虑使用assign和一个循环,但我认为有一种更优雅的方法,也许使用NSE.

谢谢

推荐答案

我们可以创建一个命名的list并使用list2env

library(tibble)
list2env(as.list(deframe(df1)), .GlobalEnv)

-正在判断

> url.loc
[1] "london"
> radius
[1] "25"

一个紧凑的选项是collapse中的%=%

library(collapse)
df1$var %=% df1$value

-正在判断

> url.loc
[1] "london"
> radius
[1] "25"

R相关问答推荐

如何使用R Shiny中的条件面板仅隐藏和显示用户输入,同时仍允许运行基础计算?

terra nearest()仅为所有`to_id`列返回NA

通过使用str_detect对具有相似字符串的组进行分组

如何编辑ggplot的图例字使用自定义对象(gtable)?'

我想在R中总结一个巨大的数据框架,使我只需要唯一的lat、lon、Date(Year)和Maxium Value""""""""

在R中为马赛克图中的每个字段着色

制作等距离的线串副本

用关联字符串替换列名的元素

在嵌套列表中查找元素路径的最佳方法

从服务器在Shiny中一起渲染图标和文本

如何将使用rhandsontable呈现的表值格式化为百分比,同时保留并显示完整的小数精度?

使用R将简单的JSON解析为嵌套框架

避免在图例中显示VLINS组

在生成打印的自定义函数中,可以通过变量将线型或 colored颜色 设置为NULL吗?

替换在以前工作的代码中有x行&q;错误(geom_sf/gganimate/dow_mark)

如何在shiny 的应用程序 map 视图宣传单中可视化单点

将y轴格式更改为R中的百分比

如何准确地指出Read_delim所面临的问题?

修复标签重叠和ggploy内的空间

如何根据分位数及其值创建格式化字符串值的数组?