使用 Stata 绘制口红、眼影盘 & 美妆刷

突然发现今天女神不怎么理你了?是不是昨天忘记送节日礼物了!现在送也来得及,网上下单来不及了!用 Stata 画一只口红或许还来得及!

那么如何使用 Stata 绘制一只口红呢?这里我采用类似画地图的方法绘制出来了,首先获取我精心设计的两个文件:

  • 口红_db.dta
  • 口红_coord.dta

然后就可以通过下面的代码在 Stata 里面绘制一只口红了:

use 口红_db.dta, clear
spmap ID using 口红_coord.dta, id(ID) ///
    clmethod(custom) clbreaks(0(1)33) /// 
    fcolor("255 233 236" "255 108 130" "251 62 110" "255 204 208" "255 77 107" "255 233 236" "255 108 130" "251 62 110" "255 204 208" "255 77 107" "255 233 236" "255 51 76" "255 255 255" "255 204 208" "255 255 255" "255 233 236" "251 62 110" "255 255 255" "255 255 255" "255 233 236" "255 108 130" "251 62 110" "255 204 208" "255 233 236" "255 108 130" "251 62 110" "198 159 162" "255 233 236%40" "255 204 208%10" "255 255 255" "255 204 208%30" "255 204 208%50" "255 255 255%57") /// 
    graphr(margin(*15 *15 *15 *15)) ///
    osize(vvthin ...) ocolor(white ...) ///
    leg(off)
口红

如果口红无法挽留,那么眼影盘或许可以!

  • 九宫格眼影_db.dta
  • 九宫格眼影_coord.dta
use 九宫格眼影_db.dta, clear
spmap ID using 九宫格眼影_coord.dta, id(ID) ///
    clmethod(custom) clbreaks(0(1)14) /// 
    fcolor("251 62 110" "255 151 155" "255 233 236" "255 151 155" "255 204 208" "255 108 130" "251 62 110" "255 51 76" "251 62 110" "255 108 130" "255 204 208" "255 151 155" "255 255 255" "255 255 255") ///
    graphr(margin(*15 *15 *15 *15)) ///
    leg(off) osize(vvthin ...) ocolor(white ...)
眼影盘

如果这些也都不行,你的女神可能缺一套化妆刷!

use 美妆刷_db.dta, clear
spmap ID using 美妆刷_coord.dta, id(ID) ///
    clmethod(custom) clbreaks(0(1)30) /// 
    fcolor("251 62 110" "255 255 255" "255 108 130" "255 233 236" "255 151 155" "255 255 255" "251 62 110" "255 255 255" "251 62 110" "255 233 236" "255 108 130" "255 151 155" "251 62 110" "255 255 255" "251 62 110" "255 255 255" "255 255 255" "251 62 110" "255 108 130" "255 233 236" "255 108 130" "255 151 155" "251 62 110" "255 255 255" "255 255 255" "251 62 110" "255 255 255" "251 62 110" "255 255 255" "255 108 130") ///
    graphr(margin(*15 *15 *15 *15)) ///
    leg(off) osize(vvthin ...) ocolor(white ...)
美妆刷

你可能感兴趣的:(使用 Stata 绘制口红、眼影盘 & 美妆刷)