查找最大值

Question

我想用逗号分隔的数字找到列中每行的最大值。

输入：

A   4,6
B   4,5
C   4,4,3,4

输出：

A   4,6 6
B   4,5 5
C   4,4,3,4 4

Answer 1

以下是使用tidyverse

的选项

library(dplyr)
library(tidyr)
separate_rows(df1, V2) %>%
        group_by(V1) %>%
        summarise(V2 = paste(c(V2, max(V2)), collapse=","))
# A tibble: 3 × 2
#     V1        V2
#   <chr>     <chr>
#1     A     4,6,6
#2     B     4,5,5
#3     C 4,4,3,4,4

数据

df1 <- structure(list(V1 = c("A", "B", "C"), V2 = c("4,6", "4,5", "4,4,3,4"
)), .Names = c("V1", "V2"), class = "data.frame", row.names = c(NA, 
-3L))