data <- read.csv("C:\\Users\\mike1\\Desktop\\data\\zhanglijia\\dataexperiment2.csv",header=F,sep=',') data1 <- data[,1] res <- (data1 - mean(data1))/sd(data1) #計算標准差,結果是一個dataframe mean(res) #計算均值 min(res) #計算最小值 max(res) #計算最大值 mean(data1) min(data1) max(data1) summary(res) #原來summary 可以計算數據的描述性統計
比較方便的是summary()函數