2017.11.15 发布了问题：R2-26-第二期-

R2_1 <- read.table(file ="data/R2-2.1.csv", sep = ",", header = TRUE)library(

2017.11.02 发布了问题：R2-26-第一期-

hw2.1 <- read.table(file ="data/R2-1-1.csv", sep = ",", header = TRUE)hw2.2 &

2017.10.17 发布了问题：第二期R39-Leo

hw1 <- read.csv(file = "homework1.csv", header = TRUE, sep = ",")plot(hw1, xl