如下代码，
rate <- function(x){
  result <- data.frame()
  for (这里有个循环，得到每一个resultx的结果再合并到result中){
    函数内容
    resultx <- data.frame( number = paths, negprob = probnegnb)
    result <- rbind(result, resultx)
  }
  return(result)
}
想通过自编函数返回一个数据框，但每次返回的都是处理后数据框result的第一行。后面几行的就不见了。求高手指教！