Minor code polish

R-Lum · Feb 28, 2025 · 97d535c · 97d535c
1 parent d09c095
commit 97d535c
Showing 1 changed file with 3 additions and 8 deletions.
diff --git a/R/RLum-class.R b/R/RLum-class.R
@@ -86,16 +86,11 @@ setMethod(
   "replicate_RLum",
   "RLum",
   definition = function(object, times = NULL) {
-
     ##The case this is NULL
-    if (is.null(times)) {
+    if (is.null(times))
       times <- 1
-    }
-
-    lapply(1:times, function(x) {
-      object
-
-    })
 
+    ## replicate
+    lapply(1:times, function(x) object)
   }
 )