导入相关包
library(xlsx) ## 打开excel文件
library(ggplot2)
加载数据
source <- read.xlsx(file="exercise1-4.xlsx", 1, header=TRUE, encoding="UTF-8")
summary(source)
省.直辖市.自治区 X11月 X1.11月
安徽 : 1 Min. : 0.770 Min. : 6.08
北京 : 1 1st Qu.: 8.265 1st Qu.: 105.35
福建 : 1 Median :14.770 Median : 179.41
甘肃 : 1 Mean :19.166 Mean : 246.19
广东 : 1 3rd Qu.:20.080 3rd Qu.: 270.75
广西 : 1 Max. :99.320 Max. :1080.26
(Other):25
head(source)
A data.frame: 6 × 3
|
省.直辖市.自治区 |
X11月 |
X1.11月 |
|
<fct> |
<dbl> |
<dbl> |
1 |
北京 |
35.22 |
499.80 |
2 |
天津 |
10.41 |
161.37 |
3 |
河北 |
17.22 |
273.29 |
4 |
山西 |
10.70 |
134.79 |
5 |
内蒙古 |
10.29 |
90.92 |
6 |
辽宁 |
18.66 |
348.99 |
(1)均值、方差、标准差、变异系数、偏度、峰度