diff --git a/scripts/functions/plotting_data.R b/scripts/functions/plotting_data.R index cd30dee..b884cc7 100755 --- a/scripts/functions/plotting_data.R +++ b/scripts/functions/plotting_data.R @@ -89,7 +89,7 @@ plotting_data <- function(df geneL_na=c("gid","rpob") if (tolower(gene)%in%geneL_na){ - infilename_nca = paste0("/home/tanu/git/Misc/mcsm_na_dist/" + infilename_nca = paste0("~/git/Misc/mcsm_na_dist/" , tolower(gene), "_nca_distances.csv") distcol_nca_name = read.csv(infilename_nca, header = F)