I have following data
Sample_ID<-c("a1","a2","a3","a4","a5","a6")
Score<-c(100, 200, 300, 400, NA, NA)
DF<-data.frame(Sample_ID,Score)
How to create a new variable called Score_status where all the samples having NA (missing value) will be coded as 0 and those having scores will be coded as 1. I am looking for following output.
Sample_ID Score Score_status
a1 100 1
a2 200 1
a3 400 1
a4 NA 0
a5 NA 0
How to do this in R.