在两个不同长度的向量上应用函数，并在 R 中返回一个矩阵

问题描述

我有两个不同长度的向量，我想对这两个向量的每个可能组合应用一个函数，从而得到一个矩阵.

I have two vectors of different lengths, and I would like to apply a function to every possible combination of the two vectors, resulting in a matrix.

在我的特定示例中，两个向量是字符向量，我想应用函数grepl，即:

In my particular example, the two vectors are charactor vectors, and I would like to apply the function grepl, ie:

names <- c('cats', 'dogs', 'frogs', 'bats')
slices <- c('ca', 'at', 'ts', 'do', 'og', 'gs', 'fr', 'ro', 'ba')

results <- someFunction(grepl, names, slices)

results
         ca    at    ts    do    og    gs    fr    ro    ba
cats   TRUE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE 
dogs  FALSE FALSE FALSE  TRUE  TRUE  TRUE FALSE FALSE FALSE
frogs FALSE FALSE FALSE FALSE  TRUE  TRUE  TRUE  TRUE FALSE
bats  FALSE  TRUE  TRUE FALSE FALSE FALSE FALSE FALSE  TRUE

现在我正在使用 for 循环，但我确信有更好、更有效的方法.我对apply函数以及aggregate、by、sweep等做了很多研究，但还没有找到我要找的东西.

Right now I am using for loops but I am sure there is a better and more efficient way. I have done a lot of research on the apply functions, as well as aggregate, by, sweep, etc, but haven't found what I am looking for.

感谢您的帮助.

推荐答案

试试这个

library(stringr)
t(sapply(names,str_detect,pattern=slices))

您也可以使用 grepl

sapply(slices, grepl, names)

这篇关于在两个不同长度的向量上应用函数，并在 R 中返回一个矩阵的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！