target_hm_shared <- crosstalk::SharedData$new( onc_enrich_report[['data']][['cancer_hallmark']][['target']]) crosstalk::bscols( list( crosstalk::filter_select("hallmark", "Cancer hallmark", target_hm_shared, ~hallmark) ) ) htmltools::br() DT::datatable(target_hm_shared, escape = F, extensions=c("Buttons","Responsive"), width = "100%", options=list(buttons = c('csv','excel'),dom = 'Bfrtip')) |> DT::formatStyle(columns = c("promotes"), valueColumns = c('promotes'), color = "white", backgroundColor = DT::styleEqual( c(TRUE, FALSE), c("#005a32","#989898")) ) |> DT::formatStyle(columns = c("suppresses"), valueColumns = c('suppresses'), color = "white", backgroundColor = DT::styleEqual( c(TRUE, FALSE), c("#800026","#989898")) )
cat('\n <ul><li> <i> <span style="font-size: 105%; padding: 3px; background-color:#989898; color:white"> <b>NO</b> query genes with cancer hallmark associations from Open Targets Platform were found. </span></i></li></ul>',sep='\n') cat('\n') cat('<br><br>')
Citation Note : If you use the output of the Cancer hallmark evidence module of oncoEnrichR in your research, please cite the following resources and tools:
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.