> x1<-c(10,15,68,97,26,58,42)
#求均值
> mean(x1)
[1] 45.14286
#求标准差
> sd(x1)
[1] 31.34979
> x2<-c(21,34,42,21,56,32,89)
#散点图
> plot(x1,x2)
#直方图
> hist(x1)
> x1<-c(10,15,68,97,26,58,42)
#求均值
> mean(x1)
[1] 45.14286
#求标准差
> sd(x1)
[1] 31.34979
> x2<-c(21,34,42,21,56,32,89)
#散点图
> plot(x1,x2)
#直方图
> hist(x1)