Stata绘图: 一个干净整洁的 Stata 图形模板qlean

编者按： 计量画图时，Stata 在默认情况下的图形输出通常为浅蓝色带横向网格底纹的图形，且不同输出图形通常以差异化的颜色加以标注，但很多时候，期刊排版要求图片为可识别的（如黑白风格或者不同标记风格）图片。因此，本次推文为大家介绍一个用户编写的干净而整洁的Stata图形模版 qlean，并结合我们常用的示例数据为大家展示了一下对比效果。

1. 导言

但对于懒人，或者一定程度上使用 grstyle 命令更改 Stata 模板的操作起来还并不熟练的筒子们，qlean 模版还是很亲民和易用的。

2. 下载方法

解压后，将 scheme-qlean.scheme scheme-qleanmono.scheme 两文件复制到 Stata 程序的 附加 ado 文件夹中的文件夹 s ，如笔者电脑为 D:\stata15\ado\plus\s ; 将 .style 为后缀的 color 设定文件 复制到文件夹 style , 如 D:\stata15\ado\plus\style。此时即可使用该模版。

3. 应用方法

为展示其模版效果，将以 Stata 默认风格为对比基础进行展示。

3.1 散点图

. sysuse "auto.dta", clear  
. twoway scatter price weight 
. twoway scatter price weight, scheme(qlean)
. twoway scatter price weight, scheme(qleanmono)

结果展示:

. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1
. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1, scheme(qlean)
. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1, scheme(qleanmono)

3.2 折线图

. sysuse uslifeexp,clear

. twoway line le_male   year || line le_female year
. twoway line le_male   year || line le_female year, scheme(qlean)
. twoway line le_male   year || line le_female year, scheme(qleanmono)

3.3 矩阵图

sysuse lifeexp, clear
gen lgnppc = ln(gnppc)
gr matrix popgr lexp lgnp safe
gr matrix popgr lexp lgnp safe, scheme(qlean)
gr matrix popgr lexp lgnp safe, scheme(qleanmono)

此处，使用 mono 风格时结果看起来并无差别，所以 qlean 风格结果仅展示一副。

3.4 条形图

. sysuse nlsw88, clear
. graph hbar (mean) wage, over(smsa) over(married) over(collgrad)   
. graph hbar (mean) wage, over(smsa) over(married) over(collgrad) scheme(qlean) 

4. 几个推荐的黑白模版

结合往期推文和本期介绍的 qlean ，为大家提供几个效果图，方便使用时灵活选择自己中意的图形风格。

主要涉及的风格模版有 tufte 、 burd 、 lean1 和 lean2，如安装方法不可用，可尝试使用 findit 命令搜寻。另外，我们可以通过 mcolor() 选项选择 qlean 模版的色彩搭配风格。

安装方法：

. ssc install scheme_tufte, replace 
. ssc install scheme-burd, replace  
. net install gr0002_3.pkg  

应用示例：

. sysuse auto, clear
. twoway lfitci mpg weight || scatter mpg weight

. twoway lfitci mpg weight || scatter mpg weight, scheme(qlean) mc(ply3)

. twoway lfitci mpg weight || scatter mpg weight, scheme(tufte)

. twoway lfitci mpg weight || scatter mpg weight, scheme(burd)

. twoway lfitci mpg weight || scatter mpg weight, scheme(lean1)

. twoway lfitci mpg weight || scatter mpg weight, scheme(lean2)

5. 代码汇总

. sysuse "auto.dta", clear  
. twoway scatter price weight 
. twoway scatter price weight, scheme(qlean)
. twoway scatter price weight, scheme(qleanmono)

. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1
. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1, scheme(qlean)
. twoway scatter price weight if foreign==0 ||  scatter price weight if foreign==1, scheme(qleanmono)

. sysuse uslifeexp,clear

. twoway line le_male   year || line le_female year
. twoway line le_male   year || line le_female year, scheme(qlean)
. twoway line le_male   year || line le_female year, scheme(qleanmono)

. sysuse lifeexp, clear
. gen lgnppc = ln(gnppc)
. gr matrix popgr lexp lgnp safe
. gr matrix popgr lexp lgnp safe, scheme(qlean)
. gr matrix popgr lexp lgnp safe, scheme(qleanmono)

. sysuse nlsw88, clear
. graph hbar (mean) wage, over(smsa) over(married) over(collgrad)   
. graph hbar (mean) wage, over(smsa) over(married) over(collgrad) scheme(qlean) 

. ssc install scheme_tufte, replace 
. ssc install scheme-burd, replace  
. net install gr0002_3.pkg  

. sysuse auto, clear
. twoway lfitci mpg weight || scatter mpg weight
. twoway lfitci mpg weight || scatter mpg weight, scheme(qlean) mc(ply3)
. twoway lfitci mpg weight || scatter mpg weight, scheme(tufte)
. twoway lfitci mpg weight || scatter mpg weight, scheme(burd)
. twoway lfitci mpg weight || scatter mpg weight, scheme(lean1)
. twoway lfitci mpg weight || scatter mpg weight, scheme(lean2)

后记：输出整洁的图形就是这么简单！

关于我们

• 【Stata 连享会(公众号：StataChina)】由中山大学连玉君老师团队创办，旨在定期与大家分享 Stata 应用的各种经验和技巧。
• 公众号推文同步发布于 、 和 。可以在上述网站中搜索关键词Stata或Stata连享会后关注我们。
• 点击推文底部【阅读原文】可以查看推文中的链接并下载相关资料。
• Stata连享会 ||

联系我们

• 欢迎赐稿： 欢迎将您的文章或笔记投稿至Stata连享会(公众号: StataChina)，我们会保留您的署名；录用稿件达五篇以上，即可免费获得 Stata 现场培训 (初级或高级选其一) 资格。
• 意见和资料： 欢迎您的宝贵意见，您也可以来信索取推文中提及的程序和数据。
• 招募英才： 欢迎加入我们的团队，一起学习 Stata。合作编辑或撰写稿件五篇以上，即可免费获得 Stata 现场培训 (初级或高级选其一) 资格。
• 联系邮件：

往期精彩推文

• Stata连享会 ||