x = parse_phase1_2_outcomes('1NNE 2EEN 3TBB')
# Three cohorts of three patients. The first cohort was treated at dose 1 and
# had no toxicity with one efficacy, etc.
x$num_patients # 9
x$dose # c(1, 1, 1, 2, 2, 2, 3, 3, 3)
x$eff # c(0, 0, 1, 1, 1, 0, 0, 1, 1)
sum(x$eff) # 5
x$tox # c(0, 0, 0, 0, 0, 0, 1, 1, 1)
sum(x$tox) # 3
# The same information can be parsed to a data-frame:
y = parse_phase1_2_outcomes('1NNE 2EEN 3TBB', as_list = FALSE)
y
Run the code above in your browser using DataLab