How to extract data format YYYY-MM-DD from a CSV to only YYYY in a new column in R? [duplicate]