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_peacoqc refers to a PeacoQC object that is created from PeacoQC endpoints
# examples: peacoqc.new, peacoqc.show (see details section for more)
if (FALSE) peacoqc.copy_settings(cyto_session, peacoqc=cyto_peacoqc)
if (FALSE) # Dataframe of all PeacoQCs with all fields present
peacoqc.list(cyto_session, 22)
# Raw list of all PeacoQCs with all fields present
peacoqc.list(cyto_session, 22, output="raw")
if (FALSE) peacoqc.new(cyto_session, 22, peaco_qc_name="My new PeacoQC")
if (FALSE) peacoqc.rename(cyto_session, peacoqc=cyto_peacoqc,
peaco_qc_name="My updated PeacoQC name")
if (FALSE) peacoqc.run(cyto_session, peacoqc=cyto_peacoqc)
if (FALSE) peacoqc.show(cyto_session, experiment_id=22, peaco_qc_id=2)
if (FALSE) peacoqc.status(cyto_session, peacoqc=cyto_peacoqc)
if (FALSE) peacoqc.update(cyto_session, peacoqc=cyto_peacoqc)
Run the code above in your browser using DataLab