R期末实验--因子分析+聚类分析

实验要求

来了来了，祝大家圣诞快乐呀！！不止圣诞！！！每天都快乐！！！今天我一定要吃肉，一定要吃很多肉，我真的超级无敌的想吃肉，完成今天的任务就去吃肉！！！！

探究2013年全国31个地区城市市政设施状况。原数据中体现各地区城市市政设施的变量有6个。（提交的文档包含各统计方法的完整R软件实现代码、运行结果截图、表格、文字描述、分析总结等）
（1）反映城市市政设施状况主要体现在三个综合方面：“城市桥涵设施条件”，“城市排水条件”，“城市市政照明条件”，请计算出这三个综合方面的具体得分，并分析指出每个得分对应哪个条件；
（2）分析以上几个综合条件，为了探究城市市政设施状况与各地区经济是否有明显关系，将城市市政设施状况划分成4个等级“市政设施状况好”、“市政设施状况较好”、“市政设施状况一般”、“市政设施状况较差”，按照这个等级给出分类表格；
（3）现有一城市市政设备数据为(7123,97680,892,1076,332,451），判断该城市的市政设施状况在什么样的水平（保证用于判断的这个模型正确度足够大）。

实验数据

实验解答

第一步：读取数据

将实验中的数据存放在名为data.csv的表格中

data=read.csv("data.csv文件存放路径",header=T)
data

第二步： 计算得分

step1：取对应的数据

t=data[,2:7]
t

step2：数据标准化

t=scale(t)
t