r - 旋转数据框

Question

任何将数据帧从这种格式转换为更长格式的建议都会很棒。原始数据有 50 个名称和数百个 YearMonths。所以它应该是一个从宽到长的支点（？）。

df<-data.frame(name=c("Amber","Thomas","Stefan","Joe"),
                      YM_202006=c(8,2,NA,7),
               YM_202007=c(NA,4,1,7),
               YM_202008=c(1,2,3,4))

改造前：

转换后/所需输出（df_new）：

使用以下代码伪造所需的输出：

df_new<- data.frame(YM=c("YM_202006","YM_202007","YM_202008"),
                    Amber=c(8,NA,1),
                    Thomas=c(2,4,2),
                    Stefan=c(NA,1,3),
                    Joe=c(7,7,4))

我尝试了很多方法都没有得到想要的输出。

希望有人可以帮助，提前谢谢！