Написання простої функції

Напишімо просту функцію для типової задачі цього курсу. Тут наша функція змоделює кидання гральних кубиків і поверне суму отриманих значень. Функція дозволить користувачеві обрати, скільки кубиків вони хочуть кинути.

Хоча R фізично не може кидати кубики, ми можемо змоделювати еквівалентний процес, роблячи випадкові вибірки з множини чисел {1, 2, 3, 4, 5, 6} з однаковими ймовірностями. Один зі способів зробити це — скористатися функцією sample.

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

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

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

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

Використовуючи функцію sample, укажіть параметри size і replace.
Обчисліть суму випадінь.
return об'єкт, що містить відповідь.
Запустіть функцію для кидка п'ятьох кубиків.

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

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

# Set seed to 1
set.seed(1)

# Write a function to roll k dice
roll_dice <- function(k){
  all_rolls <- sample(c(1,2,3,4,5,6), 
                      ___, 
                      replace = ___)
  final_answer <- ____
  return(___)
}

# Run the function to roll five dice
roll_dice(___)

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