[Splm-commits] r227 - in pkg: . R

[noreply at r-forge.r-project.org]

Author: rsbivand
Date: 2021-03-16 10:20:02 +0100 (Tue, 16 Mar 2021)
New Revision: 227

Modified:
   pkg/DESCRIPTION
   pkg/NAMESPACE
   pkg/R/impacts.splm.R
Log:
spatialreg class name changes: gmsar -> Gmsar

Modified: pkg/DESCRIPTION
===================================================================
--- pkg/DESCRIPTION	2020-05-04 18:58:50 UTC (rev 226)
+++ pkg/DESCRIPTION	2021-03-16 09:20:02 UTC (rev 227)
@@ -10,6 +10,6 @@
 Maintainer: Giovanni Millo <giovanni.millo at generali.com>
 Description: ML and GM estimation and diagnostic testing of econometric models for spatial panel data.
 Depends: R (>= 2.12.0)
-Imports: plm, maxLik, MASS, bdsmatrix, ibdreg, nlme, Matrix, spam, methods, spatialreg, spdep
+Imports: plm, maxLik, MASS, bdsmatrix, ibdreg, nlme, Matrix, spam, methods, spatialreg (>= 1.1-7), spdep
 License: GPL-2
 LazyLoad: yes

Modified: pkg/NAMESPACE
===================================================================
--- pkg/NAMESPACE	2020-05-04 18:58:50 UTC (rev 226)
+++ pkg/NAMESPACE	2021-03-16 09:20:02 UTC (rev 227)
@@ -12,7 +12,7 @@
 importFrom(plm, pdim)
 importFrom(nlme, fdHess, lme)
 import(spdep, except=c(do_ldet, eigen_setup, trW, impacts.gmsar, impacts))
-importFrom(spatialreg, do_ldet, eigen_setup, trW, impacts.gmsar, impacts)
+importFrom(spatialreg, do_ldet, eigen_setup, trW, impacts)
 importFrom(ibdreg, pchibar)
 import(Matrix)
 importFrom(spam, as.spam, diag.spam, solve.spam, t.spam, determinant.spam)

Modified: pkg/R/impacts.splm.R
===================================================================
--- pkg/R/impacts.splm.R	2020-05-04 18:58:50 UTC (rev 226)
+++ pkg/R/impacts.splm.R	2021-03-16 09:20:02 UTC (rev 227)
@@ -21,7 +21,7 @@
 	
 	if(obj$type == "fixed effects lag"){
 		
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 obj$data <- as.vector(obj$model)
 obj$s2 <- obj$sigma2
@@ -32,7 +32,7 @@
 	
 	if(obj$type == "fixed effects sarar"){
 
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 rho <- obj$coefficients[2]
 obj$coefficients <- obj$coefficients[-2]
@@ -48,7 +48,7 @@
 	if(obj$type == "random effects ML")	{
 
 if(!is.null(obj$arcoef)) {
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 
 obj$coefficients <- c(obj$arcoef, obj$coefficients)
@@ -68,7 +68,7 @@
 		
 		if(is.null(obj$endog)) {
 obj$secstep_var <- vcov(obj)			
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 obj$data <- as.vector(obj$model)
 obj$s2 <- obj$sigma2
@@ -86,7 +86,7 @@
 	
 		if(is.null(obj$endog)) {
 
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 obj$secstep_var <- obj$var			
 obj$data <- as.vector(obj$model)
@@ -108,7 +108,7 @@
 	
 		if(is.null(obj$endog)) {
 
-class(obj)<- "gmsar"	
+class(obj)<- "Gmsar"	
 obj$type <- "SARAR"
 obj$secstep_var <- obj$vcov			
 obj$data <- as.vector(obj$model)
@@ -131,4 +131,4 @@
 	
 return(imp)	
 	
-}
\ No newline at end of file
+}