setwd('D:\\data') #更改工作目录
list.files() #列出当前工作目录下的文件
dat=read.csv(file="Gary.csv",header=TRUE) #读取"Gary.csv文件"
#table(cut(data,breaks = break2)) #对分布直方图横坐标进行切割
hist(dat[,7],freq = FALSE,breaks = c(0,60,70,80,90,100),col="red",main="频率分布直方图",xlab="成绩")