♪当当当…… 随 着平安夜的落幕，考研的童鞋们终于得到了解放！与此同时，一年一度的圣诞节终于到啦，大家有没有收到苹果呢*^_^*尽管圣诞节是西方的宗教节日，但飘落 的雪花，祝福的歌声，温暖的炉火，和蔼的圣诞老人，可爱的麋鹿，无不构成记忆中的小确幸。最最重要的是，能和好朋友一起分享美食，互送礼物，回忆相处的点 滴，还有什么比这样的时光更值得珍惜呢♫在这样美好的日子中， 爬虫俱乐部全体成员衷心祝愿屏幕前的小可爱们圣诞快乐 ^_^。同时，送上一份 来自stata的绘图礼物——圣诞树 。

想知道怎么用stata画圣诞树吗？？贴心的小编已经为您双手奉上程序啦，感兴趣的小伙伴可以下载我们提供的do文件哦，快拿去运行送给喜欢的人吧！

我们使用stata中的矩阵函数以及循环变量赋值生成圣诞树的 主干 的数据，并生成 散点图 。

clear

matrix L = (0.03, 0.85, 0.8, 0.20, -0.20, 0.25, -0.20\ 0.00 ,0.00, 0.0, -0.08, 0.08, -0.10, 0.10\ 0.00, 0.00, 0.0 , 0.15, 0.15, 0.12, 0.12\ 0.10, 0.85, 0.80, 0.22, 0.22, 0.25, 0.20)

mat list L

matrix B = ( 0, 0.0, 0.0,0.00, 0.00, 0.0, 0.0\ 0, 1.5, 1.5, 0.85, 0.85, 0.3, 0.4)

mat list B

matrix prob = (0.02, 0.6,.08, 0.07, 0.07, 0.07, 0.07)

set obs 100000

gen x1 = .

gen x2 = .

gen k = int(runiform(1,7))

replace x1 = 0 if _n==1

replace x2 = 2 if _n==1

forvalues i = 2(1)100000 {

mat x = (x1[`i'-1],x2[`i'-1])

mat a = (L[1,k[`i']],L[3,k[`i']]\L[2,k[`i']],L[4,k[`i']])

mat b = a'*x'+ B[1...,k[`i']]

replace x1 = b[1,1] if _n == `i'

replace x2 = b[2,1] if _n == `i'

di `i'

}

scatter x2 x1 ,color(green) jitter(2) title("Merry Christmas")

根据往期推文《 绘图神器—gr_edit，妈妈再也不用担心我的画图 》，用 gr_edit命令 为圣诞树添加装饰。

首先进入 图形编辑器 ，点击红色按钮修改图片：

其次改变图像尺寸 Y size ：

我们便可以将圣诞树的主干变得更加美观：

最后使用绘图工具为圣诞树 添加装饰 ，点击 红色按钮 结束录制，根据往期推文《 绘图神器—gr_edit，妈妈再也不用担心我的画图 》将命令保存到指定文件：

打开命令文件夹如下图所示：

运用绘图神器 gr_edit 构建命令，通过命令绘制圣诞树的 装饰 命令。

gr_edit style.editstyle declared_ysize(8) editcopy // Graph size

gr_edit plotregion1.AddMarker added_markers editor -.1173865320507047 6.508580319160336

gr_edit plotregion1.added_markers_new = 1

gr_edit plotregion1.added_markers_rec = 1

gr_edit plotregion1.added_markers[1].style.editstyle marker( symbol(circle) linestyle( width(thin) color(red) pattern(solid)) fillcolor(red) size(large) angle(stdarrow) symangle(zero) backsymbol(none) backline( width(thin) color(black) pattern(solid)) backcolor(black) backsize(zero) backangle(stdarrow) backsymangle(zero)) line( width(thin) color(black) pattern(solid)) area( linestyle( width(thin) color(ltbluishgray) pattern(solid)) shadestyle( color(ltbluishgray) intensity(inten100) fill(pattern10))) label( textstyle( horizontal(center) vertical(middle) angle(default) size(small) color(black) position() margin(zero) linestyle( width(thin) color(black) pattern(solid))) position(6) textgap(half_tiny) horizontal(default) vertical(default)) dots( symbol(circle) linestyle( width(thin) color(black) pattern(solid)) fillcolor(black) size(vtiny) angle(horizontal) symangle(zero) backsymbol(none) backline( width(thin) color(black) pattern(solid)) backcolor(black) backsize(medium) backangle(horizontal) backsymangle(zero)) connect(direct) connect_missings(yes) editcopy

运用上述的第一步和第二步内容，对圣诞树进行各种 颜色的点缀 ，最终我们就生成漂亮的圣诞树啦。

由于添加点缀的命令太长，考虑推文篇幅，我们就不将程序附在后面啦，有兴趣的读者可以通过爬虫俱乐部官网下载（ https://raw.githubusercontent.com/Stata-Club/Sharing-Center-of-Stata-Club/master/article/%E5%9C%A3%E8%AF%9E%E6%A0%91.do ）。

最后，祝大家双旦快乐，么么哒。

注：此推文中的图片及封面（除操作部分的）均来源于网络！如有雷同，纯属巧合！