reformatting code to select needed df for analysis
This commit is contained in:
parent
a6cbaab40a
commit
b72c4df796
7 changed files with 243 additions and 102 deletions
|
@ -365,6 +365,14 @@ colnames(combined_unpaired_stats_f) = c("mediator"
|
|||
, "p_bon_signif")
|
||||
|
||||
colnames(combined_unpaired_stats_f)
|
||||
|
||||
# count how many meds are significant
|
||||
n_sig = length(combined_unpaired_stats_f$mediator[combined_unpaired_stats_f$p_signif<0.05])
|
||||
cat("\nTotal no. of statistically significant mediators in", toupper(my_sample_type)
|
||||
, "are:", n_sig)
|
||||
|
||||
sig_meds = combined_unpaired_stats_f[combined_unpaired_stats_f$p_signif<0.05,]
|
||||
|
||||
########################################################################
|
||||
#******************
|
||||
# write output file
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue