update function name throughout

cbahlai · Aug 6, 2019 · e0b1a1b · e0b1a1b
1 parent 93edfcb
commit e0b1a1b
Show file tree

Hide file tree

Showing 7 changed files with 10 additions and 10 deletions.
diff --git a/regime_shift_detector.R → dynamic_shift_detector.R b/regime_shift_detector.R → dynamic_shift_detector.R
@@ -350,7 +350,7 @@ modelspecification<-function(specs, data){
 
 #looks like that works! Okay! put it all together like we did for the 2 break model
 
-RSdetector<-function(data, criterion){ #use raw time series data
+DSdetector<-function(data, criterion){ #use raw time series data
   #plot the data
   plot(data)
   data1<-addNt1(data)

diff --git a/harmonia_example.R b/harmonia_example.R
@@ -30,11 +30,11 @@ harmonia.year<-ddply(harmonia, "year", summarize,
                      avg=sum(ADULTS)/length(ADULTS))
 
 #now, we run it through the RS detector
-source("regime_shift_detector.R")
+source("dynamic_shift_detector.R")
 
-RSdetector(harmonia.year, "AIC")
+DSdetector(harmonia.year, "AIC")
 
-RSdetector(harmonia.year, "AICc")
+DSdetector(harmonia.year, "AICc")
 
 harmonia1<-addNt1(harmonia.year)
 

diff --git a/monarch_example.R b/monarch_example.R
@@ -6,11 +6,11 @@ monarch<-read.csv(file="C:/Users/cbahlai/Dropbox/Old_gigs/Zipkin/MonarchOW.csv",
 
 
 #okay, let's see if it'll work
-source("regime_shift_detector.R")
+source("dynamic_shift_detector.R")
 
-RSdetector(monarch, criterion="AIC")
+DSdetector(monarch, criterion="AIC")
 
-RSdetector(monarch, criterion="AICc")
+DSdetector(monarch, criterion="AICc")
 
 monarch1<-addNt1(monarch)
 

diff --git a/simulations.R b/simulations.R
@@ -1,5 +1,5 @@
 #script for creating simulated data under a variety of parameters
-#and then determining if RSdetector function correctly determines these parameters
+#and then determining if DSdetector function correctly determines these parameters
 
 #to-do list 
 
@@ -9,7 +9,7 @@
 #and while we're at it, simulations to test how this all works given different lengths of time series
 
 #get the regime shift detector functions into memory
-source("regime_shift_detector.R")
+source("dynamic_shift_detector.R")
 
 #create a function that will make fake data based on specified parameters
 #assume change, noise is given in percent (0-100) scale, as is change to r, k

diff --git a/simulations_weight_analysis.R b/simulations_weight_analysis.R
@@ -2,7 +2,7 @@
 #and then determining if breakweights function correctly determines these parameters
 
 #get the regime shift detector functions into memory
-source("regime_shift_detector.R")
+source("dynamic_shift_detector.R")
 
 #create a function that will make fake data based on specified parameters
 #assume change, noise is given in percent (0-100) scale, as is change to r, k

diff --git a/writing/S2- Function descriptions July 1.docx b/writing/S2- Function descriptions July 1.docx
diff --git a/writing/~$- Function descriptions July 1.docx b/writing/~$- Function descriptions July 1.docx