- 1、本文档共44页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
中国人民大学硕士研究生系列教材.doc
PAGE
PAGE 44
HYPERLINK / 《应用多元统计分析》数据与有关程序下载
第2章
例2.3表2-1是五大钢铁公司反映经营状况的十大指标,为了比较国内钢铁公司与韩国蒲项钢铁公司的差距,下面做出韩国蒲项钢铁公司、宝钢、鞍钢、武钢、首钢五家钢铁公司的脸谱图。
表2-1
项目宝钢鞍钢武钢首钢浦项负债保障率2.892.952.341.853.12长期负债倍数5.169.156.072.636.96流动比率1.311.831.162.222.1资产利润率21.7117.3424.7711.8925.34收入利润率23.1711.3319.557.622.28成本费用利润率30.2312.7624.818.0528.52净利润现金比率1.790.91.71.091.3三年资产平均增长率1.487.2863.311.7613.18三年销售平均增长率20.0729.1952.8818.7724.16三年平均资本增长率11.0410.548.957.6317.51例2.4资料仍取我国35个上市公司的资料。常见的EXCEL就可画出很漂亮的雷达图。用EXCEL画雷达图的方法,比如仅对深能源和深南电两公司画雷达图,方法如下:
在EXCEL窗口中,输入资料格式如下:
公司简称净资产收益率%总资产报酬率%资产负债率%总资产周转率流动资产周转率已获利息倍数销售增长率%资本积累率%深能源A16.8512.35 42.32 0.37 1.78 7.18 45.73 54.54 深南电A2215.30 46.51 0.76 1.77 15.67 48.11 19.41 例 2.7 考察2007年东、中、西部及东北地区城镇居民家庭平均每人全年购买的主要商品数量情况,选取以下八个指标,具体数据如下表。(数据摘自2007年中国统计年鉴)
项 目东部地区中部地区西部地区东北地区 鲜 菜 (千克)109.61127.17118.87125.74 食用植物油 (千克)8.7110.509.7310.93 猪 肉 (千克)18.5117.5320.4414.19 牛 羊 肉 (千克)3.362.755.206.12 鲜 蛋 (千克)10.9110.297.6513.53 鲜 奶 (千克)19.1914.3418.7417.85 水 果 (瓜果) (千克)61.0258.8153.2168.05 煤 炭 (千克)29.7380.6360.3547.46附:MATLAB做星座图的程序
%每一行为一个样本,行数目代表样本数,列数目代表维数
X=[109.61 8.71 18.51 3.36 10.91 19.19 61.02 29.73
127.17 10.5 17.53 2.75 10.29 14.34 58.81 80.63
118.87 9.73 20.44 5.2 7.65 18.74 53.21 60.35
125.74 10.93 14.19 6.12 13.53 17.85 68.05 47.46];
[row,col]=size(X);
%1 将数据变换为角度
Xmin=min(X); %1 * col
Xmax=max(X); %1 * col
Sita=(X-ones(row,1)*Xmin)./(ones(row,1)*Xmax-ones(row,1)*Xmin)*pi;
%2 适当的选取权重
w=1/col;
%3 每一点的路径
Xi=cos(Sita);
Yi=sin(Sita);
Uk=w*cumsum(Xi,2);
Vk=w*cumsum(Yi,2);
%4 画一个半径为1的上半圆
i=[0:pi/100:pi];
hold on;
plot(cos(i),sin(i));
hold on;
plot([-1:1/100:1],0*[-1:1/100:1]);
%5 画星座图
for i=1:row
hold on;
plot(Uk(i,:),Vk(i,:),.-);
hold on;
plot(Uk(i,col),Vk(i,col),*
文档评论(0)