Commit cff0cf54 authored by mabrook's avatar mabrook
Browse files

changing race to a factor

parent 42ab4960
......@@ -28,6 +28,10 @@ actg$C2 <- ifelse(actg$delta==0 & actg$drop==0,actg$days,NA) #C2 is time of cens
# Treatment (art) as a factor variable
actg$art_f <- factor(actg$art,levels = c(0,1), labels = c("Dual therapy","Triple therapy"))
# Race as a factor variable
actg$race <- with(actg,hispanic*1+black*2)
actg$race <- factor(actg$race,levels = c(0,1,2), labels = c("White","Black", "Hispanic"))
# Deleting indicators of outcome and drop-out
No preview for this file type
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment