Я новичок в R, поэтому, пожалуйста, будьте добры ко мне.У меня есть вектор с именем flood, который связан с flood_level.У меня есть еще один вектор с именем year, который должен быть связан с flood_level, который связан с flood.В конце концов, все это должно быть собрано в виде списка, например: 
У меня проблемы с получением результата на картинке, и я не знаю, чтокод для ввода, чтобы туда добраться.Пожалуйста, помогите мне понять, что я делаю не так.Вот мой код:
flood = c(1,2,3,3,2,1,2,2,3,1,1,1,1,3,2)
flood_level = factor(flood, labels = c("low", "medium", "high"))
year = c(2001:2015)
my_df = data.frame(year, flood_level)
my_df
flood_year = as.list(my_df)