provide appropriate backup for the use of lm

+ toget rid of a note!
+ why are we using lm at all?! let's doe this!

NAMESPACE

@@ -17,4 +17,5 @@ importFrom(bsvars,compute_structural_shocks)
 importFrom(bsvars,compute_variance_decompositions)
 importFrom(bsvars,estimate)
 importFrom(bsvars,forecast)
+importFrom(stats,lm)
 useDynLib(bsvarSIGNs, .registration = TRUE)

R/bsvarSIGNs-package.R

@@ -16,6 +16,7 @@
 #' @import bsvars
 #' @import RcppArmadillo
 #' @import RcppProgress
+#' @importFrom stats lm
 #' @note This package is currently in active development. We give no
 #' warranty that anything here works.
 #' @author Xiaolei Wang \email{[email protected]} Tomasz Woźniak \email{[email protected]}

R/specify_bsvarSIGN.R

@@ -156,7 +156,7 @@ specify_prior_bsvarSIGN = R6::R6Class(
       Y      = data
       T      = nrow(Y)
       lambda = 0.2
-      psi    = sapply(1:N, \(i) summary(lm(Y[2:T, i] ~ Y[1:(T - 1), i]))$sigma^2)
+      psi    = sapply(1:N, \(i) summary(stats::lm(Y[2:T, i] ~ Y[1:(T - 1), i]))$sigma^2)
 
       hyper              = matrix(NA, N + 3, 1)
       hyper[3, ]         = lambda