首先祝大家中秋快乐!今天给大家分享一个好玩的!使用 Stata 绘制一幅中秋海报插画!

绘制起来非常简单,使用附件中的两个文件:
- 月饼佳节_db.dta
- 月饼佳节_coord.dta
然后在 Stata 中运行这段代码就会看到一幅神奇的图出来:
use 月饼佳节_coord.dta, clear sum _X sum _Y
di 37.36696 - .00379 / 3
clear input _X _Y str100 label -121.96755 37.365697 "微信公众号 RStata 祝大家中秋快乐!" end save label, replace
use 月饼佳节_db.dta, clear grmap ID using 月饼佳节_coord.dta, id(ID) clmethod(unique) fcolor("42 77 86" "30 29 39" "250 214 174" "242 241 229" "38 68 77" "250 228 198" "248 171 113" "33 52 61" "252 235 209" "30 43 52" "251 207 163" "251 190 138" "166 184 171" "186 179 153" "250 200 152" "253 131 82" "214 170 130" "251 161 103" "220 144 92" "251 182 125" "190 116 77" "140 174 164" "245 146 89" "213 94 48" "117 149 143" "190 79 43" "145 57 31" "226 107 57" "52 85 90" "67 124 125" "79 146 145" "27 33 43" "182 133 97" "118 166 158" "76 139 138" "72 64 59" "54 99 105" "230 132 81" "56 104 107" "79 112 111" "149 95 67" "161 114 80" "174 77 43" "237 121 65" "50 46 49" "213 190 161" "102 41 29" "113 51 32" "201 86 44" "64 70 69" "48 22 28" "61 27 27" "32 23 34" "251 193 114" "75 35 24" "110 114 105" "76 75 71" "78 85 82" "98 167 160" "61 116 120" "85 154 150" "19 13 29" "237 246 243" "57 60 77" "6 3 18" "252 115 75") graphr(margin(*15 *15 *15 *15)) leg(off) osize(vvthin ...) ocolor(white ...) label(data(label) x(_X) y(_Y) l(label) length(100) color("42 77 86"))
gr export pic2.png, width(4800) replace
|

由于该数据的制作比较费事,所以就不再过多介绍了,总之就是祝大家中秋快乐~
点击这里跳转到 RStata 短书平台获取附件:使用 Stata 绘制一幅中秋海报插画
评论