区域城市现代化水平分析

一、实验任务

请采用均值条图、箱线图、星相图来对江苏省13市的区域城市现代化水平进行分析，数据如表1所示。

1. 请用均值图表示江苏省的区域城市现代化水平情况
2. 请用箱线图表示江苏省的关于城市现代化水平的各项指标
3. 请用星象图表示江苏省13市各自的区域城市现代化水平

表1 江苏省13市区域城市现代化水平

	特征1	特征2	特征3	特征4	特征5	特征6	特征7	特征8	特征9	特征10
南京	57491	59.539	76828.8	91.51	714.911	8.7661	13.1707	187.396	388.1707	93.7
无锡	60801	46.6122	177507	100	4347.83	8.7913	102.831	274.062	638.6522	96.8
徐州	45284	43.5373	53668.5	87.9	993.304	18.5633	13.1585	42.4107	196.5402	96.7
常州	13284	42.2196	15068.5	72.34	319.595	4.7689	0.93792	50.4039	103.1505	96.6
苏州	41266	36.4228	66542	78.39	205.935	3.0878	4.55315	60.6522	210.1388	96.1
南通	21124	44.4195	20124.6	49.76	51.32	1.1052	2.42531	23.1507	225.554	80
连云港	17157	47.954	17191.1	32.47	23.36	0.7152	2.37522	27.5387	186.5749	84.8
淮安	19579	36.0859	19983.7	41.63	52.0494	1.1121	3.02537	10.0846	299.2843	71.5
盐城	28930	34.099	29234.7	55.01	800	2.2445	4.63003	45.1559	249.4103	95.6
扬州	12278	36.0667	9040.29	51.88	464.466	0.5824	2.51819	41.032	175.1539	61
镇江	33263	42.4345	104333	73	1096.3	13.6586	3.16933	398.674	361.0625	92.1
泰州	36207	35.2204	51488.4	74.3	3499.5	3.9883	5.15552	41.4785	237.1822	95.1
宿迁	26908	42.724	21950.2	56.78	243.593	3.0759	3.893	39.6025	208.7723	92.1

二、实验步骤

1.读取表格

library(openxlsx)

read.xlsx('D:\\R\\Rstudio\\idea.xlsx')

2.数据读取

X=read.xlsx('D:\\R\\Rstudio\\idea.xlsx',rowNames=TRUE);X

一．用均值图表示江苏省的区域城市现代化水平情况

1.按行做均值图，并且修改横坐标位置

barplot(apply(X,1,mean))

barplot(apply(X,1,mean),las=3) #均值图

2.按列做均值图条形

barplot(apply(X,2,mean))

3.按列做彩色均值图条形图

barplot(apply(X,2,mean),col=1:8)

4. 按列做中位数条形图

barplot(apply(X,2,median))

5. 按列做均值饼图

pie(apply(X,1,mean))

二．用箱线图表示江苏省的关于城市现代化水平的各项指标

1.按列做垂直箱线图

boxplot(X)

2. 水平箱线图

boxplot(X,horizontal=T)

三．用星象图表示江苏省13市各自的区域城市现代化水平

1.简单星象图

stars(X)

2.带图例的星象图

stars(X,key.loc=c(12,7))

3.带图例度彩色星象图

stars(X,key.loc=c(12,7),

draw.segments=T) 

三、实验总结   

通过这次实验，我学会了用r语言对表格数据进行绘图，如均值图，箱线图以及星象图，知道了library为读取数据不可或缺的库，并且对每个图形都有了很深入的了解，知道了他们的样子。但是也有些问题，比如在写带图例的星象图时，有一个图显示的很靠右边，实验多次才发现，原来时比例的问题，调整过来就好了。

四、心得体会

通过这次实验，我再一次更加深入了解到r语言绘图的神奇，也更加觉得r语言和python有的地方还真的蛮像的，今后学习r语言的过程中，我更应该努力，将r语言学懂学会。