Name : Farhan Dzaffa Arfianto

NIM : 220605110099

Class : C

Institue : Maulana Malik Ibrahim Islamic State University of Malang

Lecture : Prof. Dr. Suhartono, M.Kom

library(MASS)
set.seed(123)
n <- 100
x1 <- rnorm(n, mean = 2, sd = 1)
x2 <- rnorm(n, mean = 5, sd = 1)
y <- rbinom(n, size = 1, prob = 0.7)
data <- data.frame(x1, x2, y)
model <- glm(y ~ x1 + x2, data = data, family = binomial(link = "logit"))
prediksi <- predict(model, data, type = "response")
kelas_prediksi <- ifelse(prediksi >= 0.5, 1, 0)
hasil_prediksi <- data.frame(data, prediksi, kelas_prediksi)
print(hasil_prediksi)
##              x1       x2 y  prediksi kelas_prediksi
## 1    1.43952435 4.289593 0 0.7435085              1
## 2    1.76982251 5.256884 1 0.7088697              1
## 3    3.55870831 4.753308 0 0.7228857              1
## 4    2.07050839 4.652457 1 0.7297221              1
## 5    2.12928774 4.048381 1 0.7501028              1
## 6    3.71506499 4.954972 1 0.7153455              1
## 7    2.46091621 4.215096 0 0.7438435              1
## 8    0.73493877 3.332058 1 0.7757590              1
## 9    1.31314715 4.619773 1 0.7325161              1
## 10   1.55433803 5.918997 1 0.6847005              1
## 11   3.22408180 4.424653 1 0.7350800              1
## 12   2.35981383 5.607964 0 0.6945262              1
## 13   2.40077145 3.382117 1 0.7709549              1
## 14   2.11068272 4.944438 1 0.7193497              1
## 15   1.44415887 5.519407 1 0.6999803              1
## 16   3.78691314 5.301153 1 0.7025764              1
## 17   2.49785048 5.105676 0 0.7126864              1
## 18   0.03338284 4.359294 1 0.7441524              1
## 19   2.70135590 4.150296 1 0.7455080              1
## 20   1.52720859 3.975871 1 0.7537420              1
## 21   0.93217629 5.117647 1 0.7158184              1
## 22   1.78202509 4.052525 1 0.7506911              1
## 23   0.97399555 4.509443 1 0.7370474              1
## 24   1.27110877 4.743908 1 0.7282948              1
## 25   1.37496073 6.843862 0 0.6489085              1
## 26   0.31330669 4.348050 1 0.7439358              1
## 27   2.83778704 5.235387 1 0.7071922              1
## 28   2.15337312 5.077961 1 0.7144711              1
## 29   0.86186306 4.038143 1 0.7530787              1
## 30   3.25381492 4.928692 0 0.7173330              1
## 31   2.42646422 6.444551 0 0.6621718              1
## 32   1.70492852 5.451504 1 0.7018827              1
## 33   2.89512566 5.041233 1 0.7141059              1
## 34   2.87813349 4.577503 0 0.7305539              1
## 35   2.82158108 2.946753 1 0.7834438              1
## 36   2.68864025 6.131337 1 0.6737814              1
## 37   2.55391765 3.539360 1 0.7657119              1
## 38   1.93808829 5.739948 1 0.6905682              1
## 39   1.69403734 6.909104 1 0.6454672              1
## 40   1.61952900 3.556107 1 0.7670482              1
## 41   1.30529302 5.701784 1 0.6935073              1
## 42   1.79208272 4.737803 1 0.7273575              1
## 43   0.73460365 3.427856 0 0.7728051              1
## 44   4.16895597 3.485332 1 0.7641882              1
## 45   3.20796200 3.398464 0 0.7688494              1
## 46   0.87689142 4.469093 0 0.7386341              1
## 47   1.59711516 3.538244 0 0.7676556              1
## 48   1.53334465 5.687917 1 0.6934869              1
## 49   2.77996512 7.100109 1 0.6349142              1
## 50   1.91663093 3.712970 1 0.7614641              1
## 51   2.25331851 5.787739 1 0.6880091              1
## 52   1.97145324 5.769042 1 0.6893903              1
## 53   1.95712954 5.332203 1 0.7056855              1
## 54   3.36860228 3.991623 1 0.7493893              1
## 55   1.77422901 4.880547 1 0.7223734              1
## 56   3.51647060 4.719605 0 0.7241697              1
## 57   0.45124720 5.562990 0 0.7006897              1
## 58   2.58461375 4.627561 0 0.7294579              1
## 59   2.12385424 5.976973 1 0.6811098              1
## 60   2.21594157 4.625419 1 0.7303429              1
## 61   2.37963948 6.052711 0 0.6775770              1
## 62   1.49767655 3.950823 1 0.7546226              1
## 63   1.66679262 3.739845 1 0.7611085              1
## 64   0.98142462 8.241040 1 0.5919588              1
## 65   0.92820877 4.583142 1 0.7346185              1
## 66   2.30352864 5.298228 1 0.7061283              1
## 67   2.44820978 5.636570 1 0.6932446              1
## 68   2.05300423 4.516219 1 0.7344757              1
## 69   2.92226747 5.516862 1 0.6966025              1
## 70   4.05008469 5.368965 0 0.6994532              1
## 71   1.50896883 4.784619 1 0.7263439              1
## 72  -0.30916888 5.065293 0 0.7204900              1
## 73   3.00573852 4.965933 1 0.7165606              1
## 74   1.29079924 7.128452 0 0.6375996              1
## 75   1.31199138 4.258664 1 0.7448184              1
## 76   3.02557137 3.904004 1 0.7529941              1
## 77   1.71522699 5.037788 1 0.7169077              1
## 78   0.77928229 5.310481 1 0.7091971              1
## 79   2.18130348 5.436523 1 0.7013241              1
## 80   1.86110864 4.541635 0 0.7340181              1
## 81   2.00576419 3.936674 1 0.7540354              1
## 82   2.38528040 6.263185 0 0.6693957              1
## 83   1.62933997 4.650350 1 0.7307644              1
## 84   2.64437655 4.134487 1 0.7461573              1
## 85   1.77951344 4.763720 0 0.7264774              1
## 86   2.33178196 4.802824 1 0.7238748              1
## 87   3.09683901 6.109920 1 0.6736116              1
## 88   2.43518149 5.084737 1 0.7135852              1
## 89   1.67406841 5.754054 1 0.6906653              1
## 90   3.14880762 4.500708 0 0.7326225              1
## 91   2.99350386 5.214445 0 0.7075977              1
## 92   2.54839696 4.675314 1 0.7278716              1
## 93   2.23873174 5.094584 1 0.7136778              1
## 94   1.37209392 4.104637 0 0.7498245              1
## 95   3.36065245 3.689198 1 0.7592946              1
## 96   1.39974041 6.997213 0 0.6426550              1
## 97   4.18733299 5.600709 1 0.6904595              1
## 98   3.53261063 3.748729 1 0.7570168              1
## 99   1.76429964 4.388834 1 0.7394573              1
## 100  0.97357910 3.814520 0 0.7601164              1