# ExamSco2 Example -- examsco2.R source code. # Load ExamSco dataset into R. examsco = read.table("examsco2.txt", header=TRUE) # Print dataset stored as a list. print("examsco table:") print(examsco) # Compute and print exam average. examave = (examsco$midterm + examsco$final) / 2 print(examave) # Print descriptive statistics for examave. print("mean:") print(mean(examave)) print("sd:") print(sd(examave)) print("min:") print(min(examave)) print("max:") print(max(examave))