Publications by Adolph J Delgado M.Ed.
Logistic Regression as a Predictive Model Classification methods and models
#load libraries library(car, quietly = T) library(stargazer, quietly = T) ## ## Please cite as: ## Hlavac, Marek (2018). stargazer: Well-Formatted Regression and Summary Statistics Tables. ## R package version 5.2.2. https://CRAN.R-project.org/package=stargazer library(survey, quietly = T) ## ## Attaching package: 'survey' ## The followin...
2036 sym R (19141 sym/99 pcs) 6 img 1 tbl
Maps and calculations of the differences between the two years, including the test for significance of the differences for Dallas County, Texas & Bexar County, Texas.
library(tidycensus) library(tidyverse) ## -- Attaching packages --------------------------------------- tidyverse 1.3.0 -- ## v ggplot2 3.3.3 v purrr 0.3.4 ## v tibble 3.0.5 v dplyr 1.0.4 ## v tidyr 1.1.2 v stringr 1.4.0 ## v readr 1.4.0 v forcats 0.5.0 ## -- Conflicts ------------------------------------------ tidyve...
104 sym R (24497 sym/76 pcs) 22 img
BRFSS 2019
Research question: Do growing up with a problem drinker or alcoholic or growing up with anyone who was depressed, mentally ill, or suicidal predict the mental health days by gender? library(car) ## Loading required package: carData library(stargazer) ## ## Please cite as: ## Hlavac, Marek (2018). stargazer: Well-Formatted Regression and Summar...
1035 sym R (9860 sym/51 pcs) 4 img 6 tbl
Homework 2
library(haven) Data<-read_xpt("C:/Users/adolp/Desktop/Statistics 2/BRFSS/LLCP2019.XPT") head(Data, n=10) ## # A tibble: 10 x 342 ## `_STATE` FMONTH IDATE IMONTH IDAY IYEAR DISPCODE SEQNO `_PSU` CTELENM1 ## <dbl> <dbl> <chr> <chr> <chr> <chr> <dbl> <chr> <dbl> <dbl> ## 1 1 1 0118~ 01 18 2019 1100 201...
1083 sym R (4465 sym/17 pcs)
Homework 2
{r cars} library(haven) Data<-read_xpt("C:/Users/adolp/Desktop/Statistics 2/BRFSS/LLCP2019.XPT") head(Data, n=10) SubData<-names(Data) newnames<-tolower(gsub(pattern = "_",replacement = "",x = SubData)) names(Data)<-newnames library(car) Data$Alc<-Recode(Data$acedrink, recodes ="7:9=NA; 1=1;2=0") Data$Alc<-Recode(Data$Alc, recodes ="7:9=NA...
1141 sym R (870 sym/3 pcs)
Homework 2 using R instead of GIS
library(tidycensus) library(tidyverse) ## -- Attaching packages --------------------------------------- tidyverse 1.3.0 -- ## v ggplot2 3.3.3 v purrr 0.3.4 ## v tibble 3.0.5 v dplyr 1.0.4 ## v tidyr 1.1.2 v stringr 1.4.0 ## v readr 1.4.0 v forcats 0.5.0 ## -- Conflicts ------------------------------------------ tidyve...
383 sym R (21901 sym/31 pcs) 2 img
Imputation
library(car) library(mice) library(ggplot2) library(haven) library(readr) BRFSS19<-read_xpt("C:/Users/adolp/Desktop/Statistics 2/BRFSS/LLCP2019.XPT") set.seed(1234) samp<-sample(1:dim(BRFSS19)[1], size = 20000) #smaller sample for brevity BRFSS19<-BRFSS19[samp,] #Fix BRFSS names nams<-names(BRFSS19) head(BRFSS19, n=10) ## # A tibble: 10 ...
1139 sym R (40927 sym/139 pcs) 17 img
PCA
#Load packages library(car) ## Loading required package: carData library(stargazer) ## ## Please cite as: ## Hlavac, Marek (2018). stargazer: Well-Formatted Regression and Summary Statistics Tables. ## R package version 5.2.2. https://CRAN.R-project.org/package=stargazer library(survey) ## Loading required package: grid ## Loading required p...
978 sym R (10614 sym/48 pcs) 5 img