Please find below the code for creating a list candidate$\_$list$<-$list$($candidate$\_$id$=$c$(\text{'}1$a$\text{'},\text{'}1$c$\text{'},\text{'}1$d$\text{'},\text{'}1$b$\text{'}),$ gender $=$c$("$M$","$F$"),$ age $=$c$(33,35,24,38))$Write an R code to subset $3$rd element of the age vector in the candidate$\_$list.