R mapply循环参数

我已经写了一个函数，可以将以10为基数的数字转换成另一个基数（我只对以2-9为基数的数字感兴趣）。我当前用于将基数10转换为基数2的函数如下所示：

cb2 <- function(num){
    td<-{}
    a <- {}
    while (num 2 > 0 ){
        a <- num %% 2
        td <- paste(td,a, sep="")
        num <- as.integer(num / 2)              
    }   
    return(td)  
} 

我想概括这个函数，并将首选基作为函数的参数，包括

convertbase <- function(num, base){
    td<-{}
    a <- {}
    while (num / base > 0 ){
        a <- num %% base
        td <- paste(td,a, sep="")
        num <- as.integer(num / base)               
    }   
    return(td)  
}

但是，如果我想要数字1:10作为基数2:10，我会遇到以下问题：

mapply(convertbase, 1:10, 2:10)
Warning message:
In mapply(convertbase, 1:10, 2:10) :
  longer argument not a multiple of length of shorter

---

理想情况下，此函数或函数集将返回一个数据帧，其中包含基2-10的单独列，但我意识到在我的代码和目标之间缺少一些东西。任何帮助都将不胜感激。

mapply

将该函数应用于每一行，而在我看来，您似乎希望将该函数应用于数字和基数的所有组合。这就是诀窍：

outer(1:10,2:9,Vectorize(convertbase))

---

您不需要在R中初始化变量，尤其是空代码块。所以

tdmbq感谢你的提示-仍然在学习R的基本结构。如果我没有实例化td变量，我会收到以下错误：粘贴中的错误（a，t，sep=“”）：无法将类型“closure”强制为类型“character”的向量。我假设这是因为函数正在将新值推送到向量上，类似于Perl中的“push/pop”或“shift/unshift”？
mapply(convertbase, 1:10, 2:10)
Warning message:
In mapply(convertbase, 1:10, 2:10) :
  longer argument not a multiple of length of shorter

outer(1:10,2:9,Vectorize(convertbase))