平均は

Question

を得た私は、この情報を持っている：

Student: 1 2 3 4 5 6 7 8 9 10 
    Mark: 85 62 90 85 64 72 70 59 66 70 

だから私はこれでした：

x <- c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10) 
y <- c(85, 62, 90, 85, 64, 72, 70, 59, 66, 70) 

をそして、私は4人の10個のサンプルを取り、その後、これらの学生の平均値を取得したいです。私は、次のコマンドを10回（SAMPLE1、SAMPLE2、...、sample10）を使用して、サンプルを取った：

sample1 <- sample(x, 4, replace=FALSE, prob=NULL) 

は、サンプルを得るために任意の簡単な方法はありますか？

にはどうすればこれらのサンプルプログラミングの平均値を得ることができましたか？

私は次のことを試してみました：

meansample1 <- mean(sample1) 

Answer 1

あなたが持つ4人の学生のための平均マーク計算できます。

mean(sample(y, 4, replace = FALSE)) 

その後、我々はreplicate()でこの作業を10回を複製することができます。

を

replicate(n = 10, mean(sample(y, 4, replace = FALSE))) 
# [1] 78.75 72.25 78.00 70.25 74.25 79.25 72.25 64.25 76.50 69.00