Посібник з dbinom, pbinom, qbinom і rbinom у r


У цьому посібнику пояснюється, як використовувати біноміальний розподіл у R за допомогою функцій dbinom , pbinom , qbinom і rbinom .

dbinom

Функція dbinom повертає значення функції щільності ймовірності (pdf) біноміального розподілу за певної випадкової змінної x , кількість випробувань (розмір) і ймовірність успіху кожного випробування (prob). Синтаксис використання dbinom такий:

dbinom(x, розмір, імовірність)

Простіше кажучи, dbinom визначає ймовірність отримання певного числа   успіх (x) у певній кількості випробувань (розмір), де ймовірність успіху в кожному випробуванні фіксована (імовірність) .

Наступні приклади ілюструють, як розв’язувати деякі ймовірнісні питання за допомогою dbinom.

Приклад 1: Боб виконує 60% своїх штрафних кидків. Якщо він виконує 12 штрафних кидків, яка ймовірність того, що він зробить рівно 10?

 #find the probability of 10 successes during 12 trials where the probability of
#success on each trial is 0.6
dbinom(x=10, size=12, prob=.6)
#[1]0.06385228

Імовірність того, що він зробить рівно 10 пострілів, дорівнює 0,0639 .

Приклад 2: Саша підкидає чесну монету 20 разів. Яка ймовірність того, що монета впаде рівно на 7 голів?

 #find the probability of 7 successes during 20 trials where the probability of
#success on each trial is 0.5
dbinom(x=7, size=20, prob=.5)
#[1]0.07392883

Імовірність того, що монета випаде рівно 7 разів, дорівнює 0,0739 .

пбіном

Функція pbinom повертає значення кумулятивної функції щільності (cdf) біноміального розподілу за певної випадкової змінної q , кількість спроб (розмір) і ймовірність успіху для кожної спроби (prob). Синтаксис використання pbinom такий:

pbinom(q, size, prob)

Простіше кажучи, pbinom повертає площу ліворуч від заданого значення q   в біноміальному розподілі. Якщо вас цікавить область праворуч від заданого значення q , ви можете просто додати аргумент lower.tail = FALSE

pbinom(q, size, prob, lower.tail = FALSE)

Наступні приклади ілюструють, як розв’язувати деякі ймовірнісні питання за допомогою pbinom.

Приклад 1: Андо підкидає чесну монету 5 разів. Яка ймовірність того, що монета випаде орелами більше двох разів?

 #find the probability of more than 2 successes during 5 trials where the
#probability of success on each trial is 0.5
pbinom(2, size=5, prob=.5, lower.tail=FALSE)
# [1] 0.5

Імовірність того, що монета випаде орелами більше двох разів, дорівнює 0,5 .

Приклад 2. Скажімо, Тайлер отримує страйк за 30% своїх спроб, коли він грає. Якщо він зіграє 10 разів, яка ймовірність того, що він отримає 4 або менше ударів?

 #find the probability of 4 or fewer successes during 10 trials where the
#probability of success on each trial is 0.3
pbinom(4, size=10, prob=.3)
# [1]0.8497317

Імовірність того, що він зробить 4 удари або менше, становить 0,8497 .

qbinom

Функція qbinom повертає значення оберненої інтегральної функції щільності (cdf) біноміального розподілу за певної випадкової змінної q , кількість спроб (розмір) і ймовірність успіху кожної спроби (prob). Синтаксис використання qbinom такий:

qbinom(q, розмір, імовірність)

Простіше кажучи, ви можете використовувати qbinom , щоб дізнатися p-й квантиль біноміального розподілу.

Наступний код демонструє деякі приклади qbinom у дії:

 #find the 10th quantile of a binomial distribution with 10 trials and prob
#of success on each trial = 0.4
qbinom(.10, size=10, prob=.4)
# [1] 2

#find the 40th quantile of a binomial distribution with 30 trials and prob
#of success on each trial = 0.25
qbinom(.40, size=30, prob=.25)
# [1] 7

біном

Функція rbinom генерує вектор біноміальних розподілених випадкових змінних із заданою довжиною вектора n , кількістю випробувань (розмір) і ймовірністю успіху в кожному випробуванні (імовірність). Синтаксис використання rbinom такий:

rbinom(n, size, prob)

Наступний код демонструє деякі приклади rnorm у дії:

 #generate a vector that shows the number of successes of 10 binomial experiments with
#100 trials where the probability of success on each trial is 0.3.
results <- rbinom(10, size=100, prob=.3)
results
# [1] 31 29 28 30 35 30 27 39 30 28

#find mean number of successes in the 10 experiments (compared to expected
#mean of 30)
mean(results)
# [1] 32.8

#generate a vector that shows the number of successes of 1000 binomial experiments
#with 100 trials where the probability of success on each trial is 0.3.
results <- rbinom(1000, size=100, prob=.3)

#find mean number of successes in the 100 experiments (compared to expected
#mean of 30)
mean(results)
# [1] 30.105

Зауважте, що чим більше випадкових змінних ми створюємо, тим ближче середня кількість успіхів до очікуваної кількості успіхів.

Примітка: «Очікувана кількість успіхів» = n * p , де n — кількість спроб, а p — імовірність успіху для кожної спроби.

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

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