怎样学习 R 绘图( 十 )
2.5，点图\u0026gt; example2_3_1 \u0026lt;- read.csv(\u0026#39;/Users/MLS/desktop/rs/stt/example/ch2/231.csv\u0026#39;\u0026gt; par(mfcol=c(1,1), cex=0.7, family=\u0026#39;SimSun\u0026#39;)\u0026gt; dotchart(example2_3_1$射击环数, groups=example2_3_1$运动员, xlab="射击环数", pch=20)
\u0026gt; par(mfcol=c(1,1), cex=0.7, family=\u0026#39;SimSun\u0026#39;)\u0026gt; dotplot(射击环数~运动员, data=https://www.zhihu.com/api/v4/questions/23566221/example2_3_1, col="black", pch=9, family=\u0026#39;SimSun\u0026#39;)
2.6，核密度图\u0026gt; par(cex=0.7, family=\u0026#39;SimSun\u0026#39;)\u0026gt; densityplot(~射击环数|运动员, data=https://www.zhihu.com/api/v4/questions/23566221/example2_3_1,col="blue",cex=0.5, family=\u0026#39;SimSun\u0026#39;)
三，展示【数据关系】的图表3.1，散点图\u0026gt; x\u0026lt;-seq(0,25,length=100)\u0026gt; y\u0026lt;-4+0.5*x+rnorm(100,0,2)\u0026gt; d\u0026lt;-data.frame(x,y)\u0026gt; plot(d)\u0026gt; polygon(d, col=\u0026#39;pink\u0026#39;, lty=3,lwd=2)\u0026gt; points(d)\u0026gt; abline(lm(y~x),lwd=2,col=4)\u0026gt; abline(v=mean(x),h=mean(y),lty=2,col="gray70")
3.2，矩阵散点图example2_4\u0026lt;-read.csv(\u0026#39;/Users/MLS/desktop/rs/stt/example/ch2/22_4.csv\u0026#39;)\u0026gt; par(cex=0.7, family=\u0026#39;SimSun\u0026#39;)\u0026gt; plot(example2_4, cex=0.6, gap=0.5, family="SimSun")
3.3，气泡图\u0026gt; attach(example2_4)\u0026gt; r\u0026lt;-sqrt(销售收入/pi)\u0026gt; symbols(广告费用,销售网点数,circle=r, inches=0.3, fg="white", bg="lightblue",ylab="销售网点数", xlab=" 广告费用")\u0026gt; text(广告费用,销售网点数, rownames(example2_4),cex=0.4)
四，展示【数据相似性】的图表4.1，轮廓图\u0026gt; example2_5\u0026lt;-read.csv(\u0026#39;/Users/MLS/desktop/rs/stt/example/ch2/22_5.csv\u0026#39;)\u0026gt; par(mai=c(0.7,0.7,0.1,0.1),cex=0.8, family="SimSun")\u0026gt; matplot(t(example2_5),type=\u0026#39;b\u0026#39;,lty=1:7,col=1:7,xlab="消费项目",ylab="支出金额",pch=1,xaxt=\u0026#39;n\u0026#39;)\u0026gt; axis(side=1, at=1:8, labels=c("食品","衣着","居住","家电设备用品及服务","医疗保健", "交通和通信", "教育文化娱乐服务","其他商品和服务"),cex.axis=0.6) "高收入户", "最高收入户"))\u0026gt; legend(x="topright", legend=c("最低收入户", "低收入户","中等偏下户", "中等收入户", "中等偏上户", "高收入户", "最高收入户"), lty=1:7, col=1:7, text.width=1, cex=0.7)
推荐阅读
![项目|[公司]ST尤夫：天花膜项目第一条生产线内外贸订单量饱和](/renwen/images/defaultpic.gif)
- 聪明人养花，这3种“花”怎样也要养一盆，每年能省不少医药费
- 互联网怎样解决“家政服务上门速度慢”的问题
- 怎样看待从1月8号起，QQ钱包开始提现收费
- 银行it人怎样转型
- 汽车|冬天怎样让车内温度快速升高？座椅加热的最佳使用方式二，外循环的作用总结
- 怎样进入通信行业
- 怎样评价扶他柠檬茶的小说《云养汉》的结尾
- 怎样成为一名合格的Python程序员?
- 怎样评价华为、诺基亚、中兴中标中国移动高端路由交换设备扩容集采
- 怎样评价类似前橙会、百老汇、南极圈这样类型的离职帮抱团，对企业的积极意义和消极意义