简体   繁体   English

将多行数据格式化为R中的单行

[英]formatting multi-row data into single row in R

I am a strange excel or csv formatted file which I want to import to R as a data frame. 我是一个奇怪的excel或csv格式的文件,我想将其导入R作为数据框。 The problem is that some columns have multiple rows for the records, for example, the data is as follow: There are three columns and two rows but the tools columns has multiple columns, is there a way I can format the data so I will have only record with multiple tools (like say tool1, tool2, etc) 问题是某些列有多个记录行,例如,数据如下:有三列和两行,但是工具列有多列,有没有一种方法可以格式化数据,所以我将仅使用多个工具(例如,tool1,tool2等)进行记录

Task             Location  Tools 
Raising ticket   Alabama   sharepoint
                           word
                           oracle
Changing ticket  Seattle   word 
                           oracle

Final output expected 预期最终产量

Task             Location  Tools1   Tools2  Tools3
Raising ticket   Alabama   sharepoint   word    oracle
Changing ticket  Seattle   word         oracle

With dplyr and tidyr . dplyrtidyr You can fill your dataframe so that Task and Location are included in each row. 您可以fill数据框,以便在每一行中包含“任务”和“位置”。 Then group_by Task and mutate to add an id column for each task within each group. 然后group_by Task并进行mutate以为每个组中的每个任务添加一个id列。 Then use spread to spread the newly created id column across multiple columns. 然后使用spread将新创建的id列分布到多个列中。

library(dplyr)
library(tidyr)
df <- data.frame(Task = c("Raising ticket","","","Changing ticket",""), Location = c("Alabama","","","Seattle",""), Tools = c("sharepoint","word","oracle","word","oracle"))
df[df==""]  <- NA
df %>%
  fill(Task,Location) %>%
  group_by(Task) %>%
  mutate(id = paste0("Tools",row_number())) %>%
  spread(id, Tools)

# A tibble: 2 x 5
# Groups: Task [2]
#  Task            Location Tools1     Tools2 Tools3
#   <fct>           <fct>    <fct>      <fct>  <fct> 
# 1 Changing ticket Seattle  word       oracle <NA>  
# 2 Raising ticket  Alabama  sharepoint word   oracle

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM