Я бы порекомендовал просто использовать read.csv
здесь, с точкой с запятой в качестве разделителя:
your_df <- read.csv(file="path/to/your/file.csv", sep=";", stringsAsFactors=FALSE)
names(your_df) <- c("year", "answer", "men", "women")
Это читает в вашем CSV-файле, а затем назначает имена столбцов для всех четырех столбцов (кажется, что в ваших исходных данных отсутствуют имена для первых двух столбцов).
Если вам необходимо выполнить анализ на уровне года, вы можете работать с этим фреймом данных как есть.