data(beam_stats)
test.pvals <- compute_set_pvalues(beam.stats=beam_stats)
test.feat.pvals <- compute_feature_pvalues(beam.stats=beam_stats)
plot.specs <- prep_beam_plot(beam.data=beam_stats$beam.data, beam.specs=beam_stats$beam.specs)
test.plot <- plot_feat_clin(beam.result=beam_stats, beam.specs=plot.specs,
beam.set.pvals=test.pvals, beam.feat.pvals=test.feat.pvals,
feat.id="ENSG00000227443_loss",
n.col=2, n.row=NULL)
Run the code above in your browser using DataLab