R - 在嵌套函数中使用可选参数，例如'kmeans'

Question

我正在尝试创建一个使用dist包中的kmeans和tm的函数。

我的目标是让有机会将参数作为列表，在主要的列表中，这样可以用作上述函数的参数。

有一个例子：

tmpClust<-function(corpora, dist.args=list(method = "manhattan"), k, kmeans.args=list(algorithm="Lloyd"))
{
    dtm<-DocumentTermMatrix(corpora)

    dm<-dist(dtm, dist.args)

    x<-kmeans(dm, k, kmeans.args)

    x$cluster
}
data(crude)
tmpClust(crude, k=3)

我明白了：

  

kmeans（dm，k，kmeans.args）出错：'iter.max'必须为正

     

另外：警告信息：   在kmeans（dm，k，kmeans.args）：由强制引入的NA

如果我在tmpClust修改为kmeans.args=list()，我有：

  

if（is.na（iter.max）|| iter.max＆lt; 1L）停止时出错（“'iter.max'必须为正”）：     缺少需要TRUE / FALSE的值

我需要解决这个问题？ 我曾尝试使用省略号，但没有成功。