> degat.large <- spread(degat.long, dimension, cm)
> degat.large
  Species DHP Haut
1   Chêne  12   56
2   Frêne  13   55
3    Orme  20   85