listAlleles <- getAlleles("WTSI","MGP_001","IMPC_CBC_001",
"IMPC_CBC_003_001")
for (alleleIndex in 1:length(listAlleles)) {
print(paste(listAlleles[alleleIndex],"-",
getName("allele_accession_id","allele_symbol",
listAlleles[alleleIndex])))
}
Run the code above in your browser using DataLab