Publications by J Kyle Armstrong, PhD
Philadelphia Phillies - Estimate On Base Percentage for 2021 Given Previous Seasons
Philadelphia Phillies - Estimate On Base Percentage for 2021 Given Previous Seasons ARIMA time series Author J Kyle Armstrong, PhD Published May 8, 2023 Load, review and transform the data Our first step will be to take a brief look at the data: Name playerid birth_date PA_21 OBP_21 PA_20 OBP_20 PA_19 OBP_19 PA_18 OBP_18 PA_17 OBP_17 PA_16 O...
3230 sym 8 img 6 tbl
Principal Component Analysis
1 Take a quick look at the dataset library(tidyverse) ## -- Attaching packages ----------------------------------------------------------------------------------------- tidyverse 1.3.0 -- ## v ggplot2 3.3.0 v purrr 0.3.3 ## v tibble 2.1.3 v dplyr 0.8.5 ## v tidyr 1.0.2 v stringr 1.4.0 ## v readr 1.3.1 v forcats 0.5.0 #...
1883 sym R (4515 sym/26 pcs) 4 img
RandomForest with caret
\(~\) \(~\) \(~\) 1 Read in the Data library('tidyverse') ## -- Attaching packages ----------------------------------------------------------------------------------------- tidyverse 1.3.0 -- ## v ggplot2 3.3.0 v purrr 0.3.3 ## v tibble 2.1.3 v dplyr 0.8.5 ## v tidyr 1.0.2 v stringr 1.4.0 ## v readr 1.3.1 v forcats 0....
1419 sym R (44208 sym/61 pcs) 5 img
Random Forest Imputation and Multi-class Classifier
\(~\) \(~\) 1 NHANES data library('tidyverse') ## -- Attaching packages ------------------------------------------------------------------ tidyverse 1.3.0 -- ## v ggplot2 3.3.0 v purrr 0.3.3 ## v tibble 2.1.3 v dplyr 0.8.5 ## v tidyr 1.0.2 v stringr 1.4.0 ## v readr 1.3.1 v forcats 0.5.0 ## -- Conflicts --------------...
530 sym R (9160 sym/42 pcs) 4 img
Week_4_1
1 Load data on the height and weight of school children library(dplyr) ## ## Attaching package: 'dplyr' ## The following objects are masked from 'package:stats': ## ## filter, lag ## The following objects are masked from 'package:base': ## ## intersect, setdiff, setequal, union library(ggplot2) library(gcookbook) library(viridis...
737 sym R (8635 sym/52 pcs) 15 img
Linear_Model_Ridge_LASSO
Use the built-in R dataset, “diamonds”, using “price” as our outcome variable and all other features in the dataset as “predictors” or features. install_if_not <- function( list.of.packages ) { new.packages <- list.of.packages[!(list.of.packages %in% installed.packages()[,"Package"])] if(length(new.packages)) { install.package...
895 sym R (23495 sym/41 pcs) 3 img 1 tbl
Logistic Regression with caret
\(~\) \(~\) \(~\) \(~\) 1 Install if not Function install_if_not <- function( list.of.packages ) { new.packages <- list.of.packages[!(list.of.packages %in% installed.packages()[,"Package"])] if(length(new.packages)) { install.packages(new.packages) } else { print(paste0("the package '", list.of.packages , "' is already installed")) } } i...
317 sym R (18675 sym/62 pcs) 5 img
Naïve Bayes
\(~\) \(~\) \(~\) 1 Read in the Data diab_pop <- readRDS('C:/Users/jkyle/Documents/GitHub/Intro_Jeff_Data_Science/DATA/diab_pop.RDS') \(~\) \(~\) \(~\) \(~\) 1.1 Reminders 1.1.1 The Data #### Variable in Data - Definition - Data Type ##### seqn - Respondent sequence number - Identifier ##### riagendr - Gender - Categorical ##### ridageyr -...
328 sym R (6453 sym/29 pcs)
knn with caret
\(~\) \(~\) \(~\) 1 Read in the Data diab_pop <- readRDS('C:/Users/jkyle/Documents/GitHub/Intro_Jeff_Data_Science/DATA/diab_pop.RDS') \(~\) \(~\) 1.1 Reminders 1.1.1 The Data #### Variable in Data - Definition - Data Type ##### seqn - Respondent sequence number - Identifier ##### riagendr - Gender - Categorical ##### ridageyr - Age in year...
447 sym R (12430 sym/36 pcs) 3 img
k-Nearest Neighbors
\(~\) \(~\) \(~\) 1 Read in the Data diab_pop <- readRDS('C:/Users/jkyle/Documents/GitHub/Intro_Jeff_Data_Science/DATA/diab_pop.RDS') \(~\) \(~\) 1.1 Reminders 1.1.1 The Data #### Variable in Data - Definition - Data Type ##### seqn - Respondent sequence number - Identifier ##### riagendr - Gender - Categorical ##### ridageyr - Age in year...
734 sym R (60524 sym/44 pcs)