ptecon: Part-time for economic reasons

Description

ptecon indicates whether or not a respondent worked part-time for economic reasons.

Availability

Sample	Years
Basic	1989 - present
ORG	1989 - present

Warning

This variable is not consistent across time because of a definition change in 1994.

Values

Value	Label
0	Different work status
1	Part-time for economic reasons

Code

Variable creation

*******************************************************************************
* Part-time for economic reasons
*******************************************************************************
gen byte ptecon = .

if $monthlycps == 1 | $maycps == 1 {
    if tm(1989m1) <= $date & $date <= tm(1993m12) {
        replace ptecon = 0 if 2 <= wkstat & wkstat <= 5
        replace ptecon = 1 if wkstat == 3 | wkstat == 5
    }
    if tm(1994m1) <= $date {
        replace ptecon = 0 if 2 <= prwkstat & prwkstat <= 10
        replace ptecon = 1 if prwkstat == 3 | prwkstat == 6
    }
}

lab var ptecon "Part-time for economic reasons"
lab def ptecon 1 "Part-time for economic reasons" 0 "Different work status"
lab val ptecon ptecon
notes ptecon: Only available 1989-present
notes ptecon: Universe = those usually FT or usually PT
notes ptecon: Definition/universe change 1989-1993, 1994-present
notes ptecon: 1989-1993 Unicon: wkstat
notes ptecon: 1994-present CPS: prwkstat

Figure creation

keep if age >= 16 & age ~= .
keep if ptecon ~= .
keep if lfstat == 1

cap drop hispanic

gen byte white = ptecon == 1 if wbho == 1
gen byte black = ptecon == 1 if wbho == 2
gen byte hispanic = ptecon == 1 if wbho == 3
gen byte other = ptecon == 1 if wbho == 4

gcollapse (mean) white black hispanic other [pw=basicwgt], by(year) fast
foreach var of varlist white black hispanic other {
    replace `var' = `var' * 100
}

sum year
local maxyear = r(max)
foreach var of varlist white black hispanic other {
    sum `var' if year == `maxyear'
    local `var'yvalue = r(mean)
    local `var'xvalue = `maxyear' - 0.2
}
local hispanicyvalue = `hispanicyvalue' + 0.5
local blackyvalue = `blackyvalue' - 0.5
local otheryvalue = `otheryvalue' + 0.5
local whiteyvalue = `whiteyvalue' - 0.5

local color1 228 26 28
local color2 55 126 184
local color3 77 175 74
local color4 152 78 163

line white black hispanic other year if year <= 1993, ///
lcolor("`color1'" "`color2'" "`color3'" "`color4'") || ///
line white black hispanic other year if year >= 1994, ///
lcolor("`color1'" "`color2'" "`color3'" "`color4'") ///
legend(off) ///
xlabel(1990(5)2020) ///
ylabel(0(2)10 12 "12%", angle(0) gmin gmax) ///
xtitle("") ytitle("") ///
graphregion(color(white) margin(r=12)) plotregion(color(white)) ///
title("Working part-time for economic reasons as a share of employment", size(medium)) ///
text(`whiteyvalue' `whitexvalue' "White", color("`color1'") placement(e)) ///
text(`blackyvalue' `blackxvalue' "Black", color("`color2'") placement(e)) ///
text(`hispanicyvalue' `hispanicxvalue' "Hispanic", color("`color3'") placement(e)) ///
text(`otheryvalue' `otherxvalue' "Other", color("`color4'") placement(e))
graph export ${variableimages}ptecon_titleimage.svg, replace