# NOT RUN {
library(CytobankAPI)
cyto_session <- authenticate(site="premium", username="myusername", password="mypassword")
markersofinterest<-c("CD3","CD56")
popsofinterest<-c("CD4 T cells","NK cells")
exptID=4
type=TRUE
analyzedata(cyto_session,markersofinterest,popsofinterest,exptID,type)
# }
Run the code above in your browser using DataLab