Merge pull request #85 from kayleachampion/main

Update cpt.class.R
rkillick · Dec 3, 2024 · d2d364d · d2d364d
2 parents 4846aff + aa2b7ab
commit d2d364d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/R/cpt.class.R b/R/cpt.class.R
@@ -580,7 +580,7 @@ setClass("cpt",slots=list(data.set="ts", cpttype="character", method="character"
       else if(test.stat(object)=="Gamma"){
         means=param.est(object)$scale*param.est(object)$shape
       }
-      else if(test.stat(object)=="Eobjectponential"){
+      else if(test.stat(object)=="Exponential"){
         means=1/param.est(object)$rate
       }
       else if(test.stat(object)=="Poisson"){
@@ -630,7 +630,7 @@ setClass("cpt",slots=list(data.set="ts", cpttype="character", method="character"
 	    else if(test.stat(object)=="Gamma"){
 	      means=param.est(object)$scale*param.est(object)$shape
 	    }
-	    else if(test.stat(object)=="Eobjectponential"){
+	    else if(test.stat(object)=="Exponential"){
 	      means=1/param.est(object)$rate
 	    }
 	    else if(test.stat(object)=="Poisson"){