Моделювання помилок знака: зміна ймовірностей

У попередній вправі кожна симуляція мала фіксовану ймовірність помилки знака на кожному кроці.

У початковому формулюванні питання ймовірність помилки знака може відрізнятися на кожному кроці; єдина вимога — щоб кожна ймовірність була меншою за 0,50.

Тут змоделюймо задачу з математики з 2 кроками, у якій ймовірність перемикання на кожному кроці становить 0,49 та 0,01. Це означає високу ймовірність стати неправильним на першому кроці та низьку ймовірність переключитися назад.

Ця вправа є частиною курсу

Ймовірнісні головоломки в R

Переглянути курс

Інструкції до вправи

Використайте функцію sapply разом із rbinom, щоб змоделювати перемикання в межах однієї задачі, з ймовірностями перемикання 0,49 та 0,01 для першого й другого кроків відповідно.
Визначте загальну кількість перемикань, що відбулися.
Визначте, чи була б відповідь до задачі з математики правильною чи ні.

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

set.seed(1)
counter <- 0

for(i in 1:10000){
  # Simulate switches
  each_switch <- sapply(___)
  # Count switches
  num_switches <- 
  # Check solution
  if(___){
    counter <- counter + 1
  }
}

print(counter/10000)

Редагувати та запускати код