我有一个数据框,df
:
df <- structure(list(V1 = c("H1", " 0.9",
"4.1", "4.0"), V2 = c("H2", " 2.174",
"4.1", "4.1"), V3 = c("H3", " 2.592",
"3.8", "4.1"), V4 = c("H4", " 2.236",
"3.8", "4.087463")), row.names = c(NA, -4L), class = "data.frame")
> df
V1 V2 V3 V4
1 H1 H2 H3 H4
2 0.9 2.174 2.592 2.236
3 4.1 4.1 3.8 3.8
4 4.0 4.1 4.1 4.0
我想重命名第一行之后的列,但要使用dplyr管道。
所需的结果如下所示:
H1 H2 H3 H4
2 0.9 2.174 2.592 2.236
3 4.1 4.1 3.8 3.8
4 4.0 4.1 4.1 4.0
我已经尝试过了,但是没有用:
df_new <- df %>%
rename_all(.,df[1,])
有人可以建议使用dplyr的整洁方法吗?
我们可以使用row_to_names
从janitor
library(janitor)
library(dplyr)
df %>%
row_to_names(row_number = 1) %>%
type.convert(as.is = TRUE) %>%
as_tibble
# A tibble: 3 x 4
# H1 H2 H3 H4
# <dbl> <dbl> <dbl> <dbl>
#1 0.9 2.17 2.59 2.24
#2 4.1 4.1 3.8 3.8
#3 4 4.1 4.1 4.09
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句