# NOT RUN {
library(CytobankAPI)
popsofinterest<-c("CD4 T cells","NK cells")
cyto_session <- authenticate(site="premium", username="myusername", password="mypassword")
exptno<-2
getpops(popsofinterest,exptno,cyto_session)
# }
Run the code above in your browser using DataLab