R语言自定义函数

一个小例子:

func <- function(n) {
  a <- matrix(rnorm(n*n), n, n)
  b <- matrix(rnorm(n*n), n, n)
  output <- list(a = a, b = b)
  return(output)
}

out <- func(5)
a1 <- out$a
b1 <- out$b

 

posted @ 2013-04-09 20:09  bore3601  阅读(1411)  评论(0编辑  收藏  举报