Если вы хотите перейти от {Males, Females} к {0,1}:
s <- c("Males","Females","Males","Females","Females")
labs <- c("Males","Females")
f <- factor(s, levels=labs) ## specify order
as.numeric(f)-1 ## label numbers start at 1, so subtract 1
## result: [1] 0 1 0 1 1
Если вы хотите быть более общим
vals <- c(0,1)
vals[match(s,labs)]
## same result as above