naomispence

library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
options(scipen = 999)
data(wave5addhealth)

wave5addhealth<-wave5addhealth[wave5addhealth$H5TO6<97,]

naomispence

library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
options(scipen = 999)
data(wave5addhealth)

naomispence

#Lab Report 5: Making and Comparing Confidence Intervals
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
data(gss123)
options(scipen = 999)

naomispence

##Comparing CIs and distributions

#Load the libraries and data first
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
data(gss123)

naomispence

#START BY LOADING LIBRARIES AND OPTIONS
library(aws.s3)
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
options(scipen = 999)

naomispence

#Lab: Scatterplots and Regression

#Load the libraries and data first
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
data(gss123)

naomispence

#Lab: Scatterplots and Regression

#Load the libraries and data first
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')

naomispence

################################BIVARIATE INFERENTIAL STATISTICS##############################################################

####ANOVA for a quantitative dependent variable (DV) and categorical independent variable (IV)
#run an analysis of variance (ANOVA); only change variable names and put in this order DV ~ IV
#IMPORTANT: USE THE COPY OF YOUR CATEGORICAL VARIABLE THAT YOU USED FOR THE BAR GRAPH (variable name ends in cat)
data.aov1 <- aov(wave5addhealth$H5ID23 ~ wave5addhealth$H5HR2cat, data=wave5addhealth)
summary(data.aov1)
#remove hashtag on line below to run Tukey ONLY if the F test is statistically significant AND there are more than 2 categories on the IV.
#TukeyHSD(data.aov1)

naomispence

#START BY LOADING LIBRARIES AND OPTIONS
library(aws.s3)
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
options(scipen = 999)

naomispence

#START BY LOADING LIBRARIES AND OPTIONS
library(aws.s3)
library(ggplot2)
library(dplyr)
library(lsr)
library(descr)
library(Hmisc)
library('lehmansociology')
options(scipen = 999)