R Under development (unstable) (2024-02-26 r85990 ucrt) -- "Unsuffered Consequences" 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. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > ############################################################### > > #### Test TSdata methods > > ############################################################### > > Sys.getenv("R_LIBS") [1] "D:\\temp\\RtmpSiT7bA\\RLIBS_308482ef76f4" > library() > > require("dse") Loading required package: dse Loading required package: tfplot Loading required package: tframe Attaching package: 'dse' The following objects are masked from 'package:stats': acf, simulate > search() [1] ".GlobalEnv" "package:dse" "package:tfplot" [4] "package:tframe" "package:stats" "package:graphics" [7] "package:grDevices" "package:utils" "package:datasets" [10] "package:methods" "Autoloads" "package:base" > > Sys.info() sysname release version nodename machine "Windows" "Server x64" "build 20348" "CRANWIN3" "x86-64" login user effective_user "CRAN" "CRAN" "CRAN" > DSEversion() setRNG tframe dse "2024.2-1" "2015.12-1.1" "2024.2-2" > > ############################################################### > all.ok <- TRUE > > cat("TSdataTests test 1 ...\n") TSdataTests test 1 ... > z <- TSdata(output=matrix(rnorm(300), 100,3)) > nseriesOutput(z); ok <- nseriesOutput(z) == 3 [1] 3 > nseriesInput(z); ok <- ok & nseriesInput(z) == 0 [1] 0 > Tobs(outputData(z)); ok <- ok & Tobs(outputData(z)) == 100 [1] 100 > start(outputData(z)); ok <- ok & all(start(outputData(z)) == c(1,1)) [1] 1 1 > end(outputData(z)); ok <- ok & all(end(outputData(z)) == c(100,1)) [1] 100 1 > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test 2 ...\n") TSdataTests test 2 ... > z <- TSdata(output=matrix(rnorm(300), 100,3), input=matrix(rnorm(200), 100,2)) > nseriesInput(z); ok <- ok & nseriesInput(z) == 2 [1] 2 > nseriesOutput(z); ok <- nseriesOutput(z) == 3 [1] 3 > Tobs(inputData(z)); ok <- ok & Tobs(inputData(z)) == 100 [1] 100 > Tobs(outputData(z)); ok <- ok & Tobs(outputData(z)) == 100 [1] 100 > start(inputData(z)); ok <- ok & all(start(inputData(z)) == c(1,1)) [1] 1 1 > start(outputData(z)); ok <- ok & all(start(outputData(z)) == c(1,1)) [1] 1 1 > end(inputData(z)); ok <- ok & all(end(inputData(z)) == c(100,1)) [1] 100 1 > end(outputData(z)); ok <- ok & all(end(outputData(z)) == c(100,1)) [1] 100 1 > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test 3 ...\n") TSdataTests test 3 ... > z <- TSdata(output=matrix(rnorm(300), 100,3), input=rnorm(200)) > nseriesInput(z); ok <- ok & nseriesInput(z) == 1 [1] 1 > nseriesOutput(z); ok <- nseriesOutput(z) == 3 [1] 3 > Tobs(inputData(z)); ok <- ok & Tobs(inputData(z)) == 200 [1] 200 > Tobs(outputData(z)); ok <- ok & Tobs(outputData(z)) == 100 [1] 100 > start(inputData(z)); ok <- ok & all(start(inputData(z)) == c(1,1)) [1] 1 1 > start(outputData(z)); ok <- ok & all(start(outputData(z)) == c(1,1)) [1] 1 1 > end(inputData(z)); ok <- ok & all(end(inputData(z)) == c(200,1)) [1] 200 1 > end(outputData(z)); ok <- ok & all(end(outputData(z)) == c(100,1)) [1] 100 1 > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test 4 ...\n") TSdataTests test 4 ... > z <- TSdata(output=ts(matrix(rnorm(300), 100,3), start=c(1976,1), frequency=12), + input=ts(rnorm(200), start=c(1976,1), frequency=12)) > nseries(inputData(z)); ok <- nseries(inputData(z)) == 1 [1] 1 > nseries(outputData(z)); ok <- ok & nseries(outputData(z)) == 3 [1] 3 > nseriesInput(z); ok <- ok & nseriesInput(z) == nseries(inputData(z)) [1] 1 > nseriesOutput(z); ok <- ok & nseriesOutput(z) == nseries(outputData(z)) [1] 3 > Tobs(inputData(z)); ok <- ok & Tobs(inputData(z)) == 200 [1] 200 > Tobs(outputData(z)); ok <- ok & Tobs(outputData(z)) == 100 [1] 100 > TobsInput(z); ok <- ok & Tobs(inputData(z)) == TobsInput(z) [1] 200 > TobsOutput(z); ok <- ok & Tobs(outputData(z)) == TobsOutput(z) [1] 100 > frequency(inputData(z)); ok <- ok & frequency(inputData(z)) == 12 [1] 12 > frequency(outputData(z)); ok <- ok & frequency(outputData(z)) == 12 [1] 12 > frequencyInput(z); ok <- ok & frequency(inputData(z)) == frequencyInput(z) [1] 12 > frequencyOutput(z); ok <- ok & frequency(outputData(z)) == frequencyOutput(z) [1] 12 > start(inputData(z)); ok <- ok & all(start(inputData(z)) == c(1976,1)) [1] 1976 1 > start(outputData(z)); ok <- ok & all(start(outputData(z)) == c(1976,1)) [1] 1976 1 > startInput(z); ok <- ok & all(start(inputData(z)) == startInput(z)) [1] 1976 1 > startOutput(z); ok <- ok & all(start(outputData(z)) == startOutput(z)) [1] 1976 1 > end(inputData(z)); ok <- ok & all(end(inputData(z)) == c(1992,8)) [1] 1992 8 > end(outputData(z)); ok <- ok & all(end(outputData(z)) == c(1984,4)) [1] 1984 4 > endInput(z); ok <- ok & all(end(inputData(z)) == endInput(z)) [1] 1992 8 > endOutput(z); ok <- ok & all(end(outputData(z)) == endOutput(z)) [1] 1984 4 > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test 5 ...\n") TSdataTests test 5 ... > z <- TSdata(output=ts(matrix(rnorm(300), 100,3), start=c(1976,1), frequency=4), + input=ts(rnorm(200), start=c(1976,1), frequency=4)) > nseries(inputData(z)); ok <- nseries(inputData(z)) == 1 [1] 1 > nseries(outputData(z)); ok <- ok & nseries(outputData(z)) == 3 [1] 3 > nseriesInput(z); ok <- ok & nseriesInput(z) == nseries(inputData(z)) [1] 1 > nseriesOutput(z); ok <- ok & nseriesOutput(z) == nseries(outputData(z)) [1] 3 > Tobs(inputData(z)); ok <- ok & Tobs(inputData(z)) == 200 [1] 200 > Tobs(outputData(z)); ok <- ok & Tobs(outputData(z)) == 100 [1] 100 > TobsInput(z); ok <- ok & Tobs(inputData(z)) == TobsInput(z) [1] 200 > TobsOutput(z); ok <- ok & Tobs(outputData(z)) == TobsOutput(z) [1] 100 > frequency(inputData(z)); ok <- ok & frequency(inputData(z)) == 4 [1] 4 > frequency(outputData(z)); ok <- ok & frequency(outputData(z)) == 4 [1] 4 > frequencyInput(z); ok <- ok & frequency(inputData(z)) == frequencyInput(z) [1] 4 > frequencyOutput(z); ok <- ok & frequency(outputData(z)) == frequencyOutput(z) [1] 4 > start(inputData(z)); ok <- ok & all(start(inputData(z)) == c(1976,1)) [1] 1976 1 > start(outputData(z)); ok <- ok & all(start(outputData(z)) == c(1976,1)) [1] 1976 1 > startInput(z); ok <- ok & all(start(inputData(z)) == startInput(z)) [1] 1976 1 > startOutput(z); ok <- ok & all(start(outputData(z)) == startOutput(z)) [1] 1976 1 > end(inputData(z)); ok <- ok & all(end(inputData(z)) == c(2025,4)) [1] 2025 4 > end(outputData(z)); ok <- ok & all(end(outputData(z)) == c(2000,4)) [1] 2000 4 > endInput(z); ok <- ok & all(end(inputData(z)) == endInput(z)) [1] 2025 4 > endOutput(z); ok <- ok & all(end(outputData(z)) == endOutput(z)) [1] 2000 4 > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test 6 ...\n") TSdataTests test 6 ... > zz <- TSdata(output=ts(matrix(rnorm(600), 200,3), start=c(1976,1), frequency=4), + input=ts(rnorm(100), start=c(1976,1), frequency=4)) > inputData(zz) <- inputData(z) > outputData(zz) <- outputData(z) > ok <- testEqual(z,zz) > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test eg 1 ...\n") TSdataTests test eg 1 ... > data("eg1.DSE.data", package="dse") > if (!is.TSdata(eg1.DSE.data)) { + cat("example data not found.") + ok <- FALSE + } > if (!ok) {cat("ERROR in this test.") ; all.ok <- FALSE } > > cat("TSdataTests test eg 2 ...\n") TSdataTests test eg 2 ... > # there will only be an error indicated if these fail to work > summary(eg1.DSE.data) start: 1961 3 end: 1991 6 Frequency: 12 sample length = 364 number of outputs= 3 number of inputs= 1 average : d.M1 d.GDPl2 d.CPI inputData(object) 1.921715e+04 3.294713e+05 5.871484e+01 8.592885e+00 max : d.M1 d.GDPl2 d.CPI inputData(object) 40371.0 512519.0 126.4 22.2 min : d.M1 d.GDPl2 d.CPI inputData(object) 5390.00 151803.60 23.90 2.85 > print(eg1.DSE.data) input data: Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec 1961 3.78 3.53 3.78 3.28 3.02 3.28 3.11 3.02 2.85 3.45 1962 3.53 3.53 3.32 3.41 3.61 5.28 5.75 5.58 5.40 4.55 4.30 4.35 1963 4.17 4.21 4.08 3.74 3.53 3.66 4.00 4.23 3.96 4.00 4.21 4.34 1964 4.04 4.12 4.17 4.04 4.04 3.96 4.08 4.29 4.34 4.38 4.34 4.59 1965 4.47 4.38 4.43 4.59 4.73 4.81 4.99 5.25 5.22 5.50 5.76 6.09 1966 6.04 6.02 6.07 6.04 6.12 6.28 6.35 6.35 6.40 6.43 6.49 6.63 1967 6.37 5.94 5.39 4.89 5.27 5.54 5.59 5.65 5.95 6.50 6.50 6.57 1968 6.61 6.92 7.39 7.25 7.39 7.20 6.88 6.53 6.19 6.42 6.44 6.65 1969 6.89 6.85 7.04 7.08 7.13 7.82 8.17 8.37 8.43 8.56 8.67 9.17 1970 8.84 8.59 7.89 7.70 7.88 7.31 7.76 7.58 6.68 6.76 5.53 5.58 1971 5.61 5.08 3.53 3.83 4.09 3.98 4.51 4.61 4.99 4.98 4.60 4.32 1972 4.00 4.86 5.51 5.88 6.10 5.16 4.68 4.85 5.01 5.04 4.98 5.15 1973 5.08 4.92 5.24 6.00 6.48 7.40 7.77 8.65 8.95 9.50 9.20 10.25 1974 8.94 8.94 9.20 11.04 11.57 11.70 11.57 11.84 11.04 10.25 9.73 10.25 1975 7.12 6.61 6.86 7.64 7.12 7.25 7.64 8.55 8.94 8.81 9.34 9.34 1976 8.94 8.94 9.99 9.73 9.20 9.20 9.34 9.34 9.47 9.07 8.68 8.16 1977 8.16 7.77 7.77 7.64 7.12 6.99 7.25 7.51 7.25 7.51 7.51 7.23 1978 7.23 7.28 7.85 8.32 8.37 8.32 8.63 9.10 9.41 10.04 10.67 10.78 1979 11.10 10.99 11.31 11.20 11.15 11.15 11.55 11.85 12.00 14.65 13.70 14.20 1980 13.95 13.95 15.25 15.45 12.00 11.50 10.60 10.65 10.90 12.35 13.50 17.75 1981 17.25 17.15 17.00 17.50 19.00 19.20 21.25 22.20 19.60 18.80 15.40 15.65 1982 14.90 15.00 16.15 15.50 15.60 17.05 15.65 14.20 13.10 11.45 10.95 10.25 1983 10.05 9.50 9.30 9.30 9.35 9.30 9.35 9.35 9.30 9.30 9.50 9.85 1984 9.80 9.85 10.60 10.75 11.50 12.10 12.95 12.25 12.15 11.60 10.70 10.00 1985 9.55 11.30 10.70 9.85 9.65 9.50 9.15 9.05 8.90 8.65 9.00 9.40 1986 10.75 11.60 10.75 9.00 8.55 8.65 8.55 8.45 8.40 8.50 8.35 8.35 1987 7.45 7.40 6.90 8.15 8.30 8.45 9.20 9.15 9.55 8.50 8.70 8.90 1988 8.65 8.55 8.65 9.00 9.10 9.30 9.50 10.15 10.50 10.40 11.00 11.10 1989 11.40 11.70 12.35 12.55 12.42 12.25 12.25 12.30 12.32 12.31 12.34 12.35 1990 12.60 13.45 13.41 13.70 13.97 13.73 13.47 12.95 12.52 12.56 12.22 11.73 1991 10.72 10.00 9.85 9.50 8.94 8.77 output data: M1 GDPl2 CPI Mar 1961 5477 151804.1 24.0 Apr 1961 5390 152434.4 23.9 May 1961 5417 151803.6 23.9 Jun 1961 5432 153956.1 23.9 Jul 1961 5500 154522.5 23.9 Aug 1961 5596 156889.6 23.9 Sep 1961 5557 156394.7 23.9 Oct 1961 5565 159796.6 23.9 Nov 1961 5667 158874.3 23.9 Dec 1961 5684 160006.6 24.0 Jan 1962 5628 160252.4 24.0 Feb 1962 5638 160396.2 24.0 Mar 1962 5627 163069.0 24.1 Apr 1962 5637 163745.2 24.1 May 1962 5663 165701.7 24.1 Jun 1962 5656 165314.8 24.2 Jul 1962 5612 166877.5 24.2 Aug 1962 5595 167587.2 24.3 Sep 1962 5721 169487.9 24.3 Oct 1962 5810 168399.6 24.3 Nov 1962 5828 169630.2 24.3 Dec 1962 5901 170261.9 24.4 Jan 1963 5891 170672.1 24.4 Feb 1963 5883 170126.3 24.5 Mar 1963 5891 171161.6 24.5 Apr 1963 6001 172141.1 24.5 May 1963 6102 173261.9 24.5 Jun 1963 6051 173615.8 24.6 Jul 1963 6088 175528.5 24.6 Aug 1963 6029 177076.1 24.7 Sep 1963 6091 176401.2 24.7 Oct 1963 6096 177184.9 24.7 Nov 1963 6107 180752.6 24.7 Dec 1963 6113 181497.4 24.8 Jan 1964 6217 182124.5 24.8 Feb 1964 6201 184328.5 24.9 Mar 1964 6295 184224.6 25.0 Apr 1964 6305 186186.3 25.0 May 1964 6320 187006.7 25.0 Jun 1964 6355 186438.8 25.0 Jul 1964 6337 187881.4 25.1 Aug 1964 6360 188247.4 25.1 Sep 1964 6355 189440.4 25.1 Oct 1964 6390 190073.8 25.1 Nov 1964 6385 192544.5 25.2 Dec 1964 6503 192258.0 25.3 Jan 1965 6489 193205.3 25.4 Feb 1965 6525 195805.1 25.4 Mar 1965 6583 197362.7 25.5 Apr 1965 6643 197322.3 25.5 May 1965 6680 199157.7 25.6 Jun 1965 6765 200376.6 25.7 Jul 1965 6800 198970.0 25.8 Aug 1965 6905 200651.7 25.7 Sep 1965 6820 203900.4 25.7 Oct 1965 6810 203692.0 25.8 Nov 1965 6894 205404.9 25.9 Dec 1965 6930 207995.8 26.0 Jan 1966 6965 209350.4 26.1 Feb 1966 7048 211378.6 26.3 Mar 1966 7097 212127.7 26.4 Apr 1966 7121 214081.1 26.5 May 1966 7175 215397.5 26.6 Jun 1966 7156 215696.4 26.6 Jul 1966 7193 215720.0 26.6 Aug 1966 7215 216677.3 26.7 Sep 1966 7251 217433.3 26.9 Oct 1966 7356 216584.8 26.9 Nov 1966 7457 218415.3 26.9 Dec 1966 7472 220090.7 27.0 Jan 1967 7550 219361.6 27.0 Feb 1967 7723 219659.0 27.1 Mar 1967 7830 220089.4 27.2 Apr 1967 7880 217765.3 27.3 May 1967 7907 218467.1 27.4 Jun 1967 7879 221457.7 27.5 Jul 1967 7894 223120.3 27.7 Aug 1967 7863 223344.5 27.8 Sep 1967 8019 223878.6 27.9 Oct 1967 8156 225638.0 27.9 Nov 1967 8046 225397.4 28.0 Dec 1967 8035 225386.2 28.1 Jan 1968 8100 226359.5 28.3 Feb 1968 8076 226876.8 28.3 Mar 1968 7978 228171.8 28.4 Apr 1968 8033 228305.3 28.5 May 1968 8033 229622.2 28.5 Jun 1968 8038 231962.0 28.6 Jul 1968 8219 234597.0 28.7 Aug 1968 8464 235753.6 28.8 Sep 1968 8443 235782.5 28.9 Oct 1968 8474 238135.6 29.1 Nov 1968 8568 238688.3 29.2 Dec 1968 8605 239696.0 29.3 Jan 1969 8751 241521.6 29.4 Feb 1969 8678 241511.6 29.4 Mar 1969 8772 242927.6 29.5 Apr 1969 8866 246727.4 29.7 May 1969 8965 249198.0 29.9 Jun 1969 8914 248343.7 30.1 Jul 1969 8876 246029.6 30.1 Aug 1969 8760 247857.0 30.2 Sep 1969 8820 248523.0 30.3 Oct 1969 8919 247899.8 30.4 Nov 1969 8843 249954.1 30.5 Dec 1969 8864 249104.7 30.6 Jan 1970 8842 250655.6 30.7 Feb 1970 8940 252492.3 30.8 Mar 1970 8989 251194.6 30.9 Apr 1970 8973 252789.1 31.0 May 1970 8928 251578.2 31.0 Jun 1970 8964 250568.3 31.1 Jul 1970 9084 251584.8 31.1 Aug 1970 9105 251481.6 31.0 Sep 1970 9086 251800.1 31.1 Oct 1970 9172 251943.1 31.2 Nov 1970 9253 252588.3 31.2 Dec 1970 9351 252569.4 31.1 Jan 1971 9434 254343.6 31.1 Feb 1971 9606 255143.3 31.3 Mar 1971 9787 257953.5 31.4 Apr 1971 9834 259547.6 31.6 May 1971 10049 260593.0 31.7 Jun 1971 10245 261396.9 31.8 Jul 1971 10204 264634.1 32.0 Aug 1971 10432 266990.5 32.1 Sep 1971 10595 267688.7 32.2 Oct 1971 10630 271684.7 32.3 Nov 1971 10843 272672.0 32.4 Dec 1971 10988 273968.5 32.6 Jan 1972 11007 273220.0 32.7 Feb 1972 11087 274365.7 32.8 Mar 1972 11212 274109.5 32.9 Apr 1972 11301 273072.8 33.0 May 1972 11376 275033.3 33.1 Jun 1972 11512 277850.7 33.1 Jul 1972 11652 278882.7 33.5 Aug 1972 11807 281780.6 33.6 Sep 1972 12020 282379.8 33.9 Oct 1972 12241 283566.5 33.9 Nov 1972 12436 286979.2 34.0 Dec 1972 12538 289362.9 34.3 Jan 1973 12723 290960.8 34.5 Feb 1973 12822 292135.6 34.8 Mar 1973 12862 294800.6 34.9 Apr 1973 13133 299037.0 35.3 May 1973 13293 302588.1 35.4 Jun 1973 13286 302504.1 35.8 Jul 1973 13568 302292.2 36.0 Aug 1973 13584 302601.8 36.3 Sep 1973 13740 306611.4 36.8 Oct 1973 13865 302073.4 36.9 Nov 1973 13891 305942.4 37.2 Dec 1973 13958 309404.8 37.5 Jan 1974 14132 311823.8 38.6 Feb 1974 14191 313240.3 39.0 Mar 1974 14361 314655.7 39.4 Apr 1974 14891 315966.5 39.8 May 1974 15138 316847.9 40.4 Jun 1974 14734 312942.5 40.9 Jul 1974 14649 316307.0 41.1 Aug 1974 14628 315542.0 41.5 Sep 1974 14696 315264.3 41.9 Oct 1974 14660 316419.1 42.2 Nov 1974 14746 315315.4 42.7 Dec 1974 14820 316710.6 43.1 Jan 1975 15185 315459.2 43.4 Feb 1975 15632 316015.9 43.7 Mar 1975 16118 314610.5 43.9 Apr 1975 16075 315920.5 44.1 May 1975 16231 312749.6 44.4 Jun 1975 16423 316333.3 44.9 Jul 1975 16592 316233.2 45.4 Aug 1975 16905 318346.6 45.9 Sep 1975 17051 321701.7 46.1 Oct 1975 17269 321276.1 46.4 Nov 1975 18253 323419.5 46.8 Dec 1975 18058 322513.2 47.0 Jan 1976 17663 325613.3 47.4 Feb 1976 17800 331699.0 47.5 Mar 1976 17666 330063.5 47.8 Apr 1976 17714 331747.3 48.1 May 1976 17790 335458.0 48.3 Jun 1976 17922 339228.2 48.5 Jul 1976 18014 340983.1 48.7 Aug 1976 18155 339803.9 48.9 Sep 1976 18169 340732.9 49.2 Oct 1976 18244 341960.6 49.5 Nov 1976 18405 341624.4 49.7 Dec 1976 18346 340844.2 49.9 Jan 1977 18579 343872.5 50.4 Feb 1977 18699 344696.9 50.8 Mar 1977 19040 347080.6 51.2 Apr 1977 19134 347101.7 51.5 May 1977 19325 347891.6 51.8 Jun 1977 19599 347343.7 52.1 Jul 1977 19567 348921.8 52.4 Aug 1977 19679 350473.7 52.7 Sep 1977 19832 350477.9 53.0 Oct 1977 19944 352140.7 53.4 Nov 1977 20168 351042.9 53.6 Dec 1977 20543 352735.0 54.0 Jan 1978 20658 353169.9 54.2 Feb 1978 20704 353366.5 54.5 Mar 1978 20712 353102.5 54.9 Apr 1978 20873 356658.2 55.0 May 1978 21110 355149.0 55.5 Jun 1978 21358 360209.5 55.8 Jul 1978 21518 358186.6 56.4 Aug 1978 21663 360454.3 56.6 Sep 1978 21904 359307.8 56.6 Oct 1978 22379 360898.4 57.2 Nov 1978 22643 366090.4 57.6 Dec 1978 22193 365093.3 57.9 Jan 1979 22104 367751.6 58.4 Feb 1979 22361 370034.4 58.9 Mar 1979 22078 369654.4 59.5 Apr 1979 22403 369639.8 60.0 May 1979 22887 372351.2 60.5 Jun 1979 23245 370749.7 60.7 Jul 1979 23345 373096.0 61.2 Aug 1979 23476 375139.3 61.5 Sep 1979 23607 376891.8 62.1 Oct 1979 23657 378284.5 62.5 Nov 1979 23616 378802.3 63.0 Dec 1979 23018 379079.9 63.5 Jan 1980 23708 378471.6 64.0 Feb 1980 23793 379181.0 64.5 Mar 1980 23947 379800.5 65.0 Apr 1980 23668 376801.5 65.5 May 1980 23601 378993.8 66.2 Jun 1980 23608 379332.1 66.9 Jul 1980 24134 377449.8 67.3 Aug 1980 24495 376542.7 68.1 Sep 1980 25001 379841.6 68.7 Oct 1980 25574 379674.1 69.3 Nov 1980 26008 383215.7 70.1 Dec 1980 25347 388912.2 70.7 Jan 1981 25285 390708.4 71.7 Feb 1981 25254 392629.1 72.3 Mar 1981 25452 395279.4 73.1 Apr 1981 25758 396998.9 73.8 May 1981 25592 396979.1 74.4 Jun 1981 25164 402528.4 75.4 Jul 1981 26207 399955.4 76.0 Aug 1981 25298 400379.7 76.7 Sep 1981 24684 399170.8 77.3 Oct 1981 24570 393443.8 78.1 Nov 1981 24171 398083.9 78.6 Dec 1981 25549 395352.2 79.2 Jan 1982 25409 393648.0 79.8 Feb 1982 25013 393256.9 80.7 Mar 1982 24834 389172.8 81.5 Apr 1982 25010 390234.4 82.0 May 1982 25450 387912.5 83.1 Jun 1982 25344 384114.5 83.8 Jul 1982 25191 384660.4 84.2 Aug 1982 24662 381362.4 84.7 Sep 1982 25000 378857.1 85.2 Oct 1982 25121 380438.0 85.7 Nov 1982 25283 380941.3 86.3 Dec 1982 26254 375500.7 86.6 Jan 1983 26371 378452.3 86.5 Feb 1983 26909 379252.4 86.7 Mar 1983 26986 383239.6 87.4 Apr 1983 27222 383829.5 87.4 May 1983 27282 386328.5 87.6 Jun 1983 27759 389052.6 88.5 Jul 1983 28226 392072.8 88.9 Aug 1983 28383 398178.9 89.4 Sep 1983 28587 396140.3 89.5 Oct 1983 28257 399618.8 89.9 Nov 1983 28439 402856.8 90.0 Dec 1983 28549 399769.5 90.5 Jan 1984 28542 402356.1 91.1 Feb 1984 28727 406497.9 91.4 Mar 1984 28919 408049.1 91.4 Apr 1984 29119 407651.4 91.7 May 1984 28983 410904.7 91.8 Jun 1984 28915 415188.0 92.2 Jul 1984 28694 418057.4 92.6 Aug 1984 28322 419676.8 92.7 Sep 1984 28473 420916.6 92.9 Oct 1984 28744 423389.9 92.9 Nov 1984 28568 421920.2 93.6 Dec 1984 28702 425739.6 93.9 Jan 1985 29000 427081.7 94.4 Feb 1985 28842 426023.7 94.7 Mar 1985 29184 428856.6 94.9 Apr 1985 29066 431469.0 95.3 May 1985 29536 434364.9 95.4 Jun 1985 29659 430698.8 96.0 Jul 1985 29775 435144.6 96.2 Aug 1985 30353 435578.0 96.4 Sep 1985 30511 437076.8 96.7 Oct 1985 30710 439510.8 96.8 Nov 1985 30933 441525.6 97.3 Dec 1985 31533 446523.6 98.0 Jan 1986 30936 450030.9 98.4 Feb 1986 30603 450620.5 98.6 Mar 1986 30694 452171.9 98.9 Apr 1986 30051 452319.9 99.0 May 1986 30586 448237.5 99.3 Jun 1986 30904 451660.4 99.5 Jul 1986 31341 450028.0 100.2 Aug 1986 31431 451053.3 100.5 Sep 1986 31963 452796.2 100.7 Oct 1986 32249 452004.2 101.1 Nov 1986 32945 453374.3 101.7 Dec 1986 33182 451928.7 102.1 Jan 1987 33383 451114.2 102.3 Feb 1987 34289 455387.1 102.6 Mar 1987 34127 456894.1 103.1 Apr 1987 35516 462013.1 103.5 May 1987 35864 463901.8 103.8 Jun 1987 36149 465436.8 104.2 Jul 1987 35847 465835.5 105.0 Aug 1987 35924 469037.0 105.1 Sep 1987 36066 473405.2 105.3 Oct 1987 36425 474365.7 105.5 Nov 1987 36500 477599.9 106.0 Dec 1987 36009 479352.7 106.3 Jan 1988 36305 481524.6 106.5 Feb 1988 36379 482015.7 106.8 Mar 1988 36505 483351.5 107.3 Apr 1988 36728 483752.3 107.7 May 1988 37232 488676.0 108.1 Jun 1988 37598 488407.2 108.3 Jul 1988 38374 489799.0 108.9 Aug 1988 38522 491367.2 109.3 Sep 1988 38651 491287.0 109.5 Oct 1988 38358 493758.2 109.8 Nov 1988 38311 493696.8 110.3 Dec 1988 38576 494241.7 110.6 Jan 1989 38944 494982.8 111.2 Feb 1989 38999 498844.7 111.7 Mar 1989 39170 499201.5 112.2 Apr 1989 39076 501988.8 112.6 May 1989 39523 502112.9 113.4 Jun 1989 39224 503121.1 114.1 Jul 1989 39378 505276.6 114.8 Aug 1989 39656 503738.5 114.9 Sep 1989 39600 505445.5 115.2 Oct 1989 40102 508475.9 115.5 Nov 1989 39272 510455.7 116.1 Dec 1989 39478 509670.4 116.4 Jan 1990 39355 511414.4 117.2 Feb 1990 39968 512198.1 117.7 Mar 1990 38346 512211.6 118.1 Apr 1990 38904 512519.0 118.2 May 1990 38423 512500.0 118.5 Jun 1990 38452 511708.8 119.0 Jul 1990 37422 511061.1 119.5 Aug 1990 38043 512028.0 119.8 Sep 1990 38040 512326.0 120.3 Oct 1990 38603 510483.4 121.0 Nov 1990 39055 507205.6 122.0 Dec 1990 38997 507727.5 122.2 Jan 1991 39080 503629.1 125.1 Feb 1991 39371 502438.7 124.9 Mar 1991 39703 497569.6 125.5 Apr 1991 40196 498281.7 125.6 May 1991 40195 498207.8 125.9 Jun 1991 40371 502455.2 126.4 > > > > if (! all.ok) stop("some tests FAILED") > > > proc.time() user system elapsed 0.26 0.06 0.31