> wdir <- "C:/Users/vlado/docs/papers/2024/Trajectories/green" > setwd(wdir) > # install.packages('haven') > library(haven) > PB <- read_dta("PartnerBirthbio.dta") > dim(PB) [1] 1866 281 > names(PB) [1] "id" "weight40" "sex" "doby_gen" "dob" [6] "ethni" "migstatus" "yeduc" "sat1i4" "sat5" [11] "sat6" "highschool" "church" "biosib" "stepsib" [16] "east" "famstructure18" "state1" "state2" "state3" [21] "state4" "state5" "state6" "state7" "state8" ... [276] "state259" "state260" "state261" "state262" "state263" [281] "state264"