Реструктуризация кадра данных в R из широкого формата до двух столбцов

Я работаю над набором данных, который имеет 4 столбца, которые представляют, когда был вырублен определенный участок леса.

Три из этих столбцов представляют год, а каждая строка представляет месяц. например Столбец: 2015 г., строка: 1 = январь 2015 г.

Последний столбец - уникальный идентификатор для каждого сайта.

Для моего анализа мне нужно реструктурировать эти данные так, чтобы это были 2 строки, сайт и формат даты для вырезки. Поскольку мы не знаем точного дня, мы выбрали 15-е число каждого месяца в качестве прокси.

Я приложил фотографии данных и резюме.

Конечный результат, которого я хотел бы, такой

uniqueid <- c(21000, 23400, 26800)
cut <- as.Date(c('2015-1-15','2016-3-15','2017-3-15'))
stack_example <- data.frame(uniqueid, cut)

Может ли кто-нибудь помочь мне реструктурировать данные, чтобы они были похожи на результат примера?

Большое тебе спасибо

‹********************************************************************************************************************************************************************************************************************************************************************************************************.

 dput(head(clf))

структура (список (X2017 = c (NA_integer_, NA_integer_, NA_integer_, NA_integer_, NA_integer_, NA_integer_), X2016 = c (NA_integer_, NA_integer_, NA_integer_, NA_integer_, NA_integer_c, NA_integer_ NA_integer_, NA_integer_), idunique = 1: 6), row.names = c (NA, 6L), class = data.frame)