Skip to content

Instantly share code, notes, and snippets.

@Harshit1694 Harshit1694/Z_score.R
Last active Jul 15, 2019

Embed
What would you like to do?
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
You can’t perform that action at this time.