The dataset values on the y-axis are plotted against the normal scores
-0.97 -0.43 0.00 0.43 0.97.

# Suppose that the nbs-10.txt file is in c:/it223.
setwd("c:/it223")
df <- read.csv("nbs-10.txt", header=TRUE)
w <- df$Thickness
qqnorm(w, datax=TRUE)
