Skip to content

Instantly share code, notes, and snippets.

@Harshit1694
Last active July 15, 2019 12:10
Show Gist options
  • Save Harshit1694/06d344fc662d789d5c512b6cc5051f5c to your computer and use it in GitHub Desktop.
Save Harshit1694/06d344fc662d789d5c512b6cc5051f5c to your computer and use it in GitHub Desktop.
data <- read.csv(file.choose())
#POPULATION PARAMETERS
pop_sd <- sd(data$Screen_size.in.cm.)*sqrt((length(data$Screen_size.in.cm.)-1)/(length(data$Screen_size.in.cm.)))
pop_mean <- mean(data$Screen_size.in.cm.)
z <- (9.5 - pop_mean) / pop_sd
z
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment