我最近开了一个知识星球,美名其曰【数据小兵成长计划】,每周或每月发布具体的学习计划,在星球内立帖为证,以学习成果为标志结束计划,学习过程如果遇到疑问,可以在星球内提问寻求帮助,直到完成。
我把它称之为【逼迫学习模式】。
有星友问我,进入星球后要干什么?我告诉ta现在什么也不用做,先看着,看别人如何逼迫自己完成当下的学习计划,不敢说每天进步一点点,但一周内学习一个知识点应该没什么问题,至于未来你要成长到什么高度,未来再说,我们先做好当下的学习任务。
以下是我的第2个学习计划以及完成情况。
学习计划 MyPlan2
主题:学习使用R语言完成常见多维尺度分析;
时间:5.19-5.26周内完成。
完成计划 MyPlan2
用一个最经典的MDS案例来提交学习任务。已知美国10个城市两两之间的飞行距离,现在要用一张空间感知图来模拟10个城市的相对地理位置。
用stats包中cmdscale函数执行度量型MDS
mds1
此时我们得到10个城市在二维空间的坐标点,开始制作散点图
plot(mds1,type = 'n')
给散点图添加文字标签
text(mds1[,1], mds1[,2],rownames(mds1), cex = 1)
发现城市坐标的分布方向相反了,调整坐标方向,便于阅读
plot(-mds1[,1],-mds1[,2],type = 'n') text(-mds1[,1], -mds1[,2],rownames(mds1), cex