Какой будет вклад:

c("a", "b", "c")
[1] "a" "b" "c"

Я хочу функцию, которая возвращает:

[1] "a;b" "a;c" "b;c"

Мне нужна эта функция, чтобы работать исключительно с ее входов. Я пробовал кое-что с purrr::map() и purrr::reduce(), но мне не удалось получить ничего полезного.

1
Christopher Peralta 14 Апр 2019 в 13:41

2 ответа

Лучший ответ

Мы можем использовать combn из базы R с аргументом FUN в качестве paste

combn(x, 2, FUN = paste, collapse = ";")
#[1] "a;b" "a;c" "b;c"

данные

x <- c("a", "b", "c")
1
Ronak Shah 14 Апр 2019 в 10:43

Не точный результат, но, возможно, это может быть полезно:

test<-c("a", "b", "c")
lapply(test,function(x) paste0(x,";",setdiff(test,x)))

Результат:

[[1]]
[1] "a;b" "a;c"

[[2]]
[1] "b;a" "b;c"

[[3]]
[1] "c;a" "c;b"
1
NelsonGon 14 Апр 2019 в 11:28