# NOT RUN {
data(Blink)
# Visualizing two "outliers"
with(Blink,plot(paired(Straight,Oscillating),type="profile"))
# Interestingly, the differences for the two outliers are quite "normal"
# so their influence on the t test is negligible
with(Blink,qqnorm(Straight-Oscillating))
with(Blink,qqline(Straight-Oscillating))
# }
Run the code above in your browser using DataLab