1

是否可以从函数调用中返回 R 中的值数组?我有一个方法应该将计算中的值存储在数组中并将其返回给调用者,但实际上它所做的只是返回数组的第一个元素。函数如下。

binsmooth_trials = function(x, y){
  bin_lens = c(10, 20, 30, 40, 50, 60, 70, 80, 90, 100)
  bin_len_errs = c(0, 0, 0, 0, 0, 0, 0, 0, 0, 0)
  for (i in 1:bin_lens){
    rss_error = binsmooth(x, y, i)
    bin_len_errs[i] = rss_error
  }
  return bin_len_errs
}
4

1 回答 1

3

我想你在这里想要的是:

binsmooth_trials <- function(x, y) {
  bin_lens = seq(from=10, to=100, by=10)
  bin_len_errs = vector("numeric", length=length(bin_lens))
  for(i in bin_lens){
    bin_len_errs[i] = binsmooth(x, y, i)
    }
  bin_len_errs
}
于 2013-03-10T15:55:35.213 回答