转置R表
我正在尝试转置我从列表列表创建的表。 每个嵌套列表都有以下格式:转置R表,r,R,我正在尝试转置我从列表列表创建的表。 每个嵌套列表都有以下格式: list(storm_name=NA, storm_level=NA, file_date=NA, file_time=NA, date=NA, time=NA, actual_or_forecast=NA, lat=NA, long=NA, max_wind=NA, gusts=NA, eye_speed=NA, eye_location=NA, storm_end=NA) 简而言之,每行中有14个元素 s
list(storm_name=NA, storm_level=NA, file_date=NA, file_time=NA,
date=NA, time=NA, actual_or_forecast=NA, lat=NA, long=NA, max_wind=NA,
gusts=NA, eye_speed=NA, eye_location=NA, storm_end=NA)
简而言之,每行中有14个元素
storm_df <- as.data.frame(matrix(unlist(list1), nrow=length(unlist(list1[1]))))
storm\u df让我们使用do.call
、rbind
和lappy
:
## data
l1 <- list(storm_name=NA, storm_level=NA, file_date=NA, file_time=NA,
date=NA, time=NA, actual_or_forecast=NA, lat=NA, long=NA, max_wind=NA,
gusts=NA, eye_speed=NA, eye_location=NA, storm_end=NA)
big_list <- list(l1, l1, l1)
## make data.frame
do.call('rbind', lapply(big_list, data.frame))
##数据
l1让我们使用do.call
、rbind
和lappy
:
## data
l1 <- list(storm_name=NA, storm_level=NA, file_date=NA, file_time=NA,
date=NA, time=NA, actual_or_forecast=NA, lat=NA, long=NA, max_wind=NA,
gusts=NA, eye_speed=NA, eye_location=NA, storm_end=NA)
big_list <- list(l1, l1, l1)
## make data.frame
do.call('rbind', lapply(big_list, data.frame))
##数据
l1您还应该查看t()
函数您还应该查看t()
函数您还可以使用dplyr
包中的bind_rows()
,该包直接处理列表:dplyr::bind_rows(lappy(big_list,data.frame))
。您也可以使用bind_rows()
来自直接处理列表的dplyr
包:dplyr::bind_rows(lappy(big_list,data.frame))
。