# \donttest{
library(metan)
df <-
data.frame(
GEN = c("G1", "G2", "G3","G4"),
E1 = rnorm(4, 100, 20),
E2 = rnorm(4, 10, 2),
E3 = rnorm(4, 50, 5),
E4 = rnorm(4, 1000, 150)
)
df
t(df)
transpose_df(df)
# }
Run the code above in your browser using DataLab