R/Exam2.R

In rgamble819/MATH4753ouGamb0004: Functions for my statistics class

# For confidence interval of unknown mean and var
y = c(2,2,3,5)
y
# Point estimate
ybar = sum(y)/length(y)
var = var(y)/length(y)

t.test(y)

t.test(y, conf.level = 0.8)

t.test(y, conf.level = 0.95, var=1.2)


# a)

#b E(L)

2+1-3


4*3+3+9*3

2*0-1

4*(42)

mean.test