Rには標準でサンプルのデータセットが組み込まれており、処理の確認などに利用できます。
> example(iris) iris> dni3 <- dimnames(iris3) iris> ii <- data.frame(matrix(aperm(iris3, c(1,3,2)), ncol = 4, iris+ dimnames = list(NULL, sub(" L.",".Length", iris+ sub(" W.",".Width", dni3[[2]])))), iris+ Species = gl(3, 50, labels = sub("S", "s", sub("V", "v", dni3[[3]])))) iris> all.equal(ii, iris) # TRUE [1] TRUE