use do.call(rbind, dots) in turtleSet()

reverts the change in `turtleSet()` to use `rbind` instead of `rbind.agentMatrix` (with #50).

also note that the `do.call` construction doesn't need the `lapply(dots, function(x) x)` because `dots` is already a list, so extracting the elements only to put them back in a list seems redundant.

DESCRIPTION

@@ -32,8 +32,8 @@ URL:
     https://netlogor.predictiveecology.org,
     https://github.com/PredictiveEcology/NetLogoR/,
     https://groups.google.com/g/netlogor
-Version: 1.0.5.9000
-Date: 2024-04-25
+Version: 1.0.5.9001
+Date: 2024-04-26
 Authors@R: c(
     person("Sarah", "Bauduin", email = "sarahbauduin@hotmail.fr",
            role = c("aut"), comment = c(ORCID = "0000-0002-3252-5894")),

R/turtle-functions.R

@@ -2679,7 +2679,7 @@ setMethod(
       }
 
       # if (do.call(all.equal, lapply(dots, colnames))) {
-      allTurtles <- do.call(rbind.agentMatrix, lapply(dots, function(x) x))
+      allTurtles <- do.call(rbind, dots)
       # } else {
       #   allTurtles <- as.data.frame(rbindlist(lapply(dots, function(x) {
       #     inspect(x, who = of(agents = x, var = "who"))}), fill = TRUE))