[Robast-commits] r1291 - pkg/RobExtremes/R

[noreply at r-forge.r-project.org]

Author: ruckdeschel
Date: 2024-02-07 03:26:51 +0100 (Wed, 07 Feb 2024)
New Revision: 1291

Modified:
   pkg/RobExtremes/R/interpolLM.R
Log:
[RobExtremes] trunk fixed a minor arg misfit with Rd in interpolLM.R

Modified: pkg/RobExtremes/R/interpolLM.R
===================================================================
--- pkg/RobExtremes/R/interpolLM.R	2024-02-07 02:07:14 UTC (rev 1290)
+++ pkg/RobExtremes/R/interpolLM.R	2024-02-07 02:26:51 UTC (rev 1291)
@@ -29,7 +29,7 @@
                    upper = 1e4, lower = 1e-4, OptOrIter = "iterate",
                    maxiter = 150, tol = .Machine$double.eps^0.5,
                    loRad = 0, upRad = Inf, loRad0 = 1e-3,
-                   loRad.s=0.2, up.Rad.s=1,
+                   loRad.s=0.2, upRad.s=1,
                    withStartLM = TRUE, len = 13,namFzus =""){
              namF <- gsub("\\.th$","",paste(deparse(substitute(optF))))
              namF <- paste(gsub(" ", "",namF),namFzus,sep="")
@@ -44,7 +44,7 @@
                   nameInSysdata = namF, withPrint = TRUE, radius = radius,
                   upper = upper, lower = lower, OptOrIter = OptOrIter,
                   maxiter = maxiter, tol = tol, loRad = loRad, upRad = upRad,
-                  loRad0 = loRad0, loRad.s = loRad.s, up.Rad.s = up.Rad.s,
+                  loRad0 = loRad0, loRad.s = loRad.s, upRad.s = upRad.s,
                   withStartLM = withStartLM, len = len0)
 }