pcspike 이용하기

pcspike

pcskpike를 이용하면 $(x_1 , y_1)$ 에서 $(x_2, y_2)$를 잇는 선을 쉽게 그릴 수 있다.

다음과 같이 자료를 읽어들이자.

. sysuse nlswide1, clear
(National Longitudinal Survey.  Young Women 14-26 years of age in 1968)

아래와 같이 쉽게 그림을 그릴 수 있다. 68년 경력 대비 임금에서 88년 경력 대비 임금이 어떻게 변했는지를 보여주고 있다.

. twoway (pcspike wage68 ttl_exp68 wage88 ttl_exp88), scheme(538)

위 그림에다가 다음과 같이 label을 달아주면 조금 더 보기 좋다.

. twoway (pcspike wage68 ttl_exp68 wage88 ttl_exp88) ///
> (scatter wage88  ttl_exp88 , ms(i) mlabel(occ )), ///
> legend(off) scheme(538)

한편 pcarrow 를 이용하면 여기에 화살표를 더할 수도 있다.

. tw (pcarrow wage68 ttl_exp68 wage88 ttl_exp88) ///
> (scatter wage88  ttl_exp88 , ms(i) mlabel(occ ) mlabcolor(blue)), ///
> scheme(538) legend(off)

pcarrowi 를 이용하면 개별 화살표를 그릴 수 있다. 이를 위해 census.dta를 불러들이자.

. sysuse census.dta, clear
(1980 Census data by state)

그러면 다음과 같은 그림을 그릴 수 있다. NY주와 그외의 주에 대한 산포도를 따로 그리고 pcarrowi를 이용하여 (y_1,x_1) -> (y_2,x_2) 좌표를 이용하여 화살표를 추가할 수 있다.

. tw (scatter marriage divorce if state2 != "NY", mcolor(%30) ) ///
> (scatter marriage divorce if state2 == "NY", msize(large) ) ///
> (pcarrowi 144518 70000 144518    64000 (3) "NY"  ), ///
> scheme(538) legend(off) xtitle(Divorce) ytitle(Marriage)