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")
if (FALSE) drop.upload(cyto_session, 22, file_path="/path/to/my_drop_file.type",
data_matrix_start_row=2, data_matrix_start_column=1)
Run the code above in your browser using DataLab