两分钟站在数据可视化前沿！让导师审阅论文不要那么累了！

Posted 2021-04-28 周结论工作室

 

数据可视化（Data Visualization），

就是让论文读（dao）者（shi）大脑充分调动起来，

更快捷高效地接收到所有论文的信息，

（变attentive visual processing到pre-attentive visual processing）

就是一次为批阅论文的导师们的一场大脑的尊贵SPA~

SPA做起来当然很舒服,

可是数据可视化的SPA技师们往往做得想狗带（……）

那么，数据可视化的奥义到底在哪里？

那么，你必须知道这三大原则：

突出数据！这是论文的灵魂！

减少混乱！这是论文的美学！

结合文本！这是论文的躯干！

 

话不多说！

拿起小本本，补课补课！

上例子了！

1.折线图的SPA笔记

 

先看反面教材一则：

 

这冗杂混合的信息量，

这浓浓的80年代学术风，

这蚯蚓一般粗壮的X轴，

这令人迷惘的AO、NC，

让人宛若梦回1988，

在舞厅跳一曲酒醉的普通disco！

总之，

三大原则，一一避开

 

现在，让数据可视化回到2018吧。

简约，重点突出、信息明确

1.简洁的坐标体系

2. 合并为一的表格标题

3.扩展不知所云的简写

 

好了，经过回炉重造，图表会变成什么样呢？

登登！

 

是不是感觉专业、清爽了很多？

 

为了让大家也可以绘制这样的图，

小周周无私奉上了自编的Stata code

代码如下：

sysuseuslifeexp, clear

line le_wmaleyear,lwidth(medium) saving(wmale)ysca(lcolor(gs13)lpattern(solid))ytitle("")xlabel(none)xsca(noline)xtitle("")t1title("WhiteMale")graphregion(color(white))

line le_bmaleyear,lwidth(medium)saving(bmale)ysca(noline)ylabel(,nolabels)ysca(noline)ytitle("")xlabel(none)xsca(noline)xtitle("")t1title("BlackMale")graphregion(color(white))

linele_wfemale year,lwidth(medium)saving(wfemale)xsca(lcolor(gs13))ysca(lcolor(gs13))ytitle("")t1title("WhiteFemale")graphregion(color(white))

linele_bfemale year,lwidth(medium) saving(bfemale)xsca(lcolor(gs13))ysca(noline)ylabel(,nolabels)ytitle("")t1title("BlackFemale")graphregion(color(white))

graph combinewmale.gph bmale.gph wfemale.gph bfemale.gph,title("Life Expectancy atBirth")subtitle("U.S. 1900-1999")ycommongraphregion(color(white))

效果如下：

 

2.     散点图的SPA笔记

 

再来一个反面教材：

 

出现了，禁忌·多重标签之术！

信息量也太大了吧，

但是这莫名的打码质感是怎么一回事……

还有那个指向China的箭头是想干什么？

一堆简写密密麻麻的认不出国家好吗？

抢镜头的吗？

 

把需要强调的数据点的颜色加深，

把其余的颜色浅化，

只留下需要强调国家的名字，其余的通通删去

 

 

是不是感觉它瞬间浪漫了起来？

有点点繁星的感觉了！

数据变得生动又直观！

嘻嘻，

当然，小周周也编出了相应的代码：

 

sysuseauto                                                                                                                     

local f1 ="gs13"

local f0 ="g1"

locals1="circle"

twoway(scatter mpg weight if  substr(make, 1,4)!="Audi"&substr(make, 1, 4)!="Ford",  mcolor(`f1') msymbol(`s1')) (scatter mpgweight if substr(make, 1, 4)=="Audi"|substr(make, 1,4)=="Ford",msymbol(`s1') mcolor(`f0') mlabel(make)mlabposition(6) mlabsize(medsmall )) (lfit mpgweight),title("Mpg And Weight of Cars" "in 1999's market")note("It's just an experiment")legend(off) xlabel(,nogrid)ylabel(,nogrid) scheme(s1mono )

 

效果如下，登登！

 

很好看吧~

数据可视化，

不仅有愈合伤口的奇效，

也有减缓腰肌劳损，视力疲劳的功能。

可为居家旅行，必备良药！

 

特此，

小周周郑重推荐：

爱你的导师，

就为TA做一个

数据可视化分析前沿SPA吧！

 

温馨提示噢，

修改code中的对应内容，

就可以自己绘图了！！！

喜欢小周周今天的分享的话，

请给我点个赞吧！

 还有更精彩的下一期，

正在难产中！