r - 溶けたデータ フレームを元に戻す簡単な方法

Question

data.frame溶けたを再作成するにはどうすればよいreshape2ですか?

再現可能な例

library(reshape2)
library(plyr)
data(iris)
df  <- melt(iris, id.vars="Species")
head(df)
  Species     variable value
1  setosa Sepal.Length   5.1
2  setosa Sepal.Length   4.9
3  setosa Sepal.Length   4.7
4  setosa Sepal.Length   4.6
5  setosa Sepal.Length   5.0
6  setosa Sepal.Length   5.4
# Great, I'd like to get the original iris back

私が試したことdcast

  dcast(df, Species~variable, value.var = "value")
    # should work but doesn't

一時的な解決策

# This works but clearly it shouldn't be this hard.
ddply(df, .(Species), function(x) {
    Species <- unique(x$Species)
    x$id <- 1:dim(x)[1]
    x$Species <- NULL
    dat <- unstack(x, value~variable)
    dat$Species <- Species
    return(dat)
    })

私は何が欠けていますか？それは明らかなことですが、答えがわかりません。以前にここで他の誰かのために答えたかもしれません。ああ。