Поза-вибіркове тестування
Ваша мета — зробити передбачення покупок для нових магазинів на основі оціненої моделі. Ви перевіряєте, чи це реально, за допомогою функції predict(). Функція predict() отримує оцінені параметри з train.model, щоб робити передбачення для залежної змінної в test.data. Щоб отримати прогнозовані значення в шкалі залежної змінної (ймовірності покупки), треба встановити додатковий аргумент type у значення "response".
Нарешті, відкладені прогнози класифікуються на покупки та непокупки за допомогою функції ifelse() і порівнюються зі спостереженими покупками за допомогою функції table(). Потім ви використовуєте функцію prop.table(), щоб перетворити числа в таблиці на відносні значення.
Ця вправа є частиною курсу
Побудова моделей відгуку в R
Інструкції до вправи
- Передбачте відповіді для
test.data, використавши функціюpredict()наtrain.model. Встановіть аргументtypeу значення"response"і назвіть результатprobability. - Класифікуйте передбачення моделі як
1, якщоprobabilityперевищує0.5, і як0— інакше. Присвойте результат об'єктуpredicted. - Отримайте спостережені покупки для
HOPPINESSзtest.data. Присвойте їх об'єктуobserved. - Створіть перехресну таблицю для векторів
observedіpredictedза допомогою функційtable()іprop.table().
Інтерактивна практична вправа
Спробуйте виконати цю вправу, доповнивши цей зразок коду.
# Predict the purchase probabilities for test.data
probability <- ___(___, ___, type = "response")
# Classify the predictions
predicted <- ___(probability >= ___, ___, ___)
# Obtain the observed purchases from test.data
observed <- test.data$HOPPINESS
# Cross-tabulate observed vs. predicted purchases
___(___(predicted, observed))