修改函数以使其在列表和列表列表上工作

Question

考虑以下功能：

getexpr = function(s,g)substring(s,g,g+attr(g,'match.length')-1)

当应用于字符串和列表时，以下工作正常：

match = mapply(getexpr,single_string,list)

如果我想将上述内容应用于字符串列表和列表列表，该怎么办？

Answer 1

没有提供测试的数据所以我会假设“字符串列表”命名为lsingle_string并且“列表列表”命名为llist，我将提供我的开始：

mapply( function(lstr, llis) {
         mapply( getexpr, s=lstr, g=llis) } , lsingle_string, llist)