replace faulty && by & in lav_object_inspect_vcov()

yrosseel · Nov 24, 2024 · 35337b1 · 35337b1
1 parent 84e9a91
commit 35337b1
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: lavaan
 Title: Latent Variable Analysis
-Version: 0.6-20.2237
+Version: 0.6-20.2240
 Authors@R: c(person(given   = "Yves", family = "Rosseel",
                     role    = c("aut", "cre"),
                     email   = "[email protected]",

diff --git a/R/lav_object_inspect.R b/R/lav_object_inspect.R
@@ -2655,7 +2655,7 @@ lav_object_inspect_vcov <- function(object, standardized = FALSE,
     if (free.only) {
       if (.hasSlot(object@Model, "ceq.simple.only") &&
         object@Model@ceq.simple.only) {
-        free.idx <- which(object@ParTable$free > 0L &&
+        free.idx <- which(object@ParTable$free > 0L &
           !duplicated(object@ParTable$free))
       } else {
         free.idx <- which(object@ParTable$free > 0L)