Проблема создания множества матриц случайных чисел

Question

Я хочу сделать матрицу 3х3 с числами, взятыми из равномерного распределения на интервале [0,1].И я хочу сделать это 1000 раз.

В настоящее время я делаю это:

D <- replicate(3, runif(3, 0, 1), simplify=TRUE) 
#This makes a 3x3 matrix with random numbers from
#uniform normal distribution on interval [0,1]

rep(D,times=1000)  

, но эта команда создает список, содержащий 9000 чисел вместо 1000 матриц 3х3.Как я могу это исправить?

Answer 1

С помощью lapply мы можем создать список длиной 1000, где каждый элемент списка представляет собой желаемую матрицу 3x3:

set.seed(1234)
list_of_mats <- lapply(1:1000, function(x) matrix(runif(9), 3, 3))

Например, восьмая матрица:

list_of_mats[[8]]
#           [,1]       [,2]      [,3]
#[1,] 0.01374994 0.30809476 0.5645698
#[2,] 0.23902573 0.50854757 0.1214802
#[3,] 0.70649462 0.05164662 0.8928364