Coercion: Write an R function named Str2Num which accepts a single argument which is a character vector whose elements are single digits. The function should convert this vector of characters to a numeric value. Test function with the R command >Str2Num(c("3", "6", "5")).