# NOT RUN {
data(aml1)
x = aml1$variants
y = aml1
y <- transfer.events.to.consensus.trees(aml1, x[x$is.driver,],
cluster.col.name = 'cluster',
event.col.name = 'gene')
# }
Run the code above in your browser using DataLab