tanu/LSHTM_analysis
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

buggy bugs that bug me

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-04 15:18:23 +01:00
parent e1b8e103ea
commit 599cd7493f
3 changed files with 25 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

2
scripts/plotting/get_plotting_dfs.R
View file

@ -124,7 +124,7 @@ cat(s2)
#source(paste0(plot_script_path, "lineage_data.R"))
# converted to a function. Moved lineage_data.R to redundant/
lineage_dfL = lineage_plot_data(df = merged_df2
lineage_dfL = lineage_plot_data(merged_df2
, lineage_column_name = "lineage"
, remove_empty_lineage = F
, lineage_label_col_name = "lineage_labels"

2
scripts/plotting/lineage_data.R
View file

@ -25,7 +25,7 @@ class(merged_df2$lineage_labels); nlevels(merged_df2$lineage_labels)
# total_samples
# snp diversity (perc)
#==========================================
sel_lineages = levels(merged_df2$lineage_labels)
sel_lineages = levels(as.factor(merged_df2$lineage_labels))
lin_wf = data.frame(sel_lineages) #4, 1
total_snps_u = NULL