From 23fbd4d959f4361ffdda0453d6b032bdbb7153e4 Mon Sep 17 00:00:00 2001 From: tappek <77916431+tappek@users.noreply.github.com> Date: Tue, 2 Jul 2024 22:36:00 +0200 Subject: [PATCH] round of test case .Rout.save file update due to typo fixes in comments and output adjustments as well as non-significant numerical diffs (new R version) --- inst/tests/test_fixef2.Rout.save | 12 ++++++--- .../test_groupGenerics_pseries.Rout.save | 12 ++++----- inst/tests/test_lag_lead.Rout.save | 12 ++++----- inst/tests/test_lagt_leadt.Rout.save | 10 +++---- inst/tests/test_misc.Rout.save | 26 ++++++++++++------- inst/tests/test_pcce_pmg.Rout.save | 24 ++++++++--------- inst/tests/test_pgmm.Rout.save | 10 +++---- inst/tests/test_pht.Rout.save | 20 ++++++++------ inst/tests/test_plmtest_unbalanced.Rout.save | 12 ++++----- 9 files changed, 76 insertions(+), 62 deletions(-) diff --git a/inst/tests/test_fixef2.Rout.save b/inst/tests/test_fixef2.Rout.save index 5d839989..6834c59f 100644 --- a/inst/tests/test_fixef2.Rout.save +++ b/inst/tests/test_fixef2.Rout.save @@ -1,7 +1,7 @@ -R version 4.1.2 (2021-11-01) -- "Bird Hippie" -Copyright (C) 2021 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -222,6 +222,10 @@ Loading required package: Matrix Attaching package: 'lfe' +The following object is masked from 'package:fixest': + + fepois + The following object is masked from 'package:plm': sargan @@ -757,4 +761,4 @@ The following object is masked from 'package:plm': > > proc.time() user system elapsed - 4.28 0.68 5.07 + 2.73 0.37 3.17 diff --git a/inst/tests/test_groupGenerics_pseries.Rout.save b/inst/tests/test_groupGenerics_pseries.Rout.save index f47a4ccf..dcfc3dc2 100644 --- a/inst/tests/test_groupGenerics_pseries.Rout.save +++ b/inst/tests/test_groupGenerics_pseries.Rout.save @@ -1,7 +1,7 @@ -R version 4.2.1 (2022-06-23 ucrt) -- "Funny-Looking Kid" -Copyright (C) 2022 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -136,7 +136,7 @@ F-statistic: 3064.81 on 4 and 764 DF, p-value: < 2.22e-16 > if (!isTRUE(all.equal(zz$coefficients, zz2$coefficients))) stop("estimation results not equal") > > -> ############# (3) assinging to a pdata.frame ############# +> ############# (3) assigning to a pdata.frame ############# > ## test for assigning by $<- to a pdata.frame > ## pre rev. 634: decimals which had been integers previously were converted to integers with typeof == integer > ## and gave wrong results. @@ -1090,7 +1090,7 @@ F-statistic: 3064.81 on 4 and 764 DF, p-value: < 2.22e-16 [1] "double" > > y2 <- y / 10 -> class(y2) # c("myclass", "interger") - not propagated to c("myclass", "numeric") +> class(y2) # c("myclass", "integer") - not propagated to c("myclass", "numeric") [1] "myclass" "integer" > mode(y2) [1] "numeric" @@ -1175,4 +1175,4 @@ attr(,"class") > > proc.time() user system elapsed - 1.64 0.18 1.82 + 1.45 0.26 1.70 diff --git a/inst/tests/test_lag_lead.Rout.save b/inst/tests/test_lag_lead.Rout.save index c2bf5f8f..0b25ac57 100644 --- a/inst/tests/test_lag_lead.Rout.save +++ b/inst/tests/test_lag_lead.Rout.save @@ -1,7 +1,7 @@ -R version 4.1.1 (2021-08-10) -- "Kick Things" -Copyright (C) 2021 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -175,7 +175,7 @@ Levels: 1 2 3 4 5 6 7 8 9 10 11 10 9 8 7 6 5 4 3 2 200 Levels: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 ... 200 > if (!(length(unique(Grunfeld$fac)) == 200)) stop("wrong factor values") # 200 -> if (!(length(unique(plm:::lagr.pseries(Grunfeld$fac))) == 191)) stop("plm:::lagr.pseries: wrong actually uniquely occuring factor values") # 191 +> if (!(length(unique(plm:::lagr.pseries(Grunfeld$fac))) == 191)) stop("plm:::lagr.pseries: wrong actually uniquely occurring factor values") # 191 > if (!(length(levels(plm:::lagr.pseries(Grunfeld$fac))) == 200)) stop("wrong factor levels") # 200 > > # plm::lead eliminates e.g., level "200" @@ -222,7 +222,7 @@ Levels: 1 2 3 4 5 6 7 8 9 10 9 8 7 6 5 4 3 2 1 200 Levels: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 ... 200 > if (!(length(unique(Grunfeld$fac)) == 200)) stop("wrong factor levels") # 200 -> if (!(length(unique(plm:::leadr.pseries(Grunfeld$fac))) == 191)) stop("plm:::leadr.pseries: wrong actually uniquely occuring factor values") # 191 +> if (!(length(unique(plm:::leadr.pseries(Grunfeld$fac))) == 191)) stop("plm:::leadr.pseries: wrong actually uniquely occurring factor values") # 191 > if (!(length(levels(plm:::leadr.pseries(Grunfeld$fac))) == 200)) stop("plm:::leadr.pseries: wrong factor levels") # 200 > > @@ -1199,4 +1199,4 @@ FALSE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE > > proc.time() user system elapsed - 3.67 0.42 4.26 + 1.59 0.17 1.75 diff --git a/inst/tests/test_lagt_leadt.Rout.save b/inst/tests/test_lagt_leadt.Rout.save index d03176f3..c10fe226 100644 --- a/inst/tests/test_lagt_leadt.Rout.save +++ b/inst/tests/test_lagt_leadt.Rout.save @@ -1,7 +1,7 @@ -R version 4.2.1 (2022-06-23 ucrt) -- "Funny-Looking Kid" -Copyright (C) 2022 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -176,7 +176,7 @@ Levels: 1 2 3 4 5 6 7 8 9 10 11 10 9 8 7 6 5 4 3 2 200 Levels: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 ... 200 > if (!(length(unique(Grunfeld$fac)) == 200)) stop("wrong factor levels") # 200 -> if (!(length(unique(lag(Grunfeld$fac))) == 191)) stop("wrong actually uniquely occuring factor levels") # 191 +> if (!(length(unique(lag(Grunfeld$fac))) == 191)) stop("wrong actually uniquely occurring factor levels") # 191 > if (!(length(levels(lag(Grunfeld$fac))) == 200)) stop("wrong factor levels") # 200 > > # lead eliminates e.g., level "200" @@ -1302,4 +1302,4 @@ In pdata.frame(dfNA) : > > proc.time() user system elapsed - 1.68 0.18 1.85 + 2.31 0.42 2.85 diff --git a/inst/tests/test_misc.Rout.save b/inst/tests/test_misc.Rout.save index 58f7071e..69f0cb50 100644 --- a/inst/tests/test_misc.Rout.save +++ b/inst/tests/test_misc.Rout.save @@ -1,7 +1,7 @@ -R version 4.2.2 (2022-10-31 ucrt) -- "Innocent and Trusting" -Copyright (C) 2022 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -1505,8 +1505,10 @@ Wald test for time dummies: chisq(7) = 14.71138 (p-value = 0.039882) + effect = "twoways", model = "twosteps", + gmm.inst = ~log(emp), lag.gmm = list(c(2,99))) Warning messages: -1: use of 'dynformula()' is deprecated, use a multi-part formula instead -2: use of 'dynformula()' is deprecated, use a multi-part formula instead +1: In dynformula(formula = log(emp) ~ log(wage) + log(capital) + log(output), : + use of 'dynformula()' is deprecated, use a multi-part formula instead +2: In dynformula(gmm.inst, lag.form = lag.gmm) : + use of 'dynformula()' is deprecated, use a multi-part formula instead > summary(z1, robust = FALSE) Twoways effects Two-steps model Difference GMM @@ -1546,8 +1548,10 @@ Wald test for time dummies: chisq(6) = 26.9045 (p-value = 0.0001509) + gmm.inst = ~log(emp) + log(wage) + log(capital), + lag.gmm = c(2,99), transformation = "ld") Warning messages: -1: use of 'dynformula()' is deprecated, use a multi-part formula instead -2: use of 'dynformula()' is deprecated, use a multi-part formula instead +1: In dynformula(log(emp) ~ log(wage) + log(capital), list(1, 1, 1)) : + use of 'dynformula()' is deprecated, use a multi-part formula instead +2: In dynformula(gmm.inst, lag.form = lag.gmm) : + use of 'dynformula()' is deprecated, use a multi-part formula instead > summary(z2, robust = TRUE) Twoways effects One-step model System GMM @@ -1588,7 +1592,8 @@ Wald test for time dummies: chisq(7) = 14.71138 (p-value = 0.039882) + sex + black + bluecol + south + smsa + ind, + data = Wages, model = "ht", index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(lwage ~ wks + south + smsa + married + exp + I(exp^2) + bluecol + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(ht) Oneway (individual) effect Hausman-Taylor Model (Hausman-Taylor estimator) @@ -1643,7 +1648,8 @@ Chisq: 6891.87 on 12 DF, p-value: < 2.22e-16 + sex + black + bluecol + south + smsa + ind, + data = Wages, model = "am", index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(lwage ~ wks + south + smsa + married + exp + I(exp^2) + bluecol + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(am) Oneway (individual) effect Hausman-Taylor Model (Amemiya-MaCurdy estimator) @@ -1885,4 +1891,4 @@ Coefficients: > > proc.time() user system elapsed - 13.39 0.75 14.37 + 10.04 0.75 10.76 diff --git a/inst/tests/test_pcce_pmg.Rout.save b/inst/tests/test_pcce_pmg.Rout.save index 460ebd49..981af712 100644 --- a/inst/tests/test_pcce_pmg.Rout.save +++ b/inst/tests/test_pcce_pmg.Rout.save @@ -1,7 +1,7 @@ -R version 4.3.0 (2023-04-21 ucrt) -- "Already Tomorrow" -Copyright (C) 2023 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -8332,10 +8332,10 @@ WYOMING-1986 -1.248207e-03 -1.020804e-01 -2.996379e-02 0.5683338321 > # vcovXX > vcovHC(pccemgmod) log(pcap) log(pc) log(emp) unemp -log(pcap) 1.438222e-15 -4.704070e-17 6.919599e-16 4.396291e-18 -log(pc) -4.698838e-17 1.597205e-18 -2.275796e-17 -1.447567e-19 -log(emp) 6.920293e-16 -2.290015e-17 3.337731e-16 2.122364e-18 -unemp 4.397651e-18 -1.461715e-19 2.123456e-18 1.351272e-20 +log(pcap) 1.438205e-15 -4.701335e-17 6.919188e-16 4.395993e-18 +log(pc) -4.697937e-17 1.584901e-18 -2.274286e-17 -1.447705e-19 +log(emp) 6.920185e-16 -2.274348e-17 3.338970e-16 2.123371e-18 +unemp 4.397136e-18 -1.446445e-19 2.123785e-18 1.351029e-20 attr(,"cluster") [1] "group" > vcovHC(pccepmod) @@ -8349,10 +8349,10 @@ attr(,"cluster") > > vcovHC(pccemgmod_unbal) log(pcap) log(pc) log(emp) unemp -log(pcap) 1.030052e-18 1.766303e-19 3.393092e-19 2.021816e-21 -log(pc) 1.999640e-19 2.295395e-20 5.191246e-20 -2.254747e-22 -log(emp) 2.777390e-19 6.198624e-20 1.329175e-19 1.476310e-21 -unemp 1.369783e-21 1.191913e-22 9.951117e-22 9.686219e-24 +log(pcap) 1.022578e-18 1.701106e-19 2.859291e-19 2.108684e-21 +log(pc) 1.675301e-19 3.376572e-20 6.811090e-20 5.342066e-22 +log(emp) 3.258246e-19 6.893985e-20 1.623706e-19 6.085322e-22 +unemp 2.501125e-21 8.002402e-23 9.226476e-22 -1.254200e-24 attr(,"cluster") [1] "group" > vcovHC(pccepmod_unbal) @@ -17118,4 +17118,4 @@ Multiple R-squared: 0.99982 > > proc.time() user system elapsed - 2.65 0.40 3.06 + 2.73 0.46 3.18 diff --git a/inst/tests/test_pgmm.Rout.save b/inst/tests/test_pgmm.Rout.save index 99213f60..9b7abfb2 100644 --- a/inst/tests/test_pgmm.Rout.save +++ b/inst/tests/test_pgmm.Rout.save @@ -1,7 +1,7 @@ -R version 4.3.0 (2023-04-21 ucrt) -- "Already Tomorrow" -Copyright (C) 2023 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -716,10 +716,10 @@ Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 Sargan test: chisq(27) = 28.86345 (p-value = 0.36755) Autocorrelation test (1): normal = -4.750024 (p-value = 2.0339e-06) Autocorrelation test (2): normal = 1.857129 (p-value = 0.063293) -Wald test for coefficients: chisq(26) = 6139.501 (p-value = < 2.22e-16) +Wald test for coefficients: chisq(26) = 6139.5 (p-value = < 2.22e-16) Warning message: In vcovHC.pgmm(object) : a general inverse is used > > proc.time() user system elapsed - 7.21 0.53 7.81 + 7.73 0.81 8.48 diff --git a/inst/tests/test_pht.Rout.save b/inst/tests/test_pht.Rout.save index 66c19a9d..39785bbd 100644 --- a/inst/tests/test_pht.Rout.save +++ b/inst/tests/test_pht.Rout.save @@ -1,7 +1,7 @@ -R version 4.2.0 (2022-04-22 ucrt) -- "Vigorous Calisthenics" -Copyright (C) 2022 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -25,7 +25,8 @@ Type 'q()' to quit R. + sex + black + bluecol + south + smsa + ind, + data = Wages, model = "ht", index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(lwage ~ wks + south + smsa + married + exp + I(exp^2) + bluecol + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(ht) Oneway (individual) effect Hausman-Taylor Model (Hausman-Taylor estimator) @@ -81,7 +82,8 @@ Chisq: 6891.87 on 12 DF, p-value: < 2.22e-16 + sex + black + bluecol + south + smsa + ind, + data = Wages, model = "am", index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(lwage ~ wks + south + smsa + married + exp + I(exp^2) + bluecol + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(ht2) Oneway (individual) effect Hausman-Taylor Model (Amemiya-MaCurdy estimator) @@ -136,7 +138,8 @@ Chisq: 6879.2 on 12 DF, p-value: < 2.22e-16 + sex + black + bluecol + south + smsa + ind, + data = Wages, model = "bms", index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(lwage ~ wks + south + smsa + married + exp + I(exp^2) + bluecol + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(ht3) Oneway (individual) effect Hausman-Taylor Model (Breusch-Mizon-Schmidt estimator) @@ -191,7 +194,8 @@ Chisq: 6467.37 on 12 DF, p-value: < 2.22e-16 + sex + black + bluecol + south + smsa + ind, model = "ht", + data = Wages, index = 595) Warning message: -uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator +In pht(formula = lwage ~ wks + south + smsa + married + exp + I(exp^2) + : + uses of 'pht()' and 'plm(., model = "ht")' are discouraged, better use 'plm(., model = "random", random.method = "ht", inst.method = "baltagi"/"am"/"bms")' for Hausman-Taylor, Amemiya-MaCurdy, and Breusch-Mizon-Schmidt estimator > summary(ht4) Oneway (individual) effect Hausman-Taylor Model (Hausman-Taylor estimator) @@ -417,4 +421,4 @@ Chisq: 6467.37 on 12 DF, p-value: < 2.22e-16 > > proc.time() user system elapsed - 2.85 0.43 3.21 + 3.03 0.29 3.34 diff --git a/inst/tests/test_plmtest_unbalanced.Rout.save b/inst/tests/test_plmtest_unbalanced.Rout.save index 4e7b445a..2493a101 100644 --- a/inst/tests/test_plmtest_unbalanced.Rout.save +++ b/inst/tests/test_plmtest_unbalanced.Rout.save @@ -1,7 +1,7 @@ -R version 4.2.0 (2022-04-22 ucrt) -- "Vigorous Calisthenics" -Copyright (C) 2022 The R Foundation for Statistical Computing -Platform: x86_64-w64-mingw32/x64 (64-bit) +R version 4.4.1 (2024-06-14 ucrt) -- "Race for Your Life" +Copyright (C) 2024 The R Foundation for Statistical Computing +Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. @@ -44,7 +44,7 @@ Type 'q()' to quit R. > # [...] > > ##### Grunfeld data set - balanced #### -> # Table 4.2 [Output from EViews], similiar to above table but with p-values +> # Table 4.2 [Output from EViews], similar to above table but with p-values > ##### EViews add-in BPTest for some older version of EViews needed: > ##### http://www.eviews.com/Addins/addins.shtml#addins > ##### http://forums.eviews.com/viewtopic.php?f=23&t=2228 @@ -628,7 +628,7 @@ chibarsq > # , data = pnlswork, model = "pooling") > # > # -> # # Reassembles Exmaple 1 in http://www.stata.com/manuals14/xtxtregpostestimation.pdf +> # # Reassembles Example 1 in http://www.stata.com/manuals14/xtxtregpostestimation.pdf > # # use modified plmtest() as a wrapper > # options(digits = 10) > # plmtest(plm_pool_nlswork, type="bp") @@ -642,4 +642,4 @@ chibarsq > > proc.time() user system elapsed - 1.82 0.23 2.04 + 2.09 0.25 2.31