# 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
markerorder<-c("CD4 T cells CD56","NK cells CD56","CD4 T cells CD3","NK cells CD3")
stimterms<-c("Unstim","IL-15")
ptterm<-c("Pt","Ctrl")
getrawsignals(cyto_session,markersofinterest,popsofinterest,exptID,markerorder,stimterms,
ptterms)
# }
Run the code above in your browser using DataLab