Stata绘图：简单好用的37条外部命令

会员服务 ·

Stata绘图：简单好用的37条外部命令

2018 年 9 月 22 日 R语言中文社区

作者简介Introduction

郑连虎，在数学学院取得理学学位的文科生，中国人民大学硕博连读生在读，山东大学管理学学士、理学学士

个人公众号：阿虎定量笔记

往期回顾：

R语言绘图：28个实用程序包

全文注释

* 初识Stata，请戳“Stata自学资源”

* 示例参考help文件

* 我用Stata MP14重现了所有示例

* 本文以字母顺序排序命令

* spmap及cycleplot的示例数据链接见留言区

* 更多用于Stata绘图的外部命令，欢迎在留言区补充

aaplot

用于散点的线性或二次拟合，显示拟合方程及R方

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install aaplot

*导入1978年汽车交易的数据

sysuse auto, clear

gen gpm = 1000 / mpg

label var gpm "Gallons per thousand miles"

*拟合

aaplot gpm weight, name(plot)

beamplot

用于以均值为支点的“跷跷板”图示

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install beamplot

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制以均值为支点的“跷跷板”

beamplot mpg, by(foreign) over(rep78)

bihist

绘制双变量双向直方图

开发者

Austin Nichols

austinnichols@gmail.com

示例

*安装

ssc install bihist

*导入1978年汽车交易的数据

sysuse auto, clear

*以汽车里程数分组，绘制车型的双向直方图

bihist mpg, by(foreign)

binscatter

解决大样本情况下，散点图过于拥挤无法直观解释的问题

开发者

Michael Stepner

stepner@mit.edu

示例

*安装

ssc install binscatter

*导入1988年女性调查的数据

sysuse nlsw88, clear

keep if inrange(age,35,44) & inrange(race,1,2)

*工作年限和工资之间的关系

scatter wage tenure,title("Graph produced by Scatter") name(plot1)

binscatter wage tenure

*二次拟合

binscatter wage tenure, line(qfit) xscale(range(0,25)) xlabel(0(5)25) ylabel(0(10)40) yscale(range(0,40)) title("Graph produced by Binscatter") name(plot2)

graph combine plot1 plot2

byhist

绘制双变量单向直方图

开发者

Austin Nichols

austinnichols@gmail.com

示例

*安装

ssc install byhist

*导入1978年汽车交易的数据

sysuse auto, clear

*以汽车里程数分组，绘制车型的单向直方图

byhist mpg, by(foreign)

catplot

显示变量的频率或百分比

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install catplot

*导入1978年汽车交易的数据

sysuse auto, clear

*指定分类

gen himpg = mpg > 25

label def himpg 1 "mpg > 25" 0 "mpg <= 25"

label val himpg himpg

*绘制直方图

catplot himpg rep78 foreign

*绘制直方图

catplot rep78, over(for) stack asyvars perc(for) blabel(bar, position(center) format(%3.1f)) legend(off)

cbarplot

显示频率的中心条状图

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install cbarplot

*输入数据

clear

input levels freqcores freqblanks freqtools

25 21 32 70

24 36 52 115

23 126 650 549

22 159 2342 1633

21 75 487 511

20 176 1090 912

19 132 713 578

18 46 374 266

17 550 6182 1541

16 76 846 349

15 17 182 51

14 4 51 14

13 29 228 130

12 135 2227 729

end

reshape long freq, i(levels) j(kind) string

*以百分比形式显示频率

cbarplot levels kind [fw=freq], percent(levels)

cdfplot

绘制样本累积分布函数

开发者

Adrian Mander

adrian.mander@mrc-hnr.cam.ac.uk

示例

*安装

ssc install cdfplot

*导入1978年汽车交易的数据

sysuse auto, clear

*以车长分组，为车型的值指定单独的样本累积分布函数

cdfplot length [fw=rep78], by(foreign) norm saving(mygraph,replace)

ciplot

显示均值和置信区间

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install ciplot

*导入美国城市的气温数据

sysuse citytemp, clear

*绘制置信区间

ciplot heatdd cooldd, by(division) xla(, ang(45))

cmogram

以某变量为条件，显示另一变量的均值、中位数、频数、比例

示例

*安装

ssc install cmogram

*导入1978年汽车交易的数据

sysuse auto, clear

*以车重为条件，控制汽车价格，显示汽车里程数的均值

cmogram mpg weight, histopts(bin(5)) lfit cutpoint(3250) lineat(3000 3250 3500) controls(price)

cpyxplot

绘制指定变量之间的交叉散点图

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install cpyxplot

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制车型与维修记录、与里程数、与车圈、与车长的散点图

cpyxplot foreign \rep78 mpg turn length

cvxhull

绘制凸包图

开发者

R Allan Reese

r.a.reese@hull.ac.uk

示例

*安装

ssc install cvxhull

*导入1978年汽车交易的数据

sysuse auto, clear

gen foreign1=foreign

label define for 1 For 0 Dom

label values foreign1 for

*在散点图中显示汽车里程数的范围及每一个标有组值的点，每组观测值将计算出最多2层hull并共享一个组值

cvxhull mpg weight, group(foreign) hulls(2) scat(mlab(foreign1) mlabpos(c) msym(i) ysc(r(0,60)))

cycleplot

把时间序列数据中每个周期的值垂直地绘制出来

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install cycleplot

*导入美国GNP数据

use "D:\us_gnp.dta", clear

*按季度分解

cycleplot gnp96 quarter year, length(4)

devnplot

显示数据的平均值偏离

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install devnplot

*导入1978年汽车交易的数据

sysuse auto, clear

*依维修记录分组标记汽车里程数的数值及其均值

devnplot mpg rep78

drarea

用不同颜色解决区域重叠覆盖的问题

开发者

Adrian Mander

adrian.mander@mrc-bsu.cam.ac.uk

示例

*安装

ssc install drarea

*导入标普500指数数据

sysuse sp500, clear

generate high2 = high+15*uniform()

generate low2 = low+15*uniform()

*分颜色绘图

drarea high low high2 low2 date in 1/20

eclplot

标记置信区间

开发者

Roger Newson

r.newson@imperial.ac.uk

示例

*安装

ssc install eclplot

ssc install parmest

ssc install sencode

*导入1978年汽车交易的数据

sysuse auto, clear

*创建一个输出数据集

parmby "xi:regress mpg i.foreign i.rep78", label norestore

*创建一个带有值标签的数值变量

sencode parm,gene(parmid)

*使用参数标签来标记垂直置信区间

eclplot estimate min95 max95 parmid

ellip

绘制置信椭圆

开发者

Anders Alexandersson

aa1@msstate.edu

示例

*安装

ssc install ellip

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制置信椭圆

ellip mpg weight, by(foreign, total legend(off)) total tlabel(Total as a by-group) plot(scatter mpg weight)

grcomb

组合相同类型的多个图

开发者

Alex Gamma

alex.gamma@uzh.ch

示例

*安装

ssc install grcomb

*导入1978年汽车交易的数据

sysuse auto, clear

*同时显示汽车价格、里程数、维修记录及发动机排量的箱线图

grcomb graph box price mpg rep78 displacement, v(1)

hangroot

检查数据分布

开发者

Maarten L. Buis

maarten.buis@uni-tuebingen.de

示例

*安装

ssc install hangroot

*导入1988年女性调查的数据

sysuse nlsw88, clear

*绘制收入的分布曲线

hangroot wage,bar

hmap

绘制热图

开发者

Austin Nichols

austinnichols@gmail.com

示例

*安装

ssc install hmap

*输入数据

clear all

set obs 64

generate n=int(uniform()*10)

generate x=1+int((_n-1)/8)

generate y=1+mod((_n-1),8)

label define xlab 1 "one" 2 "two" 7 "seven" 8 "eight"

label define ylab 3 "three" 4 "four" 5 "five" 6 "six"

label value x xlab

label value y ylab

table y x [fw=n]

*绘制热图

hmap x y n

linkplot

显示成对数据的结构

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install linkplot

*输入10个男孩的A和B材料鞋子的数据（Box，Hunter and Hunter，1978）

input A B id

13.2 14.0 1

8.2 8.8 2

10.9 11.2 3

14.3 14.2 4

10.7 11.8 5

6.6 6.4 6

9.5 9.8 7

10.8 11.3 8

8.8 9.3 9

13.3 13.6 10

end

rename A wearA

rename B wearB

reshape long wear, string i(id) j(j)

encode j, gen(material)

*链接成对数据

linkplot material wear, link(id) yla(1 2, valuelabel) ysc(r(0.5 2.5)) yla(, ang(h))

netplot

生成社会网络分析的网络图

示例

*安装

ssc install netplot

*导入社会网络数据

sysuse network1a,clear

*生成网络图

netplot x_c y_c, label

pdplot

绘制帕累托图

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install pdplot

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制汽车里程数的帕累托图

pdplot mpg

plotmatrix

绘制矩阵图

开发者

Adrian Mander

adrian.mander@mrc-bsu.cam.ac.uk

示例

*安装

ssc install plotmatrix

*导入1978年汽车交易的数据

sysuse auto, clear

*线性回归

reg price mpg trunk weight length turn, nocons

mat regmat = e(V)

*绘制矩阵

plotmatrix, m(regmat) c(red) ylabel(,angle(0))

sixplot

显示单变量的六种数据诊断及描述性统计图

开发者

Peter. A. Lachenbruch

peter.lachenbruch@oregonstate.edu

示例

*安装

ssc install sixplot

*导入预期寿命数据

sysuse uslifeexp,clear

*生成男性预期寿命的统计图

sixplot le_male

spineplot

使图的宽度与频率呈比例

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install spineplot

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制直方图

spineplot foreign rep78

spmap

绘制等值线地图、比例符号地图等地图

开发者

Maurizio Pisati

maurizio.pisati@unimib.it

示例

*安装

ssc install spmap

*导入意大利地图数据

use "D:\Italy-RegionsData.dta", clear

*绘制意大利地图

spmap relig1 using "D:\Italy-RegionsCoordinates.dta", id(id)

statplot

在不借助图例的情况下，使用坐标轴标记数据

开发者

Eric A. Booth

ebooth@ppri.tamu.edu

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install statplot

*导入人口调查的数据

sysuse census, clear

*显示不同地区的结婚数与离婚数

statplot marriage divorce, over(region) s(sum) xpose

stripplot

绘制航线图

开发者

Nicholas J. Cox

n.j.cox@durham.ac.uk

示例

*安装

ssc install stripplot

*导入血压数据

sysuse bplong, clear

egen group = group(age sex), label

*绘制航线图

stripplot bp*, bar over(when) by(group, compact col(1) note("")) ysc(reverse) subtitle(, pos(9) ring(1) nobexpand bcolor(none) placement(e)) ytitle("") xtitle(Blood pressure (mm Hg))

*导入1978年汽车交易的数据

sysuse auto, clear

*绘制航线图

stripplot mpg, over(rep78) stack h(0.5) bar(lcolor(red))

*绘制航线图

gen pipe = "|"

stripplot price, over(rep78) box(barw(0.3)) ms(none) mla(pipe) boffset(0.3)

tabplot

直方图的列联表示