if (FALSE) # Authenticate via username/password
cyto_session <- authenticate(site="premium", username="cyril_cytometry", password="cytobank_rocks!")
# Authenticate via auth_token
cyto_session <- authenticate(site="premium", auth_token="my_secret_auth_token")
# cyto_citrus refers to a CITRUS object that is created from CITRUS endpoints
# examples: citrus.new, citrus.show (see details section for more)
if (FALSE) citrus.copy_settings(cyto_session, citrus=cyto_citrus)
if (FALSE) citrus.delete(cyto_session, citrus=cyto_citrus)
if (FALSE) # Download a CITRUS analysis to the current working directory
citrus.download(cyto_session, citrus)
# Download a CITRUS analysis to a new directory
citrus.download(cyto_session, citrus, directory="/my/new/download/directory/")
if (FALSE) # Dataframe of all CITRUS advanced analyses with all fields present
citrus.list(cyto_session, 22)
# Raw list of all CITRUS advanced analyses with all fields present
citrus.list(cyto_session, 22, output="raw")
if (FALSE) citrus.new(cyto_session, 22, citrus_name="My new CITRUS analysis")
if (FALSE) citrus.rename(cyto_session, citrus=cyto_citrus, citrus_name="My updated CITRUS name")
if (FALSE) citrus.run(cyto_session, citrus=cyto_citrus)
if (FALSE) citrus.show(cyto_session, 22, citrus_id=2)
if (FALSE) citrus.status(cyto_session, citrus=cyto_citrus)
if (FALSE) citrus.update(cyto_session, citrus=cyto_citrus)
Run the code above in your browser using DataLab