diff --git a/server.R b/server.R index 0d01dc6..60ad084 100644 --- a/server.R +++ b/server.R @@ -250,6 +250,9 @@ shinyServer(function(input, output){ selected_gene=input$gene HTML(paste0("PDB ID: ", as.character(genes[genes$Gene==selected_gene,"PDB"]),"
", "AlphaFold ID: ", as.character(genes[genes$Gene==selected_gene,"AF_PDB"]), "
" + "Gene: ", selected_gene, "
" + "Mutations Observed: ",as.character(as.matrix(unique_missense_genes[unique_missense_genes[,'gene_name']==selected_gene,"total_muts_per_gene"])[1]),"
" + as.character(genes[genes$Gene==selected_gene,"AF_PDB"]), "
" ) )