# Diagnostics Example -- diagnostics.r source code.

cpu = read.table("cpu.txt", header=T)
model = lm(CpuTime ~ LinesOut + Steps + MountedDevices, data=cpu)
print(summary(model))

pdf("diagnostics.pdf")
plot(model, which=1:6)
dev.off( )