我有一个独立的功能，需要几个选项：
distance2thing <- function(in_file="data/classes_input.txt",sim=NA, send=0, feature='start'){
cat("Feature selected = ", feature, "\n")
# ...
}
在这里，最重要的是用户可以指定自己的feature。如果他们没有指定任何内容，则会使用默认值'start'。
我有第二个函数，它使用选项调用第一个函数：
callDistance2thing <- function(feature='start'){
real_data<-distance2thing(send=1, feature)
}
但是，我在feature中为callDistance2thing()指定的任何值都会被distance2thing(feature='start')覆盖。
我还尝试在feature中将NA设置为distance2thing()，但这具有相同的效果。
如何使用具有默认值的函数，以及使用用户指定的值调用第一个函数的另一个函数？
