-
Notifications
You must be signed in to change notification settings - Fork 0
/
part4_.Rmd
76 lines (44 loc) · 1.25 KB
/
part4_.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
---
title: "Part4_BestModels"
author: "Sharika Loganathan"
date: "2022-12-13"
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
## R Markdown
This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see <http://rmarkdown.rstudio.com>.
When you click the **Knit** button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:
## Load packages
```{r}
library(tidyverse)
library(caret)
```
##Most important variables
### Load Best Models
For regression problem SVM seems to perform the best
```{r}
reg_best_model <- readr::read_rds('reg_best_model.rds')
cls_best_model <- readr::read_rds('cls_best_model.rds')
```
### Regression
### Important Varibles
```{r}
plot(varImp(reg_best_model), top=20)
```
### Classification
### Most important variables
```{r}
plot(varImp(cls_best_model), top = 20)
```
```{r}
reg_best_model <- readr::read_rds('reg_best_model.rds')
cls_best_model <- readr::read_rds('cls_best_model.rds')
```
```{r}
plot(cls_best_model)
```
```{r}
plot(reg_best_model)
```