Gisele, bom dia!

Basicamente, faltou requerer a biblioteca synbreed, além de symbreedData:

library(synbreed) ### insira no seu código!!!
library(synbreedData)
data(maize)
newDHpheno <- data.frame(Trait=1000,row.names="newDH")
newDHpheno
...


Éder Comunello <comunello.eder@gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]