Olá Alexandre Basta usar a função melt do pacote reshape2 library(reshape2) da.melt = melt(da, id = c("trat", "tempo"), variable.name="Esp", value.name="N") da.melt -- Salah Saudações!