값을 변경에서 열 데이터를 프레임

값을 변경에서 열 데이터를 프레임

data$cens.type <- NA #crate column with NAs
data$cens.type[data$type=="exact"] <- 1
#put 1 for every "exact" in column type