箱线图的绘制

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

各位大侠:看看附件中的箱线图怎么绘制的，里面有单值点，有其他软件直接绘制成的？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享1 收藏3 回帖

关键词：箱线图 各位大侠 软件

1. set scheme s2mono
   
2. sysuse nlsw88.dta, clear
   
3. #delimit ;
   
4. graph box wage if age >= 40 & age <= 44, over(race)
   
5. title("Hourly Wage by Race, Women 40-44 (n=918)")
   
6. note("Source: Stata 12 NLSW 1988 extract")
   
7. ylabel(, angle(0));
   
8. #delimit cr

复制代码

set scheme s2mono sysuse nlsw88.dta, clear egen median = median(wage), by(race) egen upq = pctile(wage), p(75) by(race) egen loq = pctile(wage), p(25) by(race) egen iqr = iqr(wage), by(race) egen upper = max(min(wage, upq + 1.5 * iqr)), by(race) egen lower = min(max(wage, loq - 1.5 * iqr)), by(race) egen mean = mean(wage), by(race) #delimit ; twoway scatter wage race, jitter(25) msize(tiny) mcolor(gs9) || scatter mean race, msymbol(D) mcolor(black) msize(small) || rbar med upq race, barwidth(0.70) blc(black) bfc(none) lwidth(medthick) || rbar med loq race, barwidth(0.70) blc(black) bfc(none) lwidth(medthick) || rcap loq lower race, lcolor(black) msize(*4) lwidth(medthick) || rcap upq upper race, lcolor(black) msize(*4) lwidth(medthick) title("Hourly Wage by Race, Women 40-44 (n=918)") note("Source: Stata 12 NLSW 1988 extract") xlabel(1 "white" 2 "black" 3 "other", noticks) xtitle("") xscale(range(0.5 3.5)) yscale(range(0 42)) ylabel(0 (10) 40, angle(0)) ytitle("hourly wage") legend(off); #delimit cr 复制代码

niuniuyiwan 发表于 2015-8-9 08:28

不太好用

请问有更好瘦身的吗?

可以参考：https://bbs.pinggu.org/thread-10873017-1-1.html