将月份缩写转换为数字月份，在R中

I'm trying to write a function to convert 3-letter month abreviations to numeric values in R.I'm trying to write a function to convert 3-let