根据日期冲突将数据表排列在R中

Question

请找到R中创建的数据表，我想以某种方式对数据进行排序发生，我希望以升序字母顺序排列相应的活动。只是为了插图，如果您看到前三行，则应以b，c，d和b，d，d，c的"处理"列值"处理"列值。请帮助。

pt1 <- read.table(
text = "
handling          patient   time             Sorting
B_Registration    Moon      2017-02-01       10
D_Triage          Moon      2017-02-01       20
C_Performa        Moon      2017-02-01       15
A_Form            Son       2017-02-07        5
Operation2        Moon      2017-02-03       25
D_Triage          Son       2017-02-01       20
A_Form            Moon      2017-02-01        5
C_Performa        Son       2017-02-07       15
Operation2        Son       2017-02-04       25
B_Registration    Son       2017-02-04       10
",
 header = TRUE,
stringsAsFactors = FALSE)

Answer 1

或多或少地粘贴了斯蒂芬·亨德森(Stephen Henderson(的评论。@Stephen Henderson可以随意复制此答案，如果您想回答此问题，请删除我的帖子。

pt1 %>% group_by(patient) %>% arrange(patient, time, handling)
#> # A tibble: 10 x 4
#> # Groups:   patient [2]
#>          handling patient       time Sorting
#>             <chr>   <chr>      <chr>   <int>
#>  1         A_Form    Moon 2017-02-01       5
#>  2 B_Registration    Moon 2017-02-01      10
#>  3     C_Performa    Moon 2017-02-01      15
#>  4       D_Triage    Moon 2017-02-01      20
#>  5     Operation2    Moon 2017-02-03      25
#>  6       D_Triage     Son 2017-02-01      20
#>  7 B_Registration     Son 2017-02-04      10
#>  8     Operation2     Son 2017-02-04      25
#>  9         A_Form     Son 2017-02-07       5
#> 10     C_Performa     Son 2017-02-07      15

如果您不想在patient上进行排序，则可以删除%>% group_by(patient)，如果您愿意，

pt1 %>% group_by(patient) %>% arrange(time, handling)
#> # A tibble: 10 x 4
#> # Groups:   patient [2]
#>          handling patient       time Sorting
#>             <chr>   <chr>      <chr>   <int>
#>  1         A_Form    Moon 2017-02-01       5
#>  2 B_Registration    Moon 2017-02-01      10
#>  3     C_Performa    Moon 2017-02-01      15
#>  4       D_Triage    Moon 2017-02-01      20
#>  5       D_Triage     Son 2017-02-01      20
#>  6     Operation2    Moon 2017-02-03      25
#>  7 B_Registration     Son 2017-02-04      10
#>  8     Operation2     Son 2017-02-04      25
#>  9         A_Form     Son 2017-02-07       5
#> 10     C_Performa     Son 2017-02-07      15