如何从r中的函数生成数组？

Question

X和Y分别作为泊松RV分布，λ和10分别为λ。我需要创建一个函数sample（）来生成（X，Y）的n个实现并生成一个nx2数组。

到目前为止，我已经完成了：

sample=function()          
{
  X=rpois(1,10)
  Y=rpois(1,20)
} 

我如何生成数组？

Answer 1

fred_sample <- function(n){
  X <- rpois(n, 10)
  Y <- rpois(n, 20)
  matrix(c(X, Y), n)
}

几点：

1. 我避免命名你的函数样本，否则你最终将屏蔽名为sample的基本函数。

2. 如果您希望n生成n数组，则需要将2传递给样本。