Bonjour à tous,

Sans boucle et sans package,

Je voudrais retourner N produits de M lignes choisis aléatoirement d'une matrice A :

Pour l'instant, j'ai réussi avec une boucle :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
B <- matrix(NA, ncol = ncol(A), nrow = 0) 
for (i in 1 : N) B <- rbind(B, apply(A[sample(1 : nrow(A), M, replace = T), ], 2, prod))
Avez-vous une solution ?

Merci d'avance !