# CO Example -- co.R source code.

# Enter and print data.
x <- c(58, 63, 48, 52, 68)
print("Carbon monoxide readings:")
print(x)

# Perform one-sample t-test.
ttest <- t.test(x, y=NULL, alternative="two.sided", mu=50, paired=FALSE, conf.level=0.95)
print(ttest)