# NOT RUN {
if(interactive()){
# Check trait ID for septoria and get septoria data for durum wheat
durum <- getAccessions(crop = 'Durum wheat', coor = TRUE)
durumTraits <- getTraits(crop = 'Durum wheat')
septoria <- getTraitsData(IG = durum$IG, traitID = 145)
}
# }
Run the code above in your browser using DataLab