FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_spectrum.wasp
Title produced by softwareSpectral Analysis
Date of computationFri, 10 Dec 2010 09:21:42 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/10/t1291972789txp3ayqy63xrr53.htm/, Retrieved Mon, 29 Apr 2024 16:17:42 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=107455, Retrieved Mon, 29 Apr 2024 16:17:42 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact164

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-12 13:32:37] [76963dc1903f0f612b6153510a3818cf]
- R  D  [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-17 12:14:40] [76963dc1903f0f612b6153510a3818cf]
-         [Univariate Explorative Data Analysis] [Run Sequence Plot...] [2008-12-22 18:19:51] [1ce0d16c8f4225c977b42c8fa93bc163]
- RMP       [Univariate Data Series] [Identifying Integ...] [2009-11-22 12:08:06] [b98453cac15ba1066b407e146608df68]
- RMP         [Spectral Analysis] [Births] [2010-11-29 09:38:20] [b98453cac15ba1066b407e146608df68]
-   PD          [Spectral Analysis] [workshop 9] [2010-12-05 10:44:32] [0e7b3997dca5cf9d94982fb4db7bd3d5]
-   P             [Spectral Analysis] [workshop 9] [2010-12-05 13:34:06] [0e7b3997dca5cf9d94982fb4db7bd3d5]
- R P                 [Spectral Analysis] [] [2010-12-10 09:21:42] [5f45e5b827d1a020c3ecc9d930121b4e] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
2938
2909
3141
2427
3059
2918
2901
2823
2798
2892
2967
2397
3458
3024
3100
2904
3056
2771
2897
2772
2857
3020
2648
2364
3194
3013
2560
3074
2746
2846
3184
2354
3080
2963
2430
2296
2416
2647
2789
2685
2666
2882
2953
2127
2563
3061
2809
2861
2781
2555
3206
2570
2410
3195
2736
2743
2934
2668
2907
2866
2983
2878
3225
2515
3193
2663
2908
2896
2853
3028
3053
2455
3401
2969
3243
2849
3296
3121
3194
3023
2984
3525
3116
2383
3294
2882
2820
2583
2803
2767
2945
2716
2644
2956
2598
2171
2994
2645
2724
2550
2707
2679
2878
2307
2496
2637
2436
2426
2607
2533
2888
2520
2229
2804
2661
2547
2509
2465
2629
2706
2666
2432
2836
2888
2566
2802
2611
2683
2675
2434
2693
2619
2903
2550
2900
2456
2912
2883
2464
2655
2447
2592
2698
2274
2901
2397
3004
2614
2882
2671
2761
2806
2414
2673
2748
2112
2903
2633
2684
2861
2504
2708
2961
2535
2688
2699
2469
2585
2582
2480
2709
2441
2182
2585
2881
2422
2690
2659
2535
2613

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ 72.249.76.132

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=107455&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=107455&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=107455&T=0

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'George Udny Yule' @ 72.249.76.132






Raw Periodogram
ParameterValue
Box-Cox transformation parameter (lambda)1
Degree of non-seasonal differencing (d)0
Degree of seasonal differencing (D)0
Seasonal Period (s)12
Frequency (Period)Spectrum
0.0056 (180)55419.023056
0.0111 (90)581395.415561
0.0167 (60)476316.150354
0.0222 (45)51682.8887
0.0278 (36)50639.374325
0.0333 (30)17897.233973
0.0389 (25.7143)50017.041391
0.0444 (22.5)23015.306531
0.05 (20)3131.042163
0.0556 (18)18230.797528
0.0611 (16.3636)78090.467459
0.0667 (15)79292.029411
0.0722 (13.8462)16338.167932
0.0778 (12.8571)15114.418486
0.0833 (12)97519.81626
0.0889 (11.25)10816.529251
0.0944 (10.5882)18983.574754
0.1 (10)17634.922303
0.1056 (9.4737)7815.955541
0.1111 (9)8716.610521
0.1167 (8.5714)46293.027681
0.1222 (8.1818)7085.813918
0.1278 (7.8261)15661.119128
0.1333 (7.5)16131.852773
0.1389 (7.2)21722.122867
0.1444 (6.9231)49549.78051
0.15 (6.6667)16670.299054
0.1556 (6.4286)20265.811196
0.1611 (6.2069)9209.833226
0.1667 (6)27281.072566
0.1722 (5.8065)7605.003275
0.1778 (5.625)17002.755561
0.1833 (5.4545)7738.722781
0.1889 (5.2941)6152.613481
0.1944 (5.1429)11041.847734
0.2 (5)759.700887
0.2056 (4.8649)1661.827965
0.2111 (4.7368)8681.771458
0.2167 (4.6154)28241.08607
0.2222 (4.5)58105.986994
0.2278 (4.3902)6464.007438
0.2333 (4.2857)291030.666522
0.2389 (4.186)13685.884999
0.2444 (4.0909)110843.126907
0.25 (4)377832.107418
0.2556 (3.913)46279.921257
0.2611 (3.8298)23038.179352
0.2667 (3.75)9558.012048
0.2722 (3.6735)3378.524489
0.2778 (3.6)13308.661982
0.2833 (3.5294)6639.470059
0.2889 (3.4615)3842.205474
0.2944 (3.3962)3580.711564
0.3 (3.3333)8886.821592
0.3056 (3.2727)3352.876101
0.3111 (3.2143)2774.378117
0.3167 (3.1579)29076.013837
0.3222 (3.1034)19760.31223
0.3278 (3.0508)7156.855992
0.3333 (3)246667.000792
0.3389 (2.9508)16566.926992
0.3444 (2.9032)224948.11194
0.35 (2.8571)569492.168938
0.3556 (2.8125)85931.235507
0.3611 (2.7692)10634.496186
0.3667 (2.7273)40939.450428
0.3722 (2.6866)32092.975319
0.3778 (2.6471)63452.619241
0.3833 (2.6087)43799.320894
0.3889 (2.5714)70332.547941
0.3944 (2.5352)77909.72909
0.4 (2.5)63470.756522
0.4056 (2.4658)37540.319917
0.4111 (2.4324)118722.418591
0.4167 (2.4)229290.521648
0.4222 (2.3684)15608.998777
0.4278 (2.3377)66159.37758
0.4333 (2.3077)53375.408337
0.4389 (2.2785)29929.001543
0.4444 (2.25)8577.211842
0.45 (2.2222)3278.241287
0.4556 (2.1951)11331.081318
0.4611 (2.1687)11885.291616
0.4667 (2.1429)30578.53275
0.4722 (2.1176)11492.432862
0.4778 (2.093)27967.127969
0.4833 (2.069)72586.818685
0.4889 (2.0455)34440.023599
0.4944 (2.0225)27172.371046
0.5 (2)673663.865336

\begin{tabular}{lllllllll}
\hline
Raw Periodogram \tabularnewline
Parameter & Value \tabularnewline
Box-Cox transformation parameter (lambda) & 1 \tabularnewline
Degree of non-seasonal differencing (d) & 0 \tabularnewline
Degree of seasonal differencing (D) & 0 \tabularnewline
Seasonal Period (s) & 12 \tabularnewline
Frequency (Period) & Spectrum \tabularnewline
0.0056 (180) & 55419.023056 \tabularnewline
0.0111 (90) & 581395.415561 \tabularnewline
0.0167 (60) & 476316.150354 \tabularnewline
0.0222 (45) & 51682.8887 \tabularnewline
0.0278 (36) & 50639.374325 \tabularnewline
0.0333 (30) & 17897.233973 \tabularnewline
0.0389 (25.7143) & 50017.041391 \tabularnewline
0.0444 (22.5) & 23015.306531 \tabularnewline
0.05 (20) & 3131.042163 \tabularnewline
0.0556 (18) & 18230.797528 \tabularnewline
0.0611 (16.3636) & 78090.467459 \tabularnewline
0.0667 (15) & 79292.029411 \tabularnewline
0.0722 (13.8462) & 16338.167932 \tabularnewline
0.0778 (12.8571) & 15114.418486 \tabularnewline
0.0833 (12) & 97519.81626 \tabularnewline
0.0889 (11.25) & 10816.529251 \tabularnewline
0.0944 (10.5882) & 18983.574754 \tabularnewline
0.1 (10) & 17634.922303 \tabularnewline
0.1056 (9.4737) & 7815.955541 \tabularnewline
0.1111 (9) & 8716.610521 \tabularnewline
0.1167 (8.5714) & 46293.027681 \tabularnewline
0.1222 (8.1818) & 7085.813918 \tabularnewline
0.1278 (7.8261) & 15661.119128 \tabularnewline
0.1333 (7.5) & 16131.852773 \tabularnewline
0.1389 (7.2) & 21722.122867 \tabularnewline
0.1444 (6.9231) & 49549.78051 \tabularnewline
0.15 (6.6667) & 16670.299054 \tabularnewline
0.1556 (6.4286) & 20265.811196 \tabularnewline
0.1611 (6.2069) & 9209.833226 \tabularnewline
0.1667 (6) & 27281.072566 \tabularnewline
0.1722 (5.8065) & 7605.003275 \tabularnewline
0.1778 (5.625) & 17002.755561 \tabularnewline
0.1833 (5.4545) & 7738.722781 \tabularnewline
0.1889 (5.2941) & 6152.613481 \tabularnewline
0.1944 (5.1429) & 11041.847734 \tabularnewline
0.2 (5) & 759.700887 \tabularnewline
0.2056 (4.8649) & 1661.827965 \tabularnewline
0.2111 (4.7368) & 8681.771458 \tabularnewline
0.2167 (4.6154) & 28241.08607 \tabularnewline
0.2222 (4.5) & 58105.986994 \tabularnewline
0.2278 (4.3902) & 6464.007438 \tabularnewline
0.2333 (4.2857) & 291030.666522 \tabularnewline
0.2389 (4.186) & 13685.884999 \tabularnewline
0.2444 (4.0909) & 110843.126907 \tabularnewline
0.25 (4) & 377832.107418 \tabularnewline
0.2556 (3.913) & 46279.921257 \tabularnewline
0.2611 (3.8298) & 23038.179352 \tabularnewline
0.2667 (3.75) & 9558.012048 \tabularnewline
0.2722 (3.6735) & 3378.524489 \tabularnewline
0.2778 (3.6) & 13308.661982 \tabularnewline
0.2833 (3.5294) & 6639.470059 \tabularnewline
0.2889 (3.4615) & 3842.205474 \tabularnewline
0.2944 (3.3962) & 3580.711564 \tabularnewline
0.3 (3.3333) & 8886.821592 \tabularnewline
0.3056 (3.2727) & 3352.876101 \tabularnewline
0.3111 (3.2143) & 2774.378117 \tabularnewline
0.3167 (3.1579) & 29076.013837 \tabularnewline
0.3222 (3.1034) & 19760.31223 \tabularnewline
0.3278 (3.0508) & 7156.855992 \tabularnewline
0.3333 (3) & 246667.000792 \tabularnewline
0.3389 (2.9508) & 16566.926992 \tabularnewline
0.3444 (2.9032) & 224948.11194 \tabularnewline
0.35 (2.8571) & 569492.168938 \tabularnewline
0.3556 (2.8125) & 85931.235507 \tabularnewline
0.3611 (2.7692) & 10634.496186 \tabularnewline
0.3667 (2.7273) & 40939.450428 \tabularnewline
0.3722 (2.6866) & 32092.975319 \tabularnewline
0.3778 (2.6471) & 63452.619241 \tabularnewline
0.3833 (2.6087) & 43799.320894 \tabularnewline
0.3889 (2.5714) & 70332.547941 \tabularnewline
0.3944 (2.5352) & 77909.72909 \tabularnewline
0.4 (2.5) & 63470.756522 \tabularnewline
0.4056 (2.4658) & 37540.319917 \tabularnewline
0.4111 (2.4324) & 118722.418591 \tabularnewline
0.4167 (2.4) & 229290.521648 \tabularnewline
0.4222 (2.3684) & 15608.998777 \tabularnewline
0.4278 (2.3377) & 66159.37758 \tabularnewline
0.4333 (2.3077) & 53375.408337 \tabularnewline
0.4389 (2.2785) & 29929.001543 \tabularnewline
0.4444 (2.25) & 8577.211842 \tabularnewline
0.45 (2.2222) & 3278.241287 \tabularnewline
0.4556 (2.1951) & 11331.081318 \tabularnewline
0.4611 (2.1687) & 11885.291616 \tabularnewline
0.4667 (2.1429) & 30578.53275 \tabularnewline
0.4722 (2.1176) & 11492.432862 \tabularnewline
0.4778 (2.093) & 27967.127969 \tabularnewline
0.4833 (2.069) & 72586.818685 \tabularnewline
0.4889 (2.0455) & 34440.023599 \tabularnewline
0.4944 (2.0225) & 27172.371046 \tabularnewline
0.5 (2) & 673663.865336 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=107455&T=1

[TABLE]
[ROW][C]Raw Periodogram[/C][/ROW]
[ROW][C]Parameter[/C][C]Value[/C][/ROW]
[ROW][C]Box-Cox transformation parameter (lambda)[/C][C]1[/C][/ROW]
[ROW][C]Degree of non-seasonal differencing (d)[/C][C]0[/C][/ROW]
[ROW][C]Degree of seasonal differencing (D)[/C][C]0[/C][/ROW]
[ROW][C]Seasonal Period (s)[/C][C]12[/C][/ROW]
[ROW][C]Frequency (Period)[/C][C]Spectrum[/C][/ROW]
[ROW][C]0.0056 (180)[/C][C]55419.023056[/C][/ROW]
[ROW][C]0.0111 (90)[/C][C]581395.415561[/C][/ROW]
[ROW][C]0.0167 (60)[/C][C]476316.150354[/C][/ROW]
[ROW][C]0.0222 (45)[/C][C]51682.8887[/C][/ROW]
[ROW][C]0.0278 (36)[/C][C]50639.374325[/C][/ROW]
[ROW][C]0.0333 (30)[/C][C]17897.233973[/C][/ROW]
[ROW][C]0.0389 (25.7143)[/C][C]50017.041391[/C][/ROW]
[ROW][C]0.0444 (22.5)[/C][C]23015.306531[/C][/ROW]
[ROW][C]0.05 (20)[/C][C]3131.042163[/C][/ROW]
[ROW][C]0.0556 (18)[/C][C]18230.797528[/C][/ROW]
[ROW][C]0.0611 (16.3636)[/C][C]78090.467459[/C][/ROW]
[ROW][C]0.0667 (15)[/C][C]79292.029411[/C][/ROW]
[ROW][C]0.0722 (13.8462)[/C][C]16338.167932[/C][/ROW]
[ROW][C]0.0778 (12.8571)[/C][C]15114.418486[/C][/ROW]
[ROW][C]0.0833 (12)[/C][C]97519.81626[/C][/ROW]
[ROW][C]0.0889 (11.25)[/C][C]10816.529251[/C][/ROW]
[ROW][C]0.0944 (10.5882)[/C][C]18983.574754[/C][/ROW]
[ROW][C]0.1 (10)[/C][C]17634.922303[/C][/ROW]
[ROW][C]0.1056 (9.4737)[/C][C]7815.955541[/C][/ROW]
[ROW][C]0.1111 (9)[/C][C]8716.610521[/C][/ROW]
[ROW][C]0.1167 (8.5714)[/C][C]46293.027681[/C][/ROW]
[ROW][C]0.1222 (8.1818)[/C][C]7085.813918[/C][/ROW]
[ROW][C]0.1278 (7.8261)[/C][C]15661.119128[/C][/ROW]
[ROW][C]0.1333 (7.5)[/C][C]16131.852773[/C][/ROW]
[ROW][C]0.1389 (7.2)[/C][C]21722.122867[/C][/ROW]
[ROW][C]0.1444 (6.9231)[/C][C]49549.78051[/C][/ROW]
[ROW][C]0.15 (6.6667)[/C][C]16670.299054[/C][/ROW]
[ROW][C]0.1556 (6.4286)[/C][C]20265.811196[/C][/ROW]
[ROW][C]0.1611 (6.2069)[/C][C]9209.833226[/C][/ROW]
[ROW][C]0.1667 (6)[/C][C]27281.072566[/C][/ROW]
[ROW][C]0.1722 (5.8065)[/C][C]7605.003275[/C][/ROW]
[ROW][C]0.1778 (5.625)[/C][C]17002.755561[/C][/ROW]
[ROW][C]0.1833 (5.4545)[/C][C]7738.722781[/C][/ROW]
[ROW][C]0.1889 (5.2941)[/C][C]6152.613481[/C][/ROW]
[ROW][C]0.1944 (5.1429)[/C][C]11041.847734[/C][/ROW]
[ROW][C]0.2 (5)[/C][C]759.700887[/C][/ROW]
[ROW][C]0.2056 (4.8649)[/C][C]1661.827965[/C][/ROW]
[ROW][C]0.2111 (4.7368)[/C][C]8681.771458[/C][/ROW]
[ROW][C]0.2167 (4.6154)[/C][C]28241.08607[/C][/ROW]
[ROW][C]0.2222 (4.5)[/C][C]58105.986994[/C][/ROW]
[ROW][C]0.2278 (4.3902)[/C][C]6464.007438[/C][/ROW]
[ROW][C]0.2333 (4.2857)[/C][C]291030.666522[/C][/ROW]
[ROW][C]0.2389 (4.186)[/C][C]13685.884999[/C][/ROW]
[ROW][C]0.2444 (4.0909)[/C][C]110843.126907[/C][/ROW]
[ROW][C]0.25 (4)[/C][C]377832.107418[/C][/ROW]
[ROW][C]0.2556 (3.913)[/C][C]46279.921257[/C][/ROW]
[ROW][C]0.2611 (3.8298)[/C][C]23038.179352[/C][/ROW]
[ROW][C]0.2667 (3.75)[/C][C]9558.012048[/C][/ROW]
[ROW][C]0.2722 (3.6735)[/C][C]3378.524489[/C][/ROW]
[ROW][C]0.2778 (3.6)[/C][C]13308.661982[/C][/ROW]
[ROW][C]0.2833 (3.5294)[/C][C]6639.470059[/C][/ROW]
[ROW][C]0.2889 (3.4615)[/C][C]3842.205474[/C][/ROW]
[ROW][C]0.2944 (3.3962)[/C][C]3580.711564[/C][/ROW]
[ROW][C]0.3 (3.3333)[/C][C]8886.821592[/C][/ROW]
[ROW][C]0.3056 (3.2727)[/C][C]3352.876101[/C][/ROW]
[ROW][C]0.3111 (3.2143)[/C][C]2774.378117[/C][/ROW]
[ROW][C]0.3167 (3.1579)[/C][C]29076.013837[/C][/ROW]
[ROW][C]0.3222 (3.1034)[/C][C]19760.31223[/C][/ROW]
[ROW][C]0.3278 (3.0508)[/C][C]7156.855992[/C][/ROW]
[ROW][C]0.3333 (3)[/C][C]246667.000792[/C][/ROW]
[ROW][C]0.3389 (2.9508)[/C][C]16566.926992[/C][/ROW]
[ROW][C]0.3444 (2.9032)[/C][C]224948.11194[/C][/ROW]
[ROW][C]0.35 (2.8571)[/C][C]569492.168938[/C][/ROW]
[ROW][C]0.3556 (2.8125)[/C][C]85931.235507[/C][/ROW]
[ROW][C]0.3611 (2.7692)[/C][C]10634.496186[/C][/ROW]
[ROW][C]0.3667 (2.7273)[/C][C]40939.450428[/C][/ROW]
[ROW][C]0.3722 (2.6866)[/C][C]32092.975319[/C][/ROW]
[ROW][C]0.3778 (2.6471)[/C][C]63452.619241[/C][/ROW]
[ROW][C]0.3833 (2.6087)[/C][C]43799.320894[/C][/ROW]
[ROW][C]0.3889 (2.5714)[/C][C]70332.547941[/C][/ROW]
[ROW][C]0.3944 (2.5352)[/C][C]77909.72909[/C][/ROW]
[ROW][C]0.4 (2.5)[/C][C]63470.756522[/C][/ROW]
[ROW][C]0.4056 (2.4658)[/C][C]37540.319917[/C][/ROW]
[ROW][C]0.4111 (2.4324)[/C][C]118722.418591[/C][/ROW]
[ROW][C]0.4167 (2.4)[/C][C]229290.521648[/C][/ROW]
[ROW][C]0.4222 (2.3684)[/C][C]15608.998777[/C][/ROW]
[ROW][C]0.4278 (2.3377)[/C][C]66159.37758[/C][/ROW]
[ROW][C]0.4333 (2.3077)[/C][C]53375.408337[/C][/ROW]
[ROW][C]0.4389 (2.2785)[/C][C]29929.001543[/C][/ROW]
[ROW][C]0.4444 (2.25)[/C][C]8577.211842[/C][/ROW]
[ROW][C]0.45 (2.2222)[/C][C]3278.241287[/C][/ROW]
[ROW][C]0.4556 (2.1951)[/C][C]11331.081318[/C][/ROW]
[ROW][C]0.4611 (2.1687)[/C][C]11885.291616[/C][/ROW]
[ROW][C]0.4667 (2.1429)[/C][C]30578.53275[/C][/ROW]
[ROW][C]0.4722 (2.1176)[/C][C]11492.432862[/C][/ROW]
[ROW][C]0.4778 (2.093)[/C][C]27967.127969[/C][/ROW]
[ROW][C]0.4833 (2.069)[/C][C]72586.818685[/C][/ROW]
[ROW][C]0.4889 (2.0455)[/C][C]34440.023599[/C][/ROW]
[ROW][C]0.4944 (2.0225)[/C][C]27172.371046[/C][/ROW]
[ROW][C]0.5 (2)[/C][C]673663.865336[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=107455&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=107455&T=1

As an alternative you can also use a QR Code:  
QR Code


The GUIDs for individual cells are displayed in the table below:

Raw Periodogram
ParameterValue
Box-Cox transformation parameter (lambda)1
Degree of non-seasonal differencing (d)0
Degree of seasonal differencing (D)0
Seasonal Period (s)12
Frequency (Period)Spectrum
0.0056 (180)55419.023056
0.0111 (90)581395.415561
0.0167 (60)476316.150354
0.0222 (45)51682.8887
0.0278 (36)50639.374325
0.0333 (30)17897.233973
0.0389 (25.7143)50017.041391
0.0444 (22.5)23015.306531
0.05 (20)3131.042163
0.0556 (18)18230.797528
0.0611 (16.3636)78090.467459
0.0667 (15)79292.029411
0.0722 (13.8462)16338.167932
0.0778 (12.8571)15114.418486
0.0833 (12)97519.81626
0.0889 (11.25)10816.529251
0.0944 (10.5882)18983.574754
0.1 (10)17634.922303
0.1056 (9.4737)7815.955541
0.1111 (9)8716.610521
0.1167 (8.5714)46293.027681
0.1222 (8.1818)7085.813918
0.1278 (7.8261)15661.119128
0.1333 (7.5)16131.852773
0.1389 (7.2)21722.122867
0.1444 (6.9231)49549.78051
0.15 (6.6667)16670.299054
0.1556 (6.4286)20265.811196
0.1611 (6.2069)9209.833226
0.1667 (6)27281.072566
0.1722 (5.8065)7605.003275
0.1778 (5.625)17002.755561
0.1833 (5.4545)7738.722781
0.1889 (5.2941)6152.613481
0.1944 (5.1429)11041.847734
0.2 (5)759.700887
0.2056 (4.8649)1661.827965
0.2111 (4.7368)8681.771458
0.2167 (4.6154)28241.08607
0.2222 (4.5)58105.986994
0.2278 (4.3902)6464.007438
0.2333 (4.2857)291030.666522
0.2389 (4.186)13685.884999
0.2444 (4.0909)110843.126907
0.25 (4)377832.107418
0.2556 (3.913)46279.921257
0.2611 (3.8298)23038.179352
0.2667 (3.75)9558.012048
0.2722 (3.6735)3378.524489
0.2778 (3.6)13308.661982
0.2833 (3.5294)6639.470059
0.2889 (3.4615)3842.205474
0.2944 (3.3962)3580.711564
0.3 (3.3333)8886.821592
0.3056 (3.2727)3352.876101
0.3111 (3.2143)2774.378117
0.3167 (3.1579)29076.013837
0.3222 (3.1034)19760.31223
0.3278 (3.0508)7156.855992
0.3333 (3)246667.000792
0.3389 (2.9508)16566.926992
0.3444 (2.9032)224948.11194
0.35 (2.8571)569492.168938
0.3556 (2.8125)85931.235507
0.3611 (2.7692)10634.496186
0.3667 (2.7273)40939.450428
0.3722 (2.6866)32092.975319
0.3778 (2.6471)63452.619241
0.3833 (2.6087)43799.320894
0.3889 (2.5714)70332.547941
0.3944 (2.5352)77909.72909
0.4 (2.5)63470.756522
0.4056 (2.4658)37540.319917
0.4111 (2.4324)118722.418591
0.4167 (2.4)229290.521648
0.4222 (2.3684)15608.998777
0.4278 (2.3377)66159.37758
0.4333 (2.3077)53375.408337
0.4389 (2.2785)29929.001543
0.4444 (2.25)8577.211842
0.45 (2.2222)3278.241287
0.4556 (2.1951)11331.081318
0.4611 (2.1687)11885.291616
0.4667 (2.1429)30578.53275
0.4722 (2.1176)11492.432862
0.4778 (2.093)27967.127969
0.4833 (2.069)72586.818685
0.4889 (2.0455)34440.023599
0.4944 (2.0225)27172.371046
0.5 (2)673663.865336


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 1 ; par2 = 0 ; par3 = 0 ; par4 = 12 ;
Parameters (R input):
par1 = 1 ; par2 = 0 ; par3 = 0 ; par4 = 12 ;
R code (references can be found in the software module):
par1 <- as.numeric(par1)
par2 <- as.numeric(par2)
par3 <- as.numeric(par3)
par4 <- as.numeric(par4)
if (par1 == 0) {
x <- log(x)
} else {
x <- (x ^ par1 - 1) / par1
}
if (par2 > 0) x <- diff(x,lag=1,difference=par2)
if (par3 > 0) x <- diff(x,lag=par4,difference=par3)
bitmap(file='test1.png')
r <- spectrum(x,main='Raw Periodogram')
dev.off()
bitmap(file='test2.png')
cpgram(x,main='Cumulative Periodogram')
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Raw Periodogram',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Parameter',header=TRUE)
a<-table.element(a,'Value',header=TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Box-Cox transformation parameter (lambda)',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Degree of non-seasonal differencing (d)',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Degree of seasonal differencing (D)',header=TRUE)
a<-table.element(a,par3)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Seasonal Period (s)',header=TRUE)
a<-table.element(a,par4)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Frequency (Period)',header=TRUE)
a<-table.element(a,'Spectrum',header=TRUE)
a<-table.row.end(a)
for (i in 1:length(r$freq)) {
a<-table.row.start(a)
mylab <- round(r$freq[i],4)
mylab <- paste(mylab,' (',sep='')
mylab <- paste(mylab,round(1/r$freq[i],4),sep='')
mylab <- paste(mylab,')',sep='')
a<-table.element(a,mylab,header=TRUE)
a<-table.element(a,round(r$spec[i],6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')