if (interactive()) {
set_qbms_config("https://bms.icarda.org/ibpworkbench")
login_bms()
set_crop("wheat")
set_program("Wheat International Nurseries")
set_trial("IDYT39")
set_study("IDYT39 Environment Number 9")
data <- get_study_data()
head(data)
}
Run the code above in your browser using DataLab