#Membaca Data dan mengubahnya ke dalam bentuk dataframe
library(readr)
data <- read.csv("D:/Documents/Kuliah/SMT 3/Statistika Ekonomi Industri/data_diabetss_cleaning.csv")data.frame(data)## Pregnancies Glucose Insulin BMI DiabetesPedigreeFunction Age Outcome
## 1 6 148 0 33.6 0.627 50 1
## 2 1 85 0 26.6 0.351 31 0
## 3 8 183 0 23.3 0.672 32 1
## 4 1 89 94 28.1 0.167 21 0
## 5 5 116 0 25.6 0.201 30 0
## 6 3 78 88 31.0 0.248 26 1
## 7 4 110 0 37.6 0.191 30 0
## 8 10 168 0 38.0 0.537 34 1
## 9 5 166 175 25.8 0.587 51 1
## 10 0 118 230 45.8 0.551 31 1
## 11 7 107 0 29.6 0.254 31 1
## 12 1 115 96 34.6 0.529 32 1
## 13 3 126 235 39.3 0.704 27 0
## 14 8 99 0 35.4 0.388 50 0
## 15 7 196 0 39.8 0.451 41 1
## 16 9 119 0 29.0 0.263 29 1
## 17 11 143 146 36.6 0.254 51 1
## 18 10 125 115 31.1 0.205 41 1
## 19 7 147 0 39.4 0.257 43 1
## 20 1 97 140 23.2 0.487 22 0
## 21 13 145 110 22.2 0.245 57 0
## 22 5 117 0 34.1 0.337 38 0
## 23 5 109 0 36.0 0.546 60 0
## 24 3 158 245 31.6 0.851 28 1
## 25 3 88 54 24.8 0.267 22 0
## 26 6 92 0 19.9 0.188 28 0
## 27 10 122 0 27.6 0.512 45 0
## 28 4 103 192 24.0 0.966 33 0
## 29 11 138 0 33.2 0.420 35 0
## 30 9 102 0 32.9 0.665 46 1
## 31 2 90 0 38.2 0.503 27 1
## 32 3 180 70 34.0 0.271 26 0
## 33 7 133 0 40.2 0.696 37 0
## 34 7 106 0 22.7 0.235 48 0
## 35 7 159 0 27.4 0.294 40 0
## 36 1 146 0 29.7 0.564 29 0
## 37 2 71 0 28.0 0.586 22 0
## 38 7 103 0 39.1 0.344 31 1
## 39 1 103 82 19.4 0.491 22 0
## 40 1 101 36 24.2 0.526 26 0
## 41 5 88 23 24.4 0.342 30 0
## 42 8 176 300 33.7 0.467 58 1
## 43 1 73 0 23.0 0.248 21 0
## 44 7 187 304 37.7 0.254 41 1
## 45 0 100 110 46.8 0.962 31 0
## 46 0 105 142 41.5 0.173 22 0
## 47 8 133 0 32.9 0.270 39 1
## 48 5 44 0 25.0 0.587 36 0
## 49 2 141 128 25.4 0.699 24 0
## 50 7 114 0 32.8 0.258 42 1
## 51 5 99 0 29.0 0.203 32 0
## 52 0 109 0 32.5 0.855 38 1
## 53 2 109 0 42.7 0.845 54 0
## 54 1 95 38 19.6 0.334 25 0
## 55 4 146 100 28.9 0.189 27 0
## 56 2 100 90 32.9 0.867 28 1
## 57 5 139 140 28.6 0.411 26 0
## 58 13 126 0 43.4 0.583 42 1
## 59 4 129 270 35.1 0.231 23 0
## 60 1 79 0 32.0 0.396 22 0
## 61 7 62 0 32.6 0.391 41 0
## 62 5 95 0 37.7 0.370 27 0
## 63 2 112 0 25.0 0.307 24 0
## 64 3 113 0 22.4 0.140 22 0
## 65 7 83 71 29.3 0.767 36 0
## 66 0 101 0 24.6 0.237 22 0
## 67 2 110 125 32.4 0.698 27 0
## 68 13 106 0 36.6 0.178 45 0
## 69 2 100 71 38.5 0.324 26 0
## 70 1 107 0 26.5 0.165 24 0
## 71 1 80 0 19.1 0.258 21 0
## 72 4 123 176 32.0 0.443 34 0
## 73 7 81 48 46.7 0.261 42 0
## 74 4 134 0 23.8 0.277 60 1
## 75 2 142 64 24.7 0.761 21 0
## 76 6 144 228 33.9 0.255 40 0
## 77 2 92 0 31.6 0.130 24 0
## 78 1 71 76 20.4 0.323 22 0
## 79 6 93 64 28.7 0.356 23 0
## 80 1 122 220 49.7 0.325 31 1
## 81 1 151 0 26.1 0.179 22 0
## 82 0 125 0 22.5 0.262 21 0
## 83 1 81 40 26.6 0.283 24 0
## 84 2 85 0 39.6 0.930 27 0
## 85 1 126 152 28.7 0.801 21 0
## 86 4 144 140 29.5 0.287 37 0
## 87 3 83 18 34.3 0.336 25 0
## 88 0 95 36 37.4 0.247 24 1
## 89 3 171 135 33.3 0.199 24 1
## 90 1 89 37 31.2 0.192 23 0
## 91 4 76 0 34.0 0.391 25 0
## 92 7 160 175 30.5 0.588 39 1
## 93 4 146 0 31.2 0.539 61 1
## 94 5 124 0 34.0 0.220 38 1
## 95 5 78 0 33.7 0.654 25 0
## 96 4 97 0 28.2 0.443 22 0
## 97 4 99 51 23.2 0.223 21 0
## 98 6 111 0 34.2 0.260 24 0
## 99 2 107 100 33.6 0.404 23 0
## 100 5 132 0 26.8 0.186 69 0
## 101 0 113 0 33.3 0.278 23 1
## 102 3 120 135 42.9 0.452 30 0
## 103 1 118 94 33.3 0.261 23 0
## 104 1 117 145 34.5 0.403 40 1
## 105 0 105 0 27.9 0.741 62 1
## 106 4 173 168 29.7 0.361 33 1
## 107 9 122 0 33.3 1.114 33 1
## 108 3 170 225 34.5 0.356 30 1
## 109 8 84 0 38.3 0.457 39 0
## 110 2 96 49 21.1 0.647 26 0
## 111 2 125 140 33.8 0.088 31 0
## 112 0 100 50 30.8 0.597 21 0
## 113 0 93 92 28.7 0.532 22 0
## 114 0 129 0 31.2 0.703 29 0
## 115 3 128 0 21.1 0.268 55 0
## 116 5 106 0 39.5 0.286 38 0
## 117 2 108 63 32.5 0.318 22 0
## 118 10 108 0 32.4 0.272 42 1
## 119 4 154 284 32.8 0.237 23 0
## 120 9 57 0 32.8 0.096 41 0
## 121 5 147 0 33.7 0.218 65 0
## 122 2 90 0 27.3 0.085 22 0
## 123 1 136 204 37.4 0.399 24 0
## 124 4 114 0 21.9 0.432 37 0
## 125 9 156 155 34.3 1.189 42 1
## 126 8 188 0 47.9 0.137 43 1
## 127 7 152 0 50.0 0.337 36 1
## 128 2 99 94 24.6 0.637 21 0
## 129 1 109 135 25.2 0.833 23 0
## 130 2 88 53 29.0 0.229 22 0
## 131 4 151 0 29.7 0.294 36 0
## 132 7 102 105 37.2 0.204 45 0
## 133 0 114 285 44.2 0.167 27 0
## 134 2 100 0 29.7 0.368 21 0
## 135 0 131 0 31.6 0.743 32 1
## 136 6 104 156 29.9 0.722 41 1
## 137 3 148 0 32.5 0.256 22 0
## 138 4 120 0 29.6 0.709 34 0
## 139 4 110 0 31.9 0.471 29 0
## 140 3 111 78 28.4 0.495 29 0
## 141 6 102 0 30.8 0.180 36 1
## 142 6 134 130 35.4 0.542 29 1
## 143 1 79 48 43.5 0.678 23 0
## 144 2 75 55 29.7 0.370 33 0
## 145 8 179 130 32.7 0.719 36 1
## 146 6 85 0 31.2 0.382 42 0
## 147 5 143 0 45.0 0.190 47 0
## 148 5 130 0 39.1 0.956 37 1
## 149 6 87 0 23.2 0.084 32 0
## 150 0 119 92 34.9 0.725 23 0
## 151 5 73 0 26.8 0.268 27 0
## 152 4 141 0 27.6 0.244 40 0
## 153 7 194 0 35.9 0.745 41 1
## 154 8 109 114 27.9 0.640 31 1
## 155 5 139 160 31.6 0.361 25 1
## 156 3 111 0 22.6 0.142 21 0
## 157 9 123 94 33.1 0.374 40 0
## 158 7 159 0 30.4 0.383 36 1
## 159 8 85 0 24.4 0.136 42 0
## 160 5 158 210 39.4 0.395 29 1
## 161 1 105 0 24.3 0.187 21 0
## 162 3 107 48 22.9 0.678 23 1
## 163 4 109 99 34.8 0.905 26 1
## 164 4 148 318 30.9 0.150 29 1
## 165 0 113 0 31.0 0.874 21 0
## 166 1 138 0 40.1 0.236 28 0
## 167 0 108 0 27.3 0.787 32 0
## 168 2 99 44 20.4 0.235 27 0
## 169 6 103 190 37.7 0.324 55 0
## 170 5 111 0 23.9 0.407 27 0
## 171 8 196 280 37.5 0.605 57 1
## 172 5 162 0 37.7 0.151 52 1
## 173 1 96 87 33.2 0.289 21 0
## 174 7 184 0 35.5 0.355 41 1
## 175 2 81 0 27.7 0.290 25 0
## 176 0 147 0 42.8 0.375 24 0
## 177 7 179 0 34.2 0.164 60 0
## 178 0 140 130 42.6 0.431 24 1
## 179 9 112 175 34.2 0.260 36 1
## 180 12 151 271 41.8 0.742 38 1
## 181 5 109 129 35.8 0.514 25 1
## 182 6 125 120 30.0 0.464 32 0
## 183 5 112 0 37.8 0.261 41 1
## 184 2 158 0 31.6 0.805 66 1
## 185 7 142 190 28.8 0.687 61 0
## 186 1 100 56 23.6 0.666 26 0
## 187 1 87 32 34.6 0.101 22 0
## 188 0 101 0 35.7 0.198 26 0
## 189 3 162 0 37.2 0.652 24 1
## 190 0 117 53 45.2 0.089 24 0
## 191 4 142 0 44.0 0.645 22 1
## 192 1 79 37 25.4 0.583 22 0
## 193 4 122 0 35.0 0.394 29 0
## 194 3 74 45 29.7 0.293 23 0
## 195 4 171 0 43.6 0.479 26 1
## 196 7 181 192 35.9 0.586 51 1
## 197 0 179 0 44.1 0.686 23 1
## 198 9 164 0 30.8 0.831 32 1
## 199 0 104 0 18.4 0.582 27 0
## 200 1 91 0 29.2 0.192 21 0
## 201 4 91 88 33.1 0.446 22 0
## 202 3 139 0 25.6 0.402 22 1
## 203 2 146 194 38.2 0.329 29 0
## 204 10 122 0 31.2 0.258 41 0
## 205 1 111 0 30.1 0.143 23 0
## 206 9 106 0 31.2 0.380 42 0
## 207 2 129 0 28.0 0.284 27 0
## 208 2 90 55 24.4 0.249 24 0
## 209 0 86 0 35.8 0.238 25 0
## 210 12 92 258 27.6 0.926 44 1
## 211 1 113 0 33.6 0.543 21 1
## 212 3 111 0 30.1 0.557 30 0
## 213 2 114 0 28.7 0.092 25 0
## 214 3 191 130 30.9 0.299 34 0
## 215 4 95 0 32.1 0.612 24 0
## 216 3 142 0 32.4 0.200 63 0
## 217 4 123 0 32.0 0.226 35 1
## 218 5 96 67 33.6 0.997 43 0
## 219 2 128 0 40.0 1.101 24 0
## 220 0 102 0 25.1 0.078 21 0
## 221 10 101 0 45.6 1.136 38 1
## 222 2 108 56 25.2 0.128 21 0
## 223 3 122 0 23.0 0.254 40 0
## 224 1 71 45 33.2 0.422 21 0
## 225 13 106 0 34.2 0.251 52 0
## 226 2 100 57 40.5 0.677 25 0
## 227 7 106 0 26.5 0.296 29 1
## 228 0 104 116 27.8 0.454 23 0
## 229 5 114 0 24.9 0.744 57 0
## 230 2 108 278 25.3 0.881 22 0
## 231 0 146 0 37.9 0.334 28 1
## 232 10 129 122 35.9 0.280 39 0
## 233 7 133 155 32.4 0.262 37 0
## 234 7 161 0 30.4 0.165 47 1
## 235 2 108 0 27.0 0.259 52 1
## 236 7 136 135 26.0 0.647 51 0
## 237 1 119 220 45.6 0.808 29 1
## 238 4 96 49 20.8 0.340 26 0
## 239 5 108 75 36.1 0.263 33 0
## 240 0 78 40 36.9 0.434 21 0
## 241 0 107 74 36.6 0.757 25 1
## 242 1 128 194 40.5 0.613 24 1
## 243 0 161 0 21.9 0.254 65 0
## 244 6 151 120 35.5 0.692 28 0
## 245 0 126 215 30.7 0.520 24 0
## 246 8 112 0 23.6 0.840 58 0
## 247 2 144 135 31.6 0.422 25 1
## 248 5 77 42 35.8 0.156 35 0
## 249 3 150 0 21.0 0.207 37 0
## 250 2 120 105 39.7 0.215 29 0
## 251 10 161 132 25.5 0.326 47 1
## 252 0 137 148 24.8 0.143 21 0
## 253 2 124 205 32.9 0.875 30 1
## 254 6 80 0 26.2 0.313 41 0
## 255 0 106 148 39.4 0.605 22 0
## 256 2 155 96 26.6 0.433 27 1
## 257 3 113 85 29.5 0.626 25 0
## 258 7 109 0 35.9 1.127 43 1
## 259 2 112 94 34.1 0.315 26 0
## 260 3 99 64 19.3 0.284 30 0
## 261 3 182 0 30.5 0.345 29 1
## 262 3 115 140 38.1 0.150 28 0
## 263 6 194 0 23.5 0.129 59 1
## 264 4 129 231 27.5 0.527 31 0
## 265 3 112 0 31.6 0.197 25 1
## 266 0 124 0 27.4 0.254 36 1
## 267 13 152 29 26.8 0.731 43 1
## 268 2 112 0 35.7 0.148 21 0
## 269 1 157 168 25.6 0.123 24 0
## 270 1 122 156 35.1 0.692 30 1
## 271 10 179 0 35.1 0.200 37 0
## 272 2 102 120 45.5 0.127 23 1
## 273 6 105 68 30.8 0.122 37 0
## 274 2 87 52 32.7 0.166 25 0
## 275 12 106 0 23.6 0.137 44 0
## 276 1 95 58 23.9 0.260 22 0
## 277 0 165 255 47.9 0.259 26 0
## 278 5 115 0 31.2 0.343 44 1
## 279 9 152 171 34.2 0.893 33 1
## 280 7 178 0 39.9 0.331 41 1
## 281 1 130 105 25.9 0.472 22 0
## 282 1 95 73 25.9 0.673 36 0
## 283 5 122 0 34.7 0.290 33 0
## 284 8 95 0 36.8 0.485 57 0
## 285 8 126 108 38.5 0.349 49 0
## 286 1 139 83 28.7 0.654 22 0
## 287 3 99 74 21.8 0.279 26 0
## 288 4 92 0 42.2 0.237 29 0
## 289 4 137 0 31.2 0.252 30 0
## 290 3 61 0 34.4 0.243 46 0
## 291 1 90 43 27.2 0.580 24 0
## 292 3 90 0 42.7 0.559 21 0
## 293 9 165 0 30.4 0.302 49 1
## 294 1 125 167 33.3 0.962 28 1
## 295 12 88 54 35.3 0.378 48 0
## 296 1 196 249 36.5 0.875 29 1
## 297 5 158 0 29.8 0.207 63 0
## 298 4 146 0 38.5 0.520 67 1
## 299 4 147 293 34.9 0.385 30 0
## 300 5 99 83 34.0 0.499 30 0
## 301 6 124 0 27.6 0.368 29 1
## 302 0 101 0 21.0 0.252 21 0
## 303 3 81 66 27.5 0.306 22 0
## 304 1 133 140 32.8 0.234 45 1
## 305 0 84 66 35.8 0.545 21 0
## 306 2 105 94 34.9 0.225 25 0
## 307 2 122 158 36.2 0.816 28 0
## 308 0 98 84 25.2 0.299 22 0
## 309 1 87 75 37.2 0.509 22 0
## 310 4 156 0 48.3 0.238 32 1
## 311 0 93 72 43.4 1.021 35 0
## 312 1 107 82 30.8 0.821 24 0
## 313 0 105 0 20.0 0.236 22 0
## 314 1 109 182 25.4 0.947 21 0
## 315 1 125 110 24.3 0.221 25 0
## 316 1 119 50 22.3 0.205 24 0
## 317 5 116 0 32.3 0.660 35 1
## 318 8 105 0 43.3 0.239 45 1
## 319 5 144 285 32.0 0.452 58 1
## 320 3 100 81 31.6 0.949 28 0
## 321 1 100 196 32.0 0.444 42 0
## 322 5 166 0 45.7 0.340 27 1
## 323 4 116 87 22.1 0.463 37 0
## 324 4 158 0 32.9 0.803 31 1
## 325 3 96 115 24.7 0.944 39 0
## 326 0 131 0 34.3 0.196 22 1
## 327 3 82 0 21.1 0.389 25 0
## 328 3 193 0 34.9 0.241 25 1
## 329 4 95 0 32.0 0.161 31 1
## 330 6 137 0 24.2 0.151 55 0
## 331 5 136 88 35.0 0.286 35 1
## 332 9 72 0 31.6 0.280 38 0
## 333 5 168 0 32.9 0.135 41 1
## 334 2 123 165 42.1 0.520 26 0
## 335 4 115 0 28.9 0.376 46 1
## 336 0 101 0 21.9 0.336 25 0
## 337 8 197 0 25.9 1.191 39 1
## 338 6 102 0 35.7 0.674 28 0
## 339 1 112 176 34.4 0.528 25 0
## 340 1 143 310 42.4 1.076 22 0
## 341 1 143 61 26.2 0.256 21 0
## 342 0 138 167 34.6 0.534 21 1
## 343 1 97 0 27.2 1.095 22 0
## 344 4 144 0 38.5 0.554 37 1
## 345 1 83 0 18.2 0.624 27 0
## 346 3 129 115 26.4 0.219 28 1
## 347 1 119 170 45.3 0.507 26 0
## 348 2 94 76 26.0 0.561 21 0
## 349 0 102 78 40.6 0.496 21 0
## 350 2 115 0 30.8 0.421 21 0
## 351 8 151 210 42.9 0.516 36 1
## 352 4 184 277 37.0 0.264 31 1
## 353 1 181 180 34.1 0.328 38 1
## 354 0 135 145 40.6 0.284 26 0
## 355 1 95 180 35.0 0.233 43 1
## 356 3 89 85 30.4 0.551 38 0
## 357 1 80 60 30.0 0.527 22 0
## 358 2 139 0 25.6 0.167 29 0
## 359 1 90 0 24.5 1.138 36 0
## 360 12 140 0 37.4 0.244 41 0
## 361 5 147 0 29.9 0.434 28 0
## 362 1 97 0 18.2 0.147 21 0
## 363 6 107 0 36.8 0.727 31 0
## 364 0 189 0 34.3 0.435 41 1
## 365 2 83 50 32.2 0.497 22 0
## 366 4 117 120 33.2 0.230 24 0
## 367 8 108 0 30.5 0.955 33 1
## 368 4 117 0 29.7 0.380 30 1
## 369 1 100 70 25.3 0.658 28 0
## 370 0 95 92 36.5 0.330 26 0
## 371 0 104 64 33.6 0.510 22 1
## 372 0 120 63 30.5 0.285 26 0
## 373 1 82 95 21.2 0.415 23 0
## 374 2 134 0 28.9 0.542 23 1
## 375 0 91 210 39.9 0.381 25 0
## 376 2 100 105 37.8 0.498 24 0
## 377 1 135 0 26.7 0.687 62 0
## 378 5 86 71 30.2 0.364 24 0
## 379 10 148 237 37.6 1.001 51 1
## 380 9 134 60 25.9 0.460 81 0
## 381 9 120 56 20.8 0.733 48 0
## 382 1 71 0 21.8 0.416 26 0
## 383 8 74 49 35.3 0.705 39 0
## 384 5 88 0 27.6 0.258 37 0
## 385 10 115 0 24.0 1.022 34 0
## 386 0 124 105 21.8 0.452 21 0
## 387 0 74 36 27.8 0.269 22 0
## 388 0 97 100 36.8 0.600 25 0
## 389 6 154 140 46.1 0.571 27 0
## 390 1 144 0 41.3 0.607 28 0
## 391 0 137 0 33.2 0.170 22 0
## 392 0 119 0 38.8 0.259 22 0
## 393 7 136 0 29.9 0.210 50 0
## 394 4 114 0 28.9 0.126 24 0
## 395 0 137 0 27.3 0.231 59 0
## 396 2 105 191 33.7 0.711 29 1
## 397 7 114 110 23.8 0.466 31 0
## 398 8 126 75 25.9 0.162 39 0
## 399 4 132 0 28.0 0.419 63 0
## 400 0 123 0 35.2 0.197 29 0
## 401 4 85 49 27.8 0.306 28 0
## 402 0 84 125 38.2 0.233 23 0
## 403 0 135 250 42.3 0.365 24 1
## 404 0 173 265 46.5 1.159 58 0
## 405 4 99 0 25.6 0.294 28 0
## 406 8 194 0 26.1 0.551 67 0
## 407 2 83 66 36.8 0.629 24 0
## 408 2 89 0 33.5 0.292 42 0
## 409 4 99 0 32.8 0.145 33 0
## 410 4 125 122 28.9 1.144 45 1
## 411 6 166 0 26.6 0.304 66 0
## 412 5 110 0 26.0 0.292 30 0
## 413 2 81 76 30.1 0.547 25 0
## 414 7 195 145 25.1 0.163 55 1
## 415 6 154 193 29.3 0.839 39 0
## 416 2 117 71 25.2 0.313 21 0
## 417 3 84 0 37.2 0.267 28 0
## 418 7 94 79 33.3 0.738 41 0
## 419 3 96 0 37.3 0.238 40 0
## 420 10 75 0 33.3 0.263 38 0
## 421 0 180 90 36.5 0.314 35 1
## 422 1 130 170 28.6 0.692 21 0
## 423 2 84 76 30.4 0.968 21 0
## 424 8 120 0 25.0 0.409 64 0
## 425 12 84 0 29.7 0.297 46 1
## 426 0 139 210 22.1 0.207 21 0
## 427 9 91 0 24.2 0.200 58 0
## 428 2 91 0 27.3 0.525 22 0
## 429 3 99 86 25.6 0.154 24 0
## 430 3 163 105 31.6 0.268 28 1
## 431 9 145 165 30.3 0.771 53 1
## 432 7 125 0 37.6 0.304 51 0
## 433 13 76 0 32.8 0.180 41 0
## 434 2 68 66 25.0 0.187 25 0
## 435 3 124 130 33.2 0.305 26 0
## 436 9 130 0 34.2 0.652 45 1
## 437 3 125 0 31.6 0.151 24 0
## 438 3 87 0 21.8 0.444 21 0
## 439 1 97 82 18.2 0.299 21 0
## 440 3 116 105 26.3 0.107 24 0
## 441 0 117 188 30.8 0.493 22 0
## 442 0 111 0 24.6 0.660 31 0
## 443 2 122 106 29.8 0.717 22 0
## 444 0 107 0 45.3 0.686 24 0
## 445 1 86 65 41.3 0.917 29 0
## 446 0 105 0 29.6 0.197 46 0
## 447 0 57 0 21.7 0.735 67 0
## 448 0 127 210 36.3 0.804 23 0
## 449 3 129 155 36.4 0.968 32 1
## 450 8 100 215 39.4 0.661 43 1
## 451 3 128 190 32.4 0.549 27 1
## 452 10 90 0 34.9 0.825 56 1
## 453 4 84 56 39.5 0.159 25 0
## 454 1 88 76 32.0 0.365 29 0
## 455 8 186 225 34.5 0.423 37 1
## 456 5 187 207 43.6 1.034 53 1
## 457 4 131 166 33.1 0.160 28 0
## 458 1 164 67 32.8 0.341 50 0
## 459 1 116 0 27.4 0.204 21 0
## 460 3 84 106 31.9 0.591 25 0
## 461 6 114 0 27.8 0.247 66 0
## 462 1 88 44 29.9 0.422 23 0
## 463 1 84 115 36.9 0.471 28 0
## 464 7 124 215 25.5 0.161 37 0
## 465 1 97 0 38.1 0.218 30 0
## 466 8 110 0 27.8 0.237 58 0
## 467 11 103 0 46.2 0.126 42 0
## 468 11 85 0 30.1 0.300 35 0
## 469 6 125 0 33.8 0.121 54 1
## 470 0 198 274 41.3 0.502 28 1
## 471 1 87 77 37.6 0.401 24 0
## 472 6 99 54 26.9 0.497 32 0
## 473 0 91 0 32.4 0.601 27 0
## 474 2 95 88 26.1 0.748 22 0
## 475 1 99 18 38.6 0.412 21 0
## 476 6 92 126 32.0 0.085 46 0
## 477 4 154 126 31.3 0.338 37 0
## 478 0 121 165 34.3 0.203 33 1
## 479 3 78 0 32.5 0.270 39 0
## 480 2 130 0 22.6 0.268 21 0
## 481 3 111 44 29.5 0.430 22 0
## 482 2 98 120 34.7 0.198 22 0
## 483 1 119 63 35.5 0.280 25 0
## 484 6 108 130 24.0 0.813 35 0
## 485 2 118 0 42.9 0.693 21 1
## 486 10 133 0 27.0 0.245 36 0
## 487 0 151 0 42.1 0.371 21 1
## 488 6 109 0 25.0 0.206 27 0
## 489 12 121 0 26.5 0.259 62 0
## 490 8 100 0 38.7 0.190 42 0
## 491 1 93 0 22.5 0.417 22 0
## 492 8 143 0 34.9 0.129 41 1
## 493 6 103 0 24.3 0.249 29 0
## 494 3 176 156 33.3 1.154 52 1
## 495 11 111 0 46.8 0.925 45 1
## 496 2 112 140 39.4 0.175 24 0
## 497 3 132 0 34.4 0.402 44 1
## 498 6 123 230 33.6 0.733 34 0
## 499 0 188 185 32.0 0.682 22 1
## 500 0 67 0 45.3 0.194 46 0
## 501 1 173 0 36.8 0.088 38 1
## 502 1 109 120 23.1 0.407 26 0
## 503 1 108 0 27.1 0.400 24 0
## 504 1 124 0 27.8 0.100 30 0
## 505 7 150 126 35.2 0.692 54 1
## 506 1 124 0 35.8 0.514 21 0
## 507 1 92 41 19.5 0.482 25 0
## 508 0 152 272 41.5 0.270 27 0
## 509 1 111 182 24.0 0.138 23 0
## 510 3 106 158 30.9 0.292 24 0
## 511 3 174 194 32.9 0.593 36 1
## 512 6 105 0 32.5 0.878 26 0
## 513 11 138 144 36.1 0.557 50 1
## 514 3 106 0 25.8 0.207 27 0
## 515 6 117 0 28.7 0.157 30 0
## 516 2 68 15 20.1 0.257 23 0
## 517 2 112 160 38.4 0.246 28 0
## 518 0 94 115 43.5 0.347 21 0
## 519 2 108 0 30.8 0.158 21 0
## 520 4 90 54 37.7 0.362 29 0
## 521 0 125 0 24.7 0.206 21 0
## 522 0 132 0 32.4 0.393 21 0
## 523 5 128 0 34.6 0.144 45 0
## 524 4 94 0 24.7 0.148 21 0
## 525 7 114 0 27.4 0.732 34 1
## 526 0 102 90 34.5 0.238 24 0
## 527 2 111 0 26.2 0.343 23 0
## 528 1 128 183 27.5 0.115 22 0
## 529 10 92 0 25.9 0.167 31 0
## 530 13 104 0 31.2 0.465 38 1
## 531 5 104 0 28.8 0.153 48 0
## 532 2 94 66 31.6 0.649 23 0
## 533 7 97 91 40.9 0.871 32 1
## 534 1 100 46 19.5 0.149 28 0
## 535 0 102 105 29.3 0.695 27 0
## 536 4 128 0 34.3 0.303 24 0
## 537 6 147 0 29.5 0.178 50 1
## 538 3 103 152 27.6 0.730 27 0
## 539 1 167 144 23.4 0.447 33 1
## 540 0 179 159 37.8 0.455 22 1
## 541 11 136 130 28.3 0.260 42 1
## 542 0 107 0 26.4 0.133 23 0
## 543 1 91 100 25.2 0.234 23 0
## 544 1 117 106 33.8 0.466 27 0
## 545 5 123 77 34.1 0.269 28 0
## 546 2 120 0 26.8 0.455 27 0
## 547 1 106 135 34.2 0.142 22 0
## 548 2 101 90 21.8 0.155 22 0
## 549 1 120 200 38.9 1.162 41 0
## 550 11 127 0 39.0 0.190 51 0
## 551 10 162 0 27.7 0.182 54 0
## 552 8 167 231 37.6 0.165 43 1
## 553 9 145 130 37.9 0.637 40 1
## 554 6 115 0 33.7 0.245 40 1
## 555 1 112 132 34.8 0.217 24 0
## 556 4 145 0 32.5 0.235 70 1
## 557 10 111 0 27.5 0.141 40 1
## 558 6 98 190 34.0 0.430 43 0
## 559 9 154 100 30.9 0.164 45 0
## 560 6 165 168 33.6 0.631 49 0
## 561 1 99 0 25.4 0.551 21 0
## 562 10 68 49 35.5 0.285 47 0
## 563 8 91 0 35.6 0.587 68 0
## 564 6 195 0 30.9 0.328 31 1
## 565 9 156 0 24.8 0.230 53 1
## 566 0 93 0 35.3 0.263 25 0
## 567 3 121 0 36.0 0.127 25 1
## 568 2 101 265 24.2 0.614 23 0
## 569 2 56 45 24.2 0.332 22 0
## 570 0 162 0 49.6 0.364 26 1
## 571 0 95 105 44.6 0.366 22 0
## 572 4 125 0 32.3 0.536 27 1
## 573 2 129 205 33.2 0.591 25 0
## 574 3 130 0 23.1 0.314 22 0
## 575 1 107 0 28.3 0.181 29 0
## 576 1 140 180 24.1 0.828 23 0
## 577 1 144 180 46.1 0.335 46 1
## 578 8 107 0 24.6 0.856 34 0
## 579 2 121 95 39.1 0.886 23 0
## 580 7 129 125 38.5 0.439 43 1
## 581 2 90 0 23.5 0.191 25 0
## 582 3 169 125 29.9 0.268 31 1
## 583 4 127 155 34.5 0.598 28 0
## 584 4 118 0 44.5 0.904 26 0
## 585 2 122 200 35.9 0.483 26 0
## 586 6 125 0 27.6 0.565 49 1
## 587 1 168 0 35.0 0.905 52 1
## 588 4 110 100 28.4 0.118 27 0
## 589 6 80 0 39.8 0.177 28 0
## 590 9 164 0 32.8 0.148 45 1
## 591 2 93 160 38.0 0.674 23 1
## 592 5 126 22 29.6 0.439 40 0
## 593 10 129 0 41.2 0.441 38 1
## 594 0 134 291 26.4 0.352 21 0
## 595 3 102 0 29.5 0.121 32 0
## 596 3 173 185 33.8 0.970 31 1
## 597 10 94 0 23.1 0.595 56 0
## 598 1 108 178 35.5 0.415 24 0
## 599 5 97 0 35.6 0.378 52 1
## 600 4 83 0 29.3 0.317 34 0
## 601 1 114 200 38.1 0.289 21 0
## 602 1 149 127 29.3 0.349 42 1
## 603 5 117 105 39.1 0.251 42 0
## 604 1 111 0 32.8 0.265 45 0
## 605 4 112 0 39.4 0.236 38 0
## 606 1 116 180 36.1 0.496 25 0
## 607 0 141 0 32.4 0.433 22 0
## 608 2 175 0 22.9 0.326 22 0
## 609 2 92 0 30.1 0.141 22 0
## 610 3 130 79 28.4 0.323 34 1
## 611 8 120 0 28.4 0.259 22 1
## 612 2 174 120 44.5 0.646 24 1
## 613 2 106 165 29.0 0.426 22 0
## 614 2 105 0 23.3 0.560 53 0
## 615 4 95 0 35.4 0.284 28 0
## 616 0 126 120 27.4 0.515 21 0
## 617 8 65 0 32.0 0.600 42 0
## 618 2 99 160 36.6 0.453 21 0
## 619 1 102 0 39.5 0.293 42 1
## 620 11 120 150 42.3 0.785 48 1
## 621 3 102 94 30.8 0.400 26 0
## 622 1 109 116 28.5 0.219 22 0
## 623 9 140 0 32.7 0.734 45 1
## 624 13 153 140 40.6 1.174 39 0
## 625 12 100 105 30.0 0.488 46 0
## 626 1 147 0 49.3 0.358 27 1
## 627 1 81 57 46.3 1.096 32 0
## 628 3 187 200 36.4 0.408 36 1
## 629 6 162 0 24.3 0.178 50 1
## 630 4 136 0 31.2 1.182 22 1
## 631 1 121 74 39.0 0.261 28 0
## 632 3 108 0 26.0 0.223 25 0
## 633 8 154 0 32.4 0.443 45 1
## 634 1 128 110 36.5 1.057 37 1
## 635 7 137 0 32.0 0.391 39 0
## 636 0 123 0 36.3 0.258 52 1
## 637 1 106 0 37.5 0.197 26 0
## 638 6 190 0 35.5 0.278 66 1
## 639 2 88 16 28.4 0.766 22 0
## 640 9 170 0 44.0 0.403 43 1
## 641 9 89 0 22.5 0.142 33 0
## 642 10 101 180 32.9 0.171 63 0
## 643 2 122 0 36.8 0.340 27 0
## 644 5 121 112 26.2 0.245 30 0
## 645 1 126 0 30.1 0.349 47 1
## 646 1 93 0 30.4 0.315 23 0Train Test Split
library(caTools)
split <- sample.split(data, SplitRatio = 0.8)
training <- subset(data, split == "TRUE")
testing <- subset(data, split == "FALSE")Model
model <- glm(Outcome~.,training,family="binomial")
summary(model)##
## Call:
## glm(formula = Outcome ~ ., family = "binomial", data = training)
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) -10.284222 1.043540 -9.855 < 2e-16 ***
## Pregnancies 0.119319 0.043648 2.734 0.006263 **
## Glucose 0.040779 0.005111 7.979 1.48e-15 ***
## Insulin -0.001802 0.001535 -1.174 0.240268
## BMI 0.096286 0.020947 4.597 4.29e-06 ***
## DiabetesPedigreeFunction 1.600009 0.478025 3.347 0.000817 ***
## Age 0.010481 0.011726 0.894 0.371391
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for binomial family taken to be 1)
##
## Null deviance: 583.10 on 460 degrees of freedom
## Residual deviance: 419.63 on 454 degrees of freedom
## AIC: 433.63
##
## Number of Fisher Scoring iterations: 5res <- predict(model,testing,type="response")
table(Actualvalue=testing$Outcome, predictedvalue=res>0.5)## predictedvalue
## Actualvalue FALSE TRUE
## 0 117 17
## 1 17 34(116+27)/(12+29+116+27)## [1] 0.7771739data2 <- data[ , -c(3,6)]
data2## Pregnancies Glucose BMI DiabetesPedigreeFunction Outcome
## 1 6 148 33.6 0.627 1
## 2 1 85 26.6 0.351 0
## 3 8 183 23.3 0.672 1
## 4 1 89 28.1 0.167 0
## 5 5 116 25.6 0.201 0
## 6 3 78 31.0 0.248 1
## 7 4 110 37.6 0.191 0
## 8 10 168 38.0 0.537 1
## 9 5 166 25.8 0.587 1
## 10 0 118 45.8 0.551 1
## 11 7 107 29.6 0.254 1
## 12 1 115 34.6 0.529 1
## 13 3 126 39.3 0.704 0
## 14 8 99 35.4 0.388 0
## 15 7 196 39.8 0.451 1
## 16 9 119 29.0 0.263 1
## 17 11 143 36.6 0.254 1
## 18 10 125 31.1 0.205 1
## 19 7 147 39.4 0.257 1
## 20 1 97 23.2 0.487 0
## 21 13 145 22.2 0.245 0
## 22 5 117 34.1 0.337 0
## 23 5 109 36.0 0.546 0
## 24 3 158 31.6 0.851 1
## 25 3 88 24.8 0.267 0
## 26 6 92 19.9 0.188 0
## 27 10 122 27.6 0.512 0
## 28 4 103 24.0 0.966 0
## 29 11 138 33.2 0.420 0
## 30 9 102 32.9 0.665 1
## 31 2 90 38.2 0.503 1
## 32 3 180 34.0 0.271 0
## 33 7 133 40.2 0.696 0
## 34 7 106 22.7 0.235 0
## 35 7 159 27.4 0.294 0
## 36 1 146 29.7 0.564 0
## 37 2 71 28.0 0.586 0
## 38 7 103 39.1 0.344 1
## 39 1 103 19.4 0.491 0
## 40 1 101 24.2 0.526 0
## 41 5 88 24.4 0.342 0
## 42 8 176 33.7 0.467 1
## 43 1 73 23.0 0.248 0
## 44 7 187 37.7 0.254 1
## 45 0 100 46.8 0.962 0
## 46 0 105 41.5 0.173 0
## 47 8 133 32.9 0.270 1
## 48 5 44 25.0 0.587 0
## 49 2 141 25.4 0.699 0
## 50 7 114 32.8 0.258 1
## 51 5 99 29.0 0.203 0
## 52 0 109 32.5 0.855 1
## 53 2 109 42.7 0.845 0
## 54 1 95 19.6 0.334 0
## 55 4 146 28.9 0.189 0
## 56 2 100 32.9 0.867 1
## 57 5 139 28.6 0.411 0
## 58 13 126 43.4 0.583 1
## 59 4 129 35.1 0.231 0
## 60 1 79 32.0 0.396 0
## 61 7 62 32.6 0.391 0
## 62 5 95 37.7 0.370 0
## 63 2 112 25.0 0.307 0
## 64 3 113 22.4 0.140 0
## 65 7 83 29.3 0.767 0
## 66 0 101 24.6 0.237 0
## 67 2 110 32.4 0.698 0
## 68 13 106 36.6 0.178 0
## 69 2 100 38.5 0.324 0
## 70 1 107 26.5 0.165 0
## 71 1 80 19.1 0.258 0
## 72 4 123 32.0 0.443 0
## 73 7 81 46.7 0.261 0
## 74 4 134 23.8 0.277 1
## 75 2 142 24.7 0.761 0
## 76 6 144 33.9 0.255 0
## 77 2 92 31.6 0.130 0
## 78 1 71 20.4 0.323 0
## 79 6 93 28.7 0.356 0
## 80 1 122 49.7 0.325 1
## 81 1 151 26.1 0.179 0
## 82 0 125 22.5 0.262 0
## 83 1 81 26.6 0.283 0
## 84 2 85 39.6 0.930 0
## 85 1 126 28.7 0.801 0
## 86 4 144 29.5 0.287 0
## 87 3 83 34.3 0.336 0
## 88 0 95 37.4 0.247 1
## 89 3 171 33.3 0.199 1
## 90 1 89 31.2 0.192 0
## 91 4 76 34.0 0.391 0
## 92 7 160 30.5 0.588 1
## 93 4 146 31.2 0.539 1
## 94 5 124 34.0 0.220 1
## 95 5 78 33.7 0.654 0
## 96 4 97 28.2 0.443 0
## 97 4 99 23.2 0.223 0
## 98 6 111 34.2 0.260 0
## 99 2 107 33.6 0.404 0
## 100 5 132 26.8 0.186 0
## 101 0 113 33.3 0.278 1
## 102 3 120 42.9 0.452 0
## 103 1 118 33.3 0.261 0
## 104 1 117 34.5 0.403 1
## 105 0 105 27.9 0.741 1
## 106 4 173 29.7 0.361 1
## 107 9 122 33.3 1.114 1
## 108 3 170 34.5 0.356 1
## 109 8 84 38.3 0.457 0
## 110 2 96 21.1 0.647 0
## 111 2 125 33.8 0.088 0
## 112 0 100 30.8 0.597 0
## 113 0 93 28.7 0.532 0
## 114 0 129 31.2 0.703 0
## 115 3 128 21.1 0.268 0
## 116 5 106 39.5 0.286 0
## 117 2 108 32.5 0.318 0
## 118 10 108 32.4 0.272 1
## 119 4 154 32.8 0.237 0
## 120 9 57 32.8 0.096 0
## 121 5 147 33.7 0.218 0
## 122 2 90 27.3 0.085 0
## 123 1 136 37.4 0.399 0
## 124 4 114 21.9 0.432 0
## 125 9 156 34.3 1.189 1
## 126 8 188 47.9 0.137 1
## 127 7 152 50.0 0.337 1
## 128 2 99 24.6 0.637 0
## 129 1 109 25.2 0.833 0
## 130 2 88 29.0 0.229 0
## 131 4 151 29.7 0.294 0
## 132 7 102 37.2 0.204 0
## 133 0 114 44.2 0.167 0
## 134 2 100 29.7 0.368 0
## 135 0 131 31.6 0.743 1
## 136 6 104 29.9 0.722 1
## 137 3 148 32.5 0.256 0
## 138 4 120 29.6 0.709 0
## 139 4 110 31.9 0.471 0
## 140 3 111 28.4 0.495 0
## 141 6 102 30.8 0.180 1
## 142 6 134 35.4 0.542 1
## 143 1 79 43.5 0.678 0
## 144 2 75 29.7 0.370 0
## 145 8 179 32.7 0.719 1
## 146 6 85 31.2 0.382 0
## 147 5 143 45.0 0.190 0
## 148 5 130 39.1 0.956 1
## 149 6 87 23.2 0.084 0
## 150 0 119 34.9 0.725 0
## 151 5 73 26.8 0.268 0
## 152 4 141 27.6 0.244 0
## 153 7 194 35.9 0.745 1
## 154 8 109 27.9 0.640 1
## 155 5 139 31.6 0.361 1
## 156 3 111 22.6 0.142 0
## 157 9 123 33.1 0.374 0
## 158 7 159 30.4 0.383 1
## 159 8 85 24.4 0.136 0
## 160 5 158 39.4 0.395 1
## 161 1 105 24.3 0.187 0
## 162 3 107 22.9 0.678 1
## 163 4 109 34.8 0.905 1
## 164 4 148 30.9 0.150 1
## 165 0 113 31.0 0.874 0
## 166 1 138 40.1 0.236 0
## 167 0 108 27.3 0.787 0
## 168 2 99 20.4 0.235 0
## 169 6 103 37.7 0.324 0
## 170 5 111 23.9 0.407 0
## 171 8 196 37.5 0.605 1
## 172 5 162 37.7 0.151 1
## 173 1 96 33.2 0.289 0
## 174 7 184 35.5 0.355 1
## 175 2 81 27.7 0.290 0
## 176 0 147 42.8 0.375 0
## 177 7 179 34.2 0.164 0
## 178 0 140 42.6 0.431 1
## 179 9 112 34.2 0.260 1
## 180 12 151 41.8 0.742 1
## 181 5 109 35.8 0.514 1
## 182 6 125 30.0 0.464 0
## 183 5 112 37.8 0.261 1
## 184 2 158 31.6 0.805 1
## 185 7 142 28.8 0.687 0
## 186 1 100 23.6 0.666 0
## 187 1 87 34.6 0.101 0
## 188 0 101 35.7 0.198 0
## 189 3 162 37.2 0.652 1
## 190 0 117 45.2 0.089 0
## 191 4 142 44.0 0.645 1
## 192 1 79 25.4 0.583 0
## 193 4 122 35.0 0.394 0
## 194 3 74 29.7 0.293 0
## 195 4 171 43.6 0.479 1
## 196 7 181 35.9 0.586 1
## 197 0 179 44.1 0.686 1
## 198 9 164 30.8 0.831 1
## 199 0 104 18.4 0.582 0
## 200 1 91 29.2 0.192 0
## 201 4 91 33.1 0.446 0
## 202 3 139 25.6 0.402 1
## 203 2 146 38.2 0.329 0
## 204 10 122 31.2 0.258 0
## 205 1 111 30.1 0.143 0
## 206 9 106 31.2 0.380 0
## 207 2 129 28.0 0.284 0
## 208 2 90 24.4 0.249 0
## 209 0 86 35.8 0.238 0
## 210 12 92 27.6 0.926 1
## 211 1 113 33.6 0.543 1
## 212 3 111 30.1 0.557 0
## 213 2 114 28.7 0.092 0
## 214 3 191 30.9 0.299 0
## 215 4 95 32.1 0.612 0
## 216 3 142 32.4 0.200 0
## 217 4 123 32.0 0.226 1
## 218 5 96 33.6 0.997 0
## 219 2 128 40.0 1.101 0
## 220 0 102 25.1 0.078 0
## 221 10 101 45.6 1.136 1
## 222 2 108 25.2 0.128 0
## 223 3 122 23.0 0.254 0
## 224 1 71 33.2 0.422 0
## 225 13 106 34.2 0.251 0
## 226 2 100 40.5 0.677 0
## 227 7 106 26.5 0.296 1
## 228 0 104 27.8 0.454 0
## 229 5 114 24.9 0.744 0
## 230 2 108 25.3 0.881 0
## 231 0 146 37.9 0.334 1
## 232 10 129 35.9 0.280 0
## 233 7 133 32.4 0.262 0
## 234 7 161 30.4 0.165 1
## 235 2 108 27.0 0.259 1
## 236 7 136 26.0 0.647 0
## 237 1 119 45.6 0.808 1
## 238 4 96 20.8 0.340 0
## 239 5 108 36.1 0.263 0
## 240 0 78 36.9 0.434 0
## 241 0 107 36.6 0.757 1
## 242 1 128 40.5 0.613 1
## 243 0 161 21.9 0.254 0
## 244 6 151 35.5 0.692 0
## 245 0 126 30.7 0.520 0
## 246 8 112 23.6 0.840 0
## 247 2 144 31.6 0.422 1
## 248 5 77 35.8 0.156 0
## 249 3 150 21.0 0.207 0
## 250 2 120 39.7 0.215 0
## 251 10 161 25.5 0.326 1
## 252 0 137 24.8 0.143 0
## 253 2 124 32.9 0.875 1
## 254 6 80 26.2 0.313 0
## 255 0 106 39.4 0.605 0
## 256 2 155 26.6 0.433 1
## 257 3 113 29.5 0.626 0
## 258 7 109 35.9 1.127 1
## 259 2 112 34.1 0.315 0
## 260 3 99 19.3 0.284 0
## 261 3 182 30.5 0.345 1
## 262 3 115 38.1 0.150 0
## 263 6 194 23.5 0.129 1
## 264 4 129 27.5 0.527 0
## 265 3 112 31.6 0.197 1
## 266 0 124 27.4 0.254 1
## 267 13 152 26.8 0.731 1
## 268 2 112 35.7 0.148 0
## 269 1 157 25.6 0.123 0
## 270 1 122 35.1 0.692 1
## 271 10 179 35.1 0.200 0
## 272 2 102 45.5 0.127 1
## 273 6 105 30.8 0.122 0
## 274 2 87 32.7 0.166 0
## 275 12 106 23.6 0.137 0
## 276 1 95 23.9 0.260 0
## 277 0 165 47.9 0.259 0
## 278 5 115 31.2 0.343 1
## 279 9 152 34.2 0.893 1
## 280 7 178 39.9 0.331 1
## 281 1 130 25.9 0.472 0
## 282 1 95 25.9 0.673 0
## 283 5 122 34.7 0.290 0
## 284 8 95 36.8 0.485 0
## 285 8 126 38.5 0.349 0
## 286 1 139 28.7 0.654 0
## 287 3 99 21.8 0.279 0
## 288 4 92 42.2 0.237 0
## 289 4 137 31.2 0.252 0
## 290 3 61 34.4 0.243 0
## 291 1 90 27.2 0.580 0
## 292 3 90 42.7 0.559 0
## 293 9 165 30.4 0.302 1
## 294 1 125 33.3 0.962 1
## 295 12 88 35.3 0.378 0
## 296 1 196 36.5 0.875 1
## 297 5 158 29.8 0.207 0
## 298 4 146 38.5 0.520 1
## 299 4 147 34.9 0.385 0
## 300 5 99 34.0 0.499 0
## 301 6 124 27.6 0.368 1
## 302 0 101 21.0 0.252 0
## 303 3 81 27.5 0.306 0
## 304 1 133 32.8 0.234 1
## 305 0 84 35.8 0.545 0
## 306 2 105 34.9 0.225 0
## 307 2 122 36.2 0.816 0
## 308 0 98 25.2 0.299 0
## 309 1 87 37.2 0.509 0
## 310 4 156 48.3 0.238 1
## 311 0 93 43.4 1.021 0
## 312 1 107 30.8 0.821 0
## 313 0 105 20.0 0.236 0
## 314 1 109 25.4 0.947 0
## 315 1 125 24.3 0.221 0
## 316 1 119 22.3 0.205 0
## 317 5 116 32.3 0.660 1
## 318 8 105 43.3 0.239 1
## 319 5 144 32.0 0.452 1
## 320 3 100 31.6 0.949 0
## 321 1 100 32.0 0.444 0
## 322 5 166 45.7 0.340 1
## 323 4 116 22.1 0.463 0
## 324 4 158 32.9 0.803 1
## 325 3 96 24.7 0.944 0
## 326 0 131 34.3 0.196 1
## 327 3 82 21.1 0.389 0
## 328 3 193 34.9 0.241 1
## 329 4 95 32.0 0.161 1
## 330 6 137 24.2 0.151 0
## 331 5 136 35.0 0.286 1
## 332 9 72 31.6 0.280 0
## 333 5 168 32.9 0.135 1
## 334 2 123 42.1 0.520 0
## 335 4 115 28.9 0.376 1
## 336 0 101 21.9 0.336 0
## 337 8 197 25.9 1.191 1
## 338 6 102 35.7 0.674 0
## 339 1 112 34.4 0.528 0
## 340 1 143 42.4 1.076 0
## 341 1 143 26.2 0.256 0
## 342 0 138 34.6 0.534 1
## 343 1 97 27.2 1.095 0
## 344 4 144 38.5 0.554 1
## 345 1 83 18.2 0.624 0
## 346 3 129 26.4 0.219 1
## 347 1 119 45.3 0.507 0
## 348 2 94 26.0 0.561 0
## 349 0 102 40.6 0.496 0
## 350 2 115 30.8 0.421 0
## 351 8 151 42.9 0.516 1
## 352 4 184 37.0 0.264 1
## 353 1 181 34.1 0.328 1
## 354 0 135 40.6 0.284 0
## 355 1 95 35.0 0.233 1
## 356 3 89 30.4 0.551 0
## 357 1 80 30.0 0.527 0
## 358 2 139 25.6 0.167 0
## 359 1 90 24.5 1.138 0
## 360 12 140 37.4 0.244 0
## 361 5 147 29.9 0.434 0
## 362 1 97 18.2 0.147 0
## 363 6 107 36.8 0.727 0
## 364 0 189 34.3 0.435 1
## 365 2 83 32.2 0.497 0
## 366 4 117 33.2 0.230 0
## 367 8 108 30.5 0.955 1
## 368 4 117 29.7 0.380 1
## 369 1 100 25.3 0.658 0
## 370 0 95 36.5 0.330 0
## 371 0 104 33.6 0.510 1
## 372 0 120 30.5 0.285 0
## 373 1 82 21.2 0.415 0
## 374 2 134 28.9 0.542 1
## 375 0 91 39.9 0.381 0
## 376 2 100 37.8 0.498 0
## 377 1 135 26.7 0.687 0
## 378 5 86 30.2 0.364 0
## 379 10 148 37.6 1.001 1
## 380 9 134 25.9 0.460 0
## 381 9 120 20.8 0.733 0
## 382 1 71 21.8 0.416 0
## 383 8 74 35.3 0.705 0
## 384 5 88 27.6 0.258 0
## 385 10 115 24.0 1.022 0
## 386 0 124 21.8 0.452 0
## 387 0 74 27.8 0.269 0
## 388 0 97 36.8 0.600 0
## 389 6 154 46.1 0.571 0
## 390 1 144 41.3 0.607 0
## 391 0 137 33.2 0.170 0
## 392 0 119 38.8 0.259 0
## 393 7 136 29.9 0.210 0
## 394 4 114 28.9 0.126 0
## 395 0 137 27.3 0.231 0
## 396 2 105 33.7 0.711 1
## 397 7 114 23.8 0.466 0
## 398 8 126 25.9 0.162 0
## 399 4 132 28.0 0.419 0
## 400 0 123 35.2 0.197 0
## 401 4 85 27.8 0.306 0
## 402 0 84 38.2 0.233 0
## 403 0 135 42.3 0.365 1
## 404 0 173 46.5 1.159 0
## 405 4 99 25.6 0.294 0
## 406 8 194 26.1 0.551 0
## 407 2 83 36.8 0.629 0
## 408 2 89 33.5 0.292 0
## 409 4 99 32.8 0.145 0
## 410 4 125 28.9 1.144 1
## 411 6 166 26.6 0.304 0
## 412 5 110 26.0 0.292 0
## 413 2 81 30.1 0.547 0
## 414 7 195 25.1 0.163 1
## 415 6 154 29.3 0.839 0
## 416 2 117 25.2 0.313 0
## 417 3 84 37.2 0.267 0
## 418 7 94 33.3 0.738 0
## 419 3 96 37.3 0.238 0
## 420 10 75 33.3 0.263 0
## 421 0 180 36.5 0.314 1
## 422 1 130 28.6 0.692 0
## 423 2 84 30.4 0.968 0
## 424 8 120 25.0 0.409 0
## 425 12 84 29.7 0.297 1
## 426 0 139 22.1 0.207 0
## 427 9 91 24.2 0.200 0
## 428 2 91 27.3 0.525 0
## 429 3 99 25.6 0.154 0
## 430 3 163 31.6 0.268 1
## 431 9 145 30.3 0.771 1
## 432 7 125 37.6 0.304 0
## 433 13 76 32.8 0.180 0
## 434 2 68 25.0 0.187 0
## 435 3 124 33.2 0.305 0
## 436 9 130 34.2 0.652 1
## 437 3 125 31.6 0.151 0
## 438 3 87 21.8 0.444 0
## 439 1 97 18.2 0.299 0
## 440 3 116 26.3 0.107 0
## 441 0 117 30.8 0.493 0
## 442 0 111 24.6 0.660 0
## 443 2 122 29.8 0.717 0
## 444 0 107 45.3 0.686 0
## 445 1 86 41.3 0.917 0
## 446 0 105 29.6 0.197 0
## 447 0 57 21.7 0.735 0
## 448 0 127 36.3 0.804 0
## 449 3 129 36.4 0.968 1
## 450 8 100 39.4 0.661 1
## 451 3 128 32.4 0.549 1
## 452 10 90 34.9 0.825 1
## 453 4 84 39.5 0.159 0
## 454 1 88 32.0 0.365 0
## 455 8 186 34.5 0.423 1
## 456 5 187 43.6 1.034 1
## 457 4 131 33.1 0.160 0
## 458 1 164 32.8 0.341 0
## 459 1 116 27.4 0.204 0
## 460 3 84 31.9 0.591 0
## 461 6 114 27.8 0.247 0
## 462 1 88 29.9 0.422 0
## 463 1 84 36.9 0.471 0
## 464 7 124 25.5 0.161 0
## 465 1 97 38.1 0.218 0
## 466 8 110 27.8 0.237 0
## 467 11 103 46.2 0.126 0
## 468 11 85 30.1 0.300 0
## 469 6 125 33.8 0.121 1
## 470 0 198 41.3 0.502 1
## 471 1 87 37.6 0.401 0
## 472 6 99 26.9 0.497 0
## 473 0 91 32.4 0.601 0
## 474 2 95 26.1 0.748 0
## 475 1 99 38.6 0.412 0
## 476 6 92 32.0 0.085 0
## 477 4 154 31.3 0.338 0
## 478 0 121 34.3 0.203 1
## 479 3 78 32.5 0.270 0
## 480 2 130 22.6 0.268 0
## 481 3 111 29.5 0.430 0
## 482 2 98 34.7 0.198 0
## 483 1 119 35.5 0.280 0
## 484 6 108 24.0 0.813 0
## 485 2 118 42.9 0.693 1
## 486 10 133 27.0 0.245 0
## 487 0 151 42.1 0.371 1
## 488 6 109 25.0 0.206 0
## 489 12 121 26.5 0.259 0
## 490 8 100 38.7 0.190 0
## 491 1 93 22.5 0.417 0
## 492 8 143 34.9 0.129 1
## 493 6 103 24.3 0.249 0
## 494 3 176 33.3 1.154 1
## 495 11 111 46.8 0.925 1
## 496 2 112 39.4 0.175 0
## 497 3 132 34.4 0.402 1
## 498 6 123 33.6 0.733 0
## 499 0 188 32.0 0.682 1
## 500 0 67 45.3 0.194 0
## 501 1 173 36.8 0.088 1
## 502 1 109 23.1 0.407 0
## 503 1 108 27.1 0.400 0
## 504 1 124 27.8 0.100 0
## 505 7 150 35.2 0.692 1
## 506 1 124 35.8 0.514 0
## 507 1 92 19.5 0.482 0
## 508 0 152 41.5 0.270 0
## 509 1 111 24.0 0.138 0
## 510 3 106 30.9 0.292 0
## 511 3 174 32.9 0.593 1
## 512 6 105 32.5 0.878 0
## 513 11 138 36.1 0.557 1
## 514 3 106 25.8 0.207 0
## 515 6 117 28.7 0.157 0
## 516 2 68 20.1 0.257 0
## 517 2 112 38.4 0.246 0
## 518 0 94 43.5 0.347 0
## 519 2 108 30.8 0.158 0
## 520 4 90 37.7 0.362 0
## 521 0 125 24.7 0.206 0
## 522 0 132 32.4 0.393 0
## 523 5 128 34.6 0.144 0
## 524 4 94 24.7 0.148 0
## 525 7 114 27.4 0.732 1
## 526 0 102 34.5 0.238 0
## 527 2 111 26.2 0.343 0
## 528 1 128 27.5 0.115 0
## 529 10 92 25.9 0.167 0
## 530 13 104 31.2 0.465 1
## 531 5 104 28.8 0.153 0
## 532 2 94 31.6 0.649 0
## 533 7 97 40.9 0.871 1
## 534 1 100 19.5 0.149 0
## 535 0 102 29.3 0.695 0
## 536 4 128 34.3 0.303 0
## 537 6 147 29.5 0.178 1
## 538 3 103 27.6 0.730 0
## 539 1 167 23.4 0.447 1
## 540 0 179 37.8 0.455 1
## 541 11 136 28.3 0.260 1
## 542 0 107 26.4 0.133 0
## 543 1 91 25.2 0.234 0
## 544 1 117 33.8 0.466 0
## 545 5 123 34.1 0.269 0
## 546 2 120 26.8 0.455 0
## 547 1 106 34.2 0.142 0
## 548 2 101 21.8 0.155 0
## 549 1 120 38.9 1.162 0
## 550 11 127 39.0 0.190 0
## 551 10 162 27.7 0.182 0
## 552 8 167 37.6 0.165 1
## 553 9 145 37.9 0.637 1
## 554 6 115 33.7 0.245 1
## 555 1 112 34.8 0.217 0
## 556 4 145 32.5 0.235 1
## 557 10 111 27.5 0.141 1
## 558 6 98 34.0 0.430 0
## 559 9 154 30.9 0.164 0
## 560 6 165 33.6 0.631 0
## 561 1 99 25.4 0.551 0
## 562 10 68 35.5 0.285 0
## 563 8 91 35.6 0.587 0
## 564 6 195 30.9 0.328 1
## 565 9 156 24.8 0.230 1
## 566 0 93 35.3 0.263 0
## 567 3 121 36.0 0.127 1
## 568 2 101 24.2 0.614 0
## 569 2 56 24.2 0.332 0
## 570 0 162 49.6 0.364 1
## 571 0 95 44.6 0.366 0
## 572 4 125 32.3 0.536 1
## 573 2 129 33.2 0.591 0
## 574 3 130 23.1 0.314 0
## 575 1 107 28.3 0.181 0
## 576 1 140 24.1 0.828 0
## 577 1 144 46.1 0.335 1
## 578 8 107 24.6 0.856 0
## 579 2 121 39.1 0.886 0
## 580 7 129 38.5 0.439 1
## 581 2 90 23.5 0.191 0
## 582 3 169 29.9 0.268 1
## 583 4 127 34.5 0.598 0
## 584 4 118 44.5 0.904 0
## 585 2 122 35.9 0.483 0
## 586 6 125 27.6 0.565 1
## 587 1 168 35.0 0.905 1
## 588 4 110 28.4 0.118 0
## 589 6 80 39.8 0.177 0
## 590 9 164 32.8 0.148 1
## 591 2 93 38.0 0.674 1
## 592 5 126 29.6 0.439 0
## 593 10 129 41.2 0.441 1
## 594 0 134 26.4 0.352 0
## 595 3 102 29.5 0.121 0
## 596 3 173 33.8 0.970 1
## 597 10 94 23.1 0.595 0
## 598 1 108 35.5 0.415 0
## 599 5 97 35.6 0.378 1
## 600 4 83 29.3 0.317 0
## 601 1 114 38.1 0.289 0
## 602 1 149 29.3 0.349 1
## 603 5 117 39.1 0.251 0
## 604 1 111 32.8 0.265 0
## 605 4 112 39.4 0.236 0
## 606 1 116 36.1 0.496 0
## 607 0 141 32.4 0.433 0
## 608 2 175 22.9 0.326 0
## 609 2 92 30.1 0.141 0
## 610 3 130 28.4 0.323 1
## 611 8 120 28.4 0.259 1
## 612 2 174 44.5 0.646 1
## 613 2 106 29.0 0.426 0
## 614 2 105 23.3 0.560 0
## 615 4 95 35.4 0.284 0
## 616 0 126 27.4 0.515 0
## 617 8 65 32.0 0.600 0
## 618 2 99 36.6 0.453 0
## 619 1 102 39.5 0.293 1
## 620 11 120 42.3 0.785 1
## 621 3 102 30.8 0.400 0
## 622 1 109 28.5 0.219 0
## 623 9 140 32.7 0.734 1
## 624 13 153 40.6 1.174 0
## 625 12 100 30.0 0.488 0
## 626 1 147 49.3 0.358 1
## 627 1 81 46.3 1.096 0
## 628 3 187 36.4 0.408 1
## 629 6 162 24.3 0.178 1
## 630 4 136 31.2 1.182 1
## 631 1 121 39.0 0.261 0
## 632 3 108 26.0 0.223 0
## 633 8 154 32.4 0.443 1
## 634 1 128 36.5 1.057 1
## 635 7 137 32.0 0.391 0
## 636 0 123 36.3 0.258 1
## 637 1 106 37.5 0.197 0
## 638 6 190 35.5 0.278 1
## 639 2 88 28.4 0.766 0
## 640 9 170 44.0 0.403 1
## 641 9 89 22.5 0.142 0
## 642 10 101 32.9 0.171 0
## 643 2 122 36.8 0.340 0
## 644 5 121 26.2 0.245 0
## 645 1 126 30.1 0.349 1
## 646 1 93 30.4 0.315 0library(caTools)
split <- sample.split(data2, SplitRatio = 0.8)
training2 <- subset(data2, split == "TRUE")
testing2 <- subset(data2, split == "FALSE")model2 <- glm(Outcome~.,training2,family="binomial")
summary(model2)##
## Call:
## glm(formula = Outcome ~ ., family = "binomial", data = training2)
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) -8.811044 0.856995 -10.281 < 2e-16 ***
## Pregnancies 0.108369 0.033854 3.201 0.00137 **
## Glucose 0.036667 0.004396 8.341 < 2e-16 ***
## BMI 0.075098 0.018456 4.069 4.72e-05 ***
## DiabetesPedigreeFunction 1.436324 0.443199 3.241 0.00119 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for binomial family taken to be 1)
##
## Null deviance: 647.52 on 516 degrees of freedom
## Residual deviance: 486.69 on 512 degrees of freedom
## AIC: 496.69
##
## Number of Fisher Scoring iterations: 5res <- predict(model2,testing2,type="response")
table(Actualvalue=testing2$Outcome, predictedvalue=res>0.5)## predictedvalue
## Actualvalue FALSE TRUE
## 0 86 6
## 1 13 24(86+24)/(86+6+13+24)## [1] 0.8527132model2$coefficients## (Intercept) Pregnancies Glucose
## -8.81104374 0.10836949 0.03666696
## BMI DiabetesPedigreeFunction
## 0.07509798 1.43632412prediksi <- predict(model2,data,type="response")
head(prediksi)## 1 2 3 4 5 6
## 0.66591139 0.04376259 0.81471729 0.04355513 0.14128964 0.05013184exp(coef(model2))## (Intercept) Pregnancies Glucose
## 0.0001490776 1.1144594484 1.0373474840
## BMI DiabetesPedigreeFunction
## 1.0779897637 4.2052095115