Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R映射到data.frames列表并更改列类型_R_List_Dictionary_Purrr - Fatal编程技术网

R映射到data.frames列表并更改列类型

R映射到data.frames列表并更改列类型,r,list,dictionary,purrr,R,List,Dictionary,Purrr,我对R很陌生,有点绝望,因为我已经研究这个问题有一段时间了 我有一个数据帧列表 df1 <- data.frame(na = c("bla", "foo", "bar", "baz"), tmp = c(1,2,5,6), tf = c(2.2, 3.4, 5.6, 7.7)) df2 <- data.frame(na2 = c("blu", "oof", &quo

我对R很陌生,有点绝望,因为我已经研究这个问题有一段时间了

我有一个数据帧列表

df1 <- data.frame(na = c("bla", "foo", "bar", "baz"), tmp = c(1,2,5,6), tf = c(2.2, 3.4, 5.6, 7.7))
df2 <- data.frame(na2 = c("blu", "oof", "bar", "baz"), tmp = c(7,8,9,10), tf = c(1.1, 3.3, 2.5, 5.7))

listy <- list(df1, df2)
df1%变异(跨越(所有(,),如.numeric())->listy2
listy2%变异(跨越(所有(.x)项,如.numeric(,)))


但它不起作用。错误在哪里。感谢您的帮助。提前多谢

您非常接近-当跨
使用
时,您要么传递函数(无
()
),要么使用
~
传递
purrr
样式公式:

库(tidyverse)
df1[1]“1”“2”“5”“6”

由(v1.0.0)于2021-04-22创建,非常接近-当跨
使用
时,您可以传递函数(不带
()
),或者使用
~
传递
purr
样式公式:

库(tidyverse)
df1[1]“1”“2”“5”“6”

由(v1.0.0)于2021-04-22创建

尽管问题被标记为
purrr
,但这里有一个基本的R解决方案

listy <- Map(function(x) {x[] <- lapply(x, as.character); x}, listy)

str(listy)
#List of 2
# $ :'data.frame':  4 obs. of  3 variables:
#  ..$ na : chr [1:4] "bla" "foo" "bar" "baz"
#  ..$ tmp: chr [1:4] "1" "2" "5" "6"
#  ..$ tf : chr [1:4] "2.2" "3.4" "5.6" "7.7"
# $ :'data.frame':  4 obs. of  3 variables:
#  ..$ na2: chr [1:4] "blu" "oof" "bar" "baz"
#  ..$ tmp: chr [1:4] "7" "8" "9" "10"
#  ..$ tf : chr [1:4] "1.1" "3.3" "2.5" "5.7"

listy尽管问题被标记为
purr
,但这里有一个基本的R解决方案

listy <- Map(function(x) {x[] <- lapply(x, as.character); x}, listy)

str(listy)
#List of 2
# $ :'data.frame':  4 obs. of  3 variables:
#  ..$ na : chr [1:4] "bla" "foo" "bar" "baz"
#  ..$ tmp: chr [1:4] "1" "2" "5" "6"
#  ..$ tf : chr [1:4] "2.2" "3.4" "5.6" "7.7"
# $ :'data.frame':  4 obs. of  3 variables:
#  ..$ na2: chr [1:4] "blu" "oof" "bar" "baz"
#  ..$ tmp: chr [1:4] "7" "8" "9" "10"
#  ..$ tf : chr [1:4] "1.1" "3.3" "2.5" "5.7"

listy非常感谢你,伙计!这里还有另一个问题:有时我会看到“.x”、“.”或“.data”。这两者有什么区别?谢谢你,伙计!这里还有另一个问题:有时我会看到“.x”、“.”或“.data”。它们之间有什么区别?哦,很好。谢谢你能再给我解释一下代码吗?比如为什么结尾有一个“;”和“…},利斯蒂”?干杯,太好了。谢谢你能再给我解释一下代码吗?比如为什么结尾有一个“;”和“…},利斯蒂”?干杯