From 3333e7ca6e132c5b67ab8b096291616b3c848715 Mon Sep 17 00:00:00 2001
From: Julian Sagebiel <julian.sagebiel@idiv.de>
Date: Tue, 8 Oct 2024 22:53:41 +0200
Subject: [PATCH] small change in perl = TRUE
---
R/subcoef.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/R/subcoef.R b/R/subcoef.R
index 9afdd7a..d8a996c 100644
--- a/R/subcoef.R
+++ b/R/subcoef.R
@@ -22,7 +22,7 @@
#' }
subcoef <- function(condition, mname){
- sub <- grep(condition,methods::slot(mname,"coef.names"))
+ sub <- grep(condition,methods::slot(mname,"coef.names"),perl = TRUE)
for (ele in c("coef.names","coef","se","pvalues")) {
elements<- methods::slot(mname,ele)[sub]
--
GitLab