Генерація складного набору даних — частина 2

У цій вправі ви створите межу класифікації для набору даних, який ви згенерували в попередній вправі. Межа складається з двох кіл радіусом 0,8 одиниці з центрами в (x1 = -0,8, x2 = 0) та (x1 = 0,8, x2 = 0), які лише торкаються одне одного в початку координат. Визначте бінарну змінну класифікації y так, щоб точки, які лежать усередині будь-якого з кіл, мали y = -1, а ті, що лежать поза межами обох кіл, мали y = 1.

Набір даних із попередньої вправи доступний у датафреймі df.

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

Support Vector Machines в R

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

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

Задайте радіуси та центри кіл.
Додайте до df стовпчик із бінарною змінною класифікації y.

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

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

#set radius and centers
radius <- ___
center_1 <- c(___, ___)
center_2 <- c(___, ___)
radius_squared <- radius^2

#create binary classification variable
df$y <- factor(ifelse((df$x1-center_1[___])^2 + (df$x2-center_1[___])^2 < radius_squared|
                      (df$x1-center_2[___])^2 + (df$x2-center_2[___])^2 < radius_squared, ___, ___),
                      levels = c(-1, 1))

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