going through functions and script for interactive plots

This commit is contained in:
Tanushree Tunstall 2022-01-12 17:58:16 +00:00
parent 1f266c4cb8
commit 3f7bc908ec
7 changed files with 83 additions and 95 deletions

View file

@ -16,9 +16,12 @@ library(dplyr)
## my_df_u_lig
## dup_muts
#========================================================
#lig_dist_colname = 'ligand_distance' or global var LigDist_colname
#lig_dist_cutoff = 10 or global var LigDist_cutoff
plotting_data <- function(df
, lig_dist_colname = 'ligand_distance'
, lig_dist_cutoff = 10) {
, lig_dist_colname = ''
, lig_dist_cutoff = '') {
my_df = data.frame()
my_df_u = data.frame()
my_df_u_lig = data.frame()