Wprowadź margines do zbioru danych
Ostatnim zadaniem w rozdziale 1 jest dodanie marginesu do zbioru danych utworzonego w poprzednim ćwiczeniu, a następnie wyświetlenie go na wykresie. Biblioteka ggplot2 jest już wczytana. Przypomnij sobie, że współczynnik kierunkowy liniowej granicy decyzyjnej z poprzedniego ćwiczenia wynosi 1,4.
To ćwiczenie jest częścią kursu
Maszyny wektorów nośnych w R
Instrukcje do ćwiczenia
- Wprowadź margines
deltao szerokości 0,07 jednostki w swoim zbiorze danych. - Ponownie wykreśl zbiór danych, przedstawiając granice marginesów jako linie przerywane, a granicę decyzyjną jako linię ciągłą.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
#set margin
delta <- ___
# retain only those points that lie outside the margin
df1 <- df[abs(1.4*df$x1 - df$x2) > delta, ]
#build plot
plot_margins <- ggplot(data = df1, aes(x = x1, y = x2, color = y)) + geom_point() +
scale_color_manual(values = c("red", "blue")) +
geom_abline(slope = ___, intercept = 0)+
geom_abline(slope = ___, intercept = ___, linetype = "dashed") +
geom_abline(slope = ___, intercept = ___, linetype = "dashed")
#display plot
plot_margins