Update minimaandpaths.R

Based on #11
spiwokv · Nov 28, 2023 · 026be74 · 026be74
1 parent 4d27fab
commit 026be74
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/minimaandpaths.R b/R/minimaandpaths.R
@@ -201,7 +201,7 @@ oneminimum.fes<-function(inputfes, cv1, cv2, cv3) {
     minima <- minima[order(minima[,4]),]
     rownames(minima) <- seq(length=nrow(minima))
     minima[,1]<-myLETTERS
-    minima<-list(minima=minima, hills=min1$hillsfile, fes=min1$fes, rows=min1$rows, dimension=min1$dimension, per=min1$per, x=min1$x, pcv1=min1$pcv1, pcv2=min1$pcv2)
+    minima<-list(minima=minima, hills=min1$hills, fes=min1$fes, rows=min1$rows, dimension=min1$dimension, per=min1$per, x=min1$x, pcv1=min1$pcv1, pcv2=min1$pcv2)
     class(minima) <- "minima"
   }
   return(minima)