R 将长格式改为宽格式，多个ID和多个值，意外输出（已解决：问题=不同库）

有人能帮我找出程序中的错误吗？ 我有这样的数据（下面的dput）（虽然实际上有大约15个Var列）：

我希望它是宽格式的，所以看起来像这样：

为什么这个代码不起作用(

我得到的不想要的输出：

---

感谢jay.sf尝试代码。在他的评论之后，我发现这个问题与加载的包有关。

请考虑我是初学者/显然不是一个专业的程序员。预先道歉可能会问一个重复的问题，我试图弥补它，通过清晰和容易地看……产生这个，我就可以用你的代码和dput数据得到你想要的结果。哦！谢谢你的尝试！我清除了我的历史记录，然后再试了一次，它成功了。然后加载了tidyverse，它就不再工作了。@Kastany这可能是由于在多个包中有相同名称的函数。使用

packageName:：functionName 谢谢。尽管我再次尝试了相同的步骤，但无论使用的是什么软件包，都得到了错误的输出。现在重新安装软件包，也许这会有所帮助。。。
Wf <- reshape(data=testLF,
                          idvar=c("ID","ID2"), 
                          timevar = "Key",
                          direction="wide")

structure(list(ID = c(1L, 1L, 2L, 2L, 3L, 3L, 4L, 4L), ID2 = c("a", 
"a", "b", "b", "c", "c", "d", "d"), Key = c("A", "B", "A", "C", 
"A", "B", "A", "C"), Var1 = c(1L, 1L, 1L, 2L, 2L, 2L, 2L, 2L), 
    Var2 = c(3L, 3L, 3L, 3L, 3L, 3L, 3L, 3L), Var3 = c(0L, 4L, 
    5L, 0L, 5L, 4L, 0L, 5L)), row.names = c(NA, -8L), class = c("tbl_df", 
"tbl", "data.frame"), spec = structure(list(cols = list(ID = structure(list(), class = c("collector_integer", 
"collector")), ID2 = structure(list(), class = c("collector_character", 
"collector")), Key = structure(list(), class = c("collector_character", 
"collector")), Var1 = structure(list(), class = c("collector_integer", 
"collector")), Var2 = structure(list(), class = c("collector_integer", 
"collector")), Var3 = structure(list(), class = c("collector_integer", 
"collector"))), default = structure(list(), class = c("collector_guess", 
"collector"))), class = "col_spec"))