Як використовувати функцію replicate() у r (з прикладами)


Ви можете використовувати функцію replicate() , щоб багаторазово обчислювати вираз у R певну кількість разів.

Ця функція використовує такий базовий синтаксис:

повторити (n, вираз)

золото:

  • n : кількість разів для повторного обчислення виразу.
  • expr : Вираз для обчислення.

Наступні приклади показують, як використовувати цю функцію на практиці.

Приклад 1: Повторіть значення кілька разів

У наведеному нижче коді показано, як використовувати функцію replicate() для багаторазової оцінки одного значення кілька разів:

 #replicate the value 3 exactly 10 times
replicate(n= 10,3 )

[1] 3 3 3 3 3 3 3 3 3 3

#replicate the letter 'A' exactly 7 times
replicate(n= 7 , ' A ')

[1] “A” “A” “A” “A” “A” “A” “A”

#replicate FALSE exactly 5 times
replicate(n= 5 , FALSE )

[1] FALSE FALSE FALSE FALSE FALSE

Приклад 2: Повторіть функцію кілька разів

Тепер припустімо, що ми хочемо багаторазово оцінити функцію.

Наприклад, припустімо, що ми використовуємо функцію rnorm() , щоб створити три значення для випадкової змінної , яка відповідає нормальному розподілу із середнім значенням 0 і стандартним відхиленням 1:

 #make this example reproducible
set. seeds (1)

#generate 3 values that follow normal distribution
rnorm(3, mean= 0 , sd= 1 ) 

[1] -0.6264538 0.1836433 -0.8356286

Використовуючи функцію replicate() , ми можемо кілька разів оцінювати цю функцію rnorm().

Наприклад, ми можемо оцінити цю функцію 5 разів:

 #make this example reproducible
set. seeds (1)

#generate 3 values that follow normal distribution (replicate this 4 times)
replicate(n= 4 , rnorm(3, mean= 0 , sd= 1 ))

           [,1] [,2] [,3] [,4]
[1,] 1.5952808 0.4874291 -0.3053884 -0.6212406
[2,] 0.3295078 0.7383247 1.5117812 -2.2146999
[3,] -0.8204684 0.5757814 0.3898432 1.1249309

У результаті виходить матриця з 3 рядків і 4 стовпців.

Або, можливо, ми хотіли б оцінити цю функцію 6 разів:

 #make this example reproducible
set. seeds (1)

#generate 3 values that follow normal distribution (replicate this 6 times)
replicate(n= 6 , rnorm(3, mean= 0 , sd= 1 ))

           [,1] [,2] [,3] [,4] [,5] [,6]
[1,] 1.5952808 0.4874291 -0.3053884 -0.6212406 -0.04493361 0.8212212
[2,] 0.3295078 0.7383247 1.5117812 -2.2146999 -0.01619026 0.5939013
[3,] -0.8204684 0.5757814 0.3898432 1.1249309 0.94383621 0.9189774

У результаті виходить матриця з 6 рядків і 3 стовпців.

Використовуйте replicate() для імітації даних

Функція replicate() особливо корисна для виконання симуляцій.

Наприклад, припустимо, що ми хочемо створити 5 вибірок розміром n = 10, кожна з яких відповідає нормальному розподілу.

Ми можемо використати функцію replicate(), щоб отримати 5 різних зразків, а потім використати функцію colMeans() , щоб знайти середнє значення кожного зразка:

 #make this example reproducible
set. seeds (1)

#create 5 samples each of size n=10
data <- replicate(n=5, rnorm(10, mean= 0 , sd= 1 ))

#view samples
data

            [,1] [,2] [,3] [,4] [,5]
 [1,] -0.6264538 1.51178117 0.91897737 1.35867955 -0.1645236
 [2,] 0.1836433 0.38984324 0.78213630 -0.10278773 -0.2533617
 [3,] -0.8356286 -0.62124058 0.07456498 0.38767161 0.6969634
 [4,] 1.5952808 -2.21469989 -1.98935170 -0.05380504 0.5566632
 [5,] 0.3295078 1.12493092 0.61982575 -1.37705956 -0.6887557
 [6,] -0.8204684 -0.04493361 -0.05612874 -0.41499456 -0.7074952
 [7,] 0.4874291 -0.01619026 -0.15579551 -0.39428995 0.3645820
 [8,] 0.7383247 0.94383621 -1.47075238 -0.05931340 0.7685329
 [9,] 0.5757814 0.82122120 -0.47815006 1.10002537 -0.1123462
[10,] -0.3053884 0.59390132 0.41794156 0.76317575 0.8811077

#calculate mean of each sample
colMeans(data)

[1] 0.1322028 0.2488450 -0.1336732 0.1207302 0.1341367

З результату ми бачимо:

  • Середнє значення першого зразка становить 0,1322 .
  • Середнє другої вибірки становить 0,2488 .
  • Середнє значення третьої вибірки становить -0,1337 .

І так далі.

Додаткові ресурси

Як вибрати певні стовпці в R
Як видалити стовпці з кадру даних у R
Як видалити рядки з кадру даних на основі умови в R

Додати коментар

Ваша e-mail адреса не оприлюднюватиметься. Обов’язкові поля позначені *