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

get_plotting_dfs

Browse source
This commit is contained in:
Tanushree Tunstall 2022-08-23 15:19:36 +01:00
parent ee70845939
commit dd69da01f6
1 changed files with 7 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

16
scripts/plotting/get_plotting_dfs.R
View file

@ -198,7 +198,7 @@ cat(s2)
# # location: scripts/functions/lineage_plot_data.R # # location: scripts/functions/lineage_plot_data.R
# #################################################################### # ####################################################################
# #
source(paste0(plot_script_path, "lineage_data.R")) #source(paste0(plot_script_path, "lineage_data.R"))
# # converted to a function. Moved lineage_data.R to redundant/ # # converted to a function. Moved lineage_data.R to redundant/
lineage_dfL = lineage_plot_data(merged_df2 lineage_dfL = lineage_plot_data(merged_df2
, lineage_column_name = "lineage" , lineage_column_name = "lineage"
@ -220,22 +220,18 @@ cat(s3)
# location: scripts/functions/corr_plot_data.R # location: scripts/functions/corr_plot_data.R
#################################################################### ####################################################################
# make sure the above script works because merged_df2_combined is needed # make sure the above script works because merged_df2_combined is needed
merged_df3 = as.data.frame(merged_df3)
# 1
# s3 = c("\nSuccessfully sourced lineage_data.R")
# cat(s3)
merged_df3 = as.data.frame(merged_df3)
#
corr_df_m3_f = corr_data_extract(merged_df3 corr_df_m3_f = corr_data_extract(merged_df3
, gene = gene , gene = gene
, drug = drug , drug = drug
, extract_scaled_cols = F) , extract_scaled_cols = F)
head(corr_df_m3_f) head(corr_df_m3_f)
=======
#
# corr_df_m2_f = corr_data_extract(merged_df2
# , gene = gene
# , drug = drug
# , extract_scaled_cols = F)
# head(corr_df_m2_f)
s4 = c("\nSuccessfully sourced Corr_data.R") s4 = c("\nSuccessfully sourced Corr_data.R")
cat(s4) cat(s4)