SFG plot update

NEFSC · Sep 16, 2024 · b12658a · b12658a
1 parent 1f64206
commit b12658a
Show file tree

Hide file tree

Showing 6 changed files with 5 additions and 5 deletions.
diff --git a/RAnalysis/Output/F1_SFG.pdf b/RAnalysis/Output/F1_SFG.pdf
diff --git a/RAnalysis/Output/F2_SFG_LvH.pdf b/RAnalysis/Output/F2_SFG_LvH.pdf
diff --git a/RAnalysis/Output/F2_SFG_LvM.pdf b/RAnalysis/Output/F2_SFG_LvM.pdf
diff --git a/RAnalysis/Output/F2_SFG_Ttests_LOWvHIGH.csv b/RAnalysis/Output/F2_SFG_Ttests_LOWvHIGH.csv
@@ -1,4 +1,4 @@
 "","Age_DPF","model","ShapiroWilk","ResidNorm","Variance","HomogVar","DF.num","DF.denom","Tstat","P_val","SigDif","NA"
-"1",167,"Welchs T test, equal variance","0.55604701556613; 0.343966000912366","YES",0.866876709402682,"YES",11,"NA",0.177336659758588,0.43123360284407,"NO",NA
-"2",190,"Welchs T test, equal variance","0.690666020996191; 0.773497019847514","YES",0.372168470403576,"YES",11,"NA",3.49254124023126,0.00251799011594458,"YES",NA
-"3",222,"Welchs T test, equal variance","0.652340355188917; 0.994835598326444","YES",0.55603160473795,"YES",11,"NA",2.35300167853835,0.0191419699200076,"YES",NA
+"1",167,"Welchs T test, equal variance","0.343966000912366; 0.55604701556613","YES",0.866876709402682,"YES",11,"NA",-0.177336659758588,0.56876639715593,"NO",NA
+"2",190,"Welchs T test, equal variance","0.773497019847514; 0.690666020996191","YES",0.372168470403576,"YES",11,"NA",-3.49254124023126,0.997482009884055,"NO",NA
+"3",222,"Welchs T test, equal variance","0.994835598326444; 0.652340355188917","YES",0.55603160473795,"YES",11,"NA",-2.35300167853835,0.980858030079992,"NO",NA
diff --git a/RAnalysis/Output/F2_SFG_all_treatments.pdf b/RAnalysis/Output/F2_SFG_all_treatments.pdf
diff --git a/RAnalysis/Scripts/F1_Phys/F1_Scope_for_Growth.Rmd b/RAnalysis/Scripts/F1_Phys/F1_Scope_for_Growth.Rmd
@@ -363,7 +363,7 @@ SFG_Pousse_F1          <- ggplot(data=F1_SGF_Means_by_tank, aes(x=pCO2, y=SFG, c
                         theme(panel.grid.major = element_blank(), 
                                           panel.grid.minor = element_blank(),
                                           legend.position="none")+ 
-                        labs(title="F2 Bay Scallops: Scope for Growth ", x ="Month", y = "Scope for Growth") + 
+                        labs(title="F1 Bay Scallops: Scope for Growth ", x ="Month", y = "Scope for Growth") + 
                         facet_wrap(~Age)
 
 # convert meand by tank to summrizing means by treatment and age 
@@ -509,7 +509,7 @@ F1_Masterfile_2.0$DPvar    <- F1_Masterfile_2.0$SFG
 F1_Masterfile_2.0$INDvar   <- F1_Masterfile_2.0$pCO2 
 
 
-as.data.frame(run_ttest(F1_Masterfile_2.0))
+as.data.frame(run_ttest(F1_Masterfile_2.0)) 
 
 write.csv( 
           as.data.frame(run_ttest(F1_Masterfile_2.0)),