Home » date » 2010 » Dec » 28 »

*The author of this computation has been verified*
R Software Module: /rwasp_multipleregression.wasp (opens new window with default values)
Title produced by software: Multiple Regression
Date of computation: Tue, 28 Dec 2010 11:58:43 +0000
 
Cite this page as follows:
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4.htm/, Retrieved Tue, 28 Dec 2010 12:56:32 +0100
 
BibTeX entries for LaTeX users:
@Manual{KEY,
    author = {{YOUR NAME}},
    publisher = {Office for Research Development and Education},
    title = {Statistical Computations at FreeStatistics.org, URL http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4.htm/},
    year = {2010},
}
@Manual{R,
    title = {R: A Language and Environment for Statistical Computing},
    author = {{R Development Core Team}},
    organization = {R Foundation for Statistical Computing},
    address = {Vienna, Austria},
    year = {2010},
    note = {{ISBN} 3-900051-07-0},
    url = {http://www.R-project.org},
}
 
Original text written by user:
 
IsPrivate?
No (this computation is public)
 
User-defined keywords:
 
Dataseries X:
» Textbox « » Textfile « » CSV «
22 27 5 26 49 35 23 36 4 25 45 34 27 25 4 17 54 13 19 27 3 37 36 35 15 25 3 35 36 28 29 44 3 15 53 32 25 50 4 27 46 35 25 41 4 36 42 36 21 48 5 25 41 27 22 43 4 30 45 29 22 47 2 27 47 27 24 41 3 33 42 28 22 44 2 29 45 29 23 47 5 30 40 28 19 40 3 25 45 30 19 46 3 23 40 25 21 28 3 26 42 15 20 56 3 24 45 33 23 49 4 35 47 31 11 25 4 39 31 37 21 41 4 23 46 37 19 26 3 32 34 34 21 50 5 29 43 32 23 47 4 26 45 21 19 52 2 21 42 25 22 37 5 35 51 32 19 41 3 23 44 28 23 45 4 21 47 22 29 26 4 28 47 25 27 3 30 41 26 18 52 4 21 44 34 30 46 2 29 51 34 26 58 3 28 46 36 20 54 5 19 47 36 22 29 3 26 46 26 20 50 3 33 38 26 21 43 2 34 50 34 18 30 3 33 48 33 21 47 2 40 36 31 27 45 3 24 51 33 48 1 35 35 22 18 48 3 35 49 29 24 26 4 32 38 24 24 46 5 20 47 37 17 3 35 36 32 22 50 3 35 47 23 21 25 4 21 46 29 23 47 2 33 43 35 19 47 2 40 53 20 22 41 3 22 55 28 19 45 2 35 39 26 24 41 4 20 55 36 22 45 5 28 41 26 26 40 3 46 33 33 22 29 4 18 52 25 23 34 5 22 42 29 27 45 5 20 56 32 21 5 etc...
 
Output produced by software:

Enter (or paste) a matrix (table) containing all data (time) series. Every column represents a different variable and must be delimited by a space or Tab. Every row represents a period in time (or category) and must be delimited by hard returns. The easiest way to enter data is to copy and paste a block of spreadsheet cells. Please, do not use commas or spaces to seperate groups of digits!


Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time12 seconds
R Server'George Udny Yule' @ 72.249.76.132
R Framework
error message
Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.


Multiple Linear Regression - Estimated Regression Equation
Behoefte_affiliatie[t] = + 59.8331365247397 -0.321873599043689leeftijd[t] -0.0894242784873798opleiding[t] + 0.0106074503726078Neuroticisme[t] -0.3095406594854Extraversie[t] -0.305320732396517`Openheid `[t] + e[t]


Multiple Linear Regression - Ordinary Least Squares
VariableParameterS.D.T-STAT
H0: parameter = 0
2-tail p-value1-tail p-value
(Intercept)59.83313652473977.0645928.469400
leeftijd-0.3218735990436890.062584-5.14311e-060
opleiding-0.08942427848737980.078225-1.14320.2544120.127206
Neuroticisme0.01060745037260780.0911740.11630.9075040.453752
Extraversie-0.30954065948540.058358-5.304200
`Openheid `-0.3053207323965170.074876-4.07776.7e-053.3e-05


Multiple Linear Regression - Regression Statistics
Multiple R0.601830538297624
R-squared0.362199996827607
Adjusted R-squared0.345326980870666
F-TEST (value)21.466227362785
F-TEST (DF numerator)5
F-TEST (DF denominator)189
p-value0
Multiple Linear Regression - Residual Statistics
Residual Standard Deviation9.32437127245557
Sum Squared Residuals16432.3970294264


Multiple Linear Regression - Actuals, Interpolation, and Residuals
Time or IndexActualsInterpolation
Forecast
Residuals
Prediction Error
12225.1175037191476-3.11750371914759
22323.8429415262079-0.84294152620789
32730.9245609576659-3.92456095766589
41929.4370628035319-10.4370628035319
51532.1968402276497-17.1968402276497
62919.38561869752969.6143813024704
72518.74306464845966.25693535154041
82522.66823599875132.33176400124866
92123.2664418239135-2.26644182391350
102223.1694672467477-1.16946724674773
112222.0205592022521-0.0205592022521470
122425.1684037852930-1.16840378529303
132223.0158347543062-1.01583475430620
142323.6455726019091-0.645572601909113
151923.8661543381066-4.86615433810662
161924.9880048025089-5.98800480250886
172133.2476779414074-12.2476779414074
182017.78960710584542.21039289415456
192320.06154012058482.93845987941519
201130.9496624565111-19.9496624565111
212120.98685577356930.0131442264306762
221930.6303012020799-11.6303012020799
232120.51943944636320.480560553636825
242324.2821089082547-1.28210890825468
251922.5058912670181-3.50589126701809
262222.2911156602836-0.291115660283576
271924.4432479625962-5.44324796259615
282323.9484168031117-0.948416803111705
292929.2223051403605-0.222305140360495
302743.0758625085064-16.0758625085064
315237.450455702325514.5495442976745
324638.67434375470827.3256562452918
335839.601700257697118.3982997423029
345439.162737551575814.8372624484242
352942.8759554095259-13.8759554095259
365041.85980512473698.14019487526313
374340.65918077107082.34081922892918
383039.7990950120652-9.79909501206515
394738.15486618181768.84513381818241
404532.392076094863412.6079239051366
41125.4439476935796-24.4439476935796
42329.1260721031755-26.1260721031755
43424.9159080638744-20.9159080638744
44543.4070457103041-38.4070457103041
453529.22447878430855.7755212156915
463533.91127600558021.08872399441979
472127.5185657905591-6.51856579055908
483327.90521111527545.09478888472457
494027.611584877782912.3884151222171
502225.2877791951336-3.28777919513362
513531.2971637618193.70283623818099
522023.6882451211629-3.68824512116286
532831.2894928563588-3.28949285635876
544636.29570841974919.70429158025093
551829.0530876863671-11.0530876863671
562228.5516091100055-6.55160911000551
572022.1573180340913-2.15731803409132
582528.1543704591459-3.15437045914591
593131.5139676779368-0.513967677936798
602125.9910725730771-4.99107257307712
612325.3729960749065-2.37299607490649
622634.1701657726983-8.17016577269829
633432.13139122915731.86860877084271
643132.7573745048708-1.75737450487081
652324.5593903594388-1.55939035943877
663125.50751507575645.49248492424363
672626.3505567828462-0.350556782846199
683627.74153388625238.2584661137477
692831.4066900418439-3.40669004184394
703426.77514414040377.22485585959628
712529.8403298621303-4.84032986213031
723336.4018598303324-3.40185983033239
734634.411648096307011.5883519036930
742430.8806902146584-6.88069021465839
753234.240882116718-2.24088211671803
763324.84572358536048.15427641463962
774236.74993720592775.2500627940723
781724.6725863811359-7.67258638113594
793628.40483821733467.59516178266541
804032.69572313338127.30427686661877
813033.8707904565763-3.87079045657634
821939.1403382599544-20.1403382599544
833328.73122741362534.26877258637471
843526.24219327821598.75780672178407
852328.0441725889950-5.04417258899498
861523.5007379467095-8.50073794670946
873837.73199026292410.268009737075918
883728.59783463828498.40216536171506
892326.3483891866514-3.34838918665136
904132.40389731801028.59610268198982
913433.06269523726730.93730476273267
923830.70974843522657.29025156477347
934529.886553416488215.1134465835118
942725.57572445349851.42427554650147
954636.00465693143049.99534306856957
962629.7575110723000-3.75751107230004
974435.70904871557228.29095128442776
983627.86333070127428.13666929872585
992031.5289118550932-11.5289118550932
1004432.259602220066611.7403977799334
1012734.1718421836245-7.17184218362446
1022729.5732814086967-2.57328140869672
1034132.66502999232548.33497000767465
1043028.70335975452191.29664024547813
1053334.3596217800457-1.35962178004566
1063726.964538541117210.0354614588828
1073030.6180941559829-0.618094155982934
1082024.2016441672297-4.20164416722974
1094437.38740836355226.61259163644776
1102024.7570084575150-4.75700845751505
1113328.33883679275944.66116320724062
1123136.1185594972837-5.11855949728375
1132332.0759972549547-9.07599725495469
1143331.72162593218731.27837406781273
1153325.72524509725877.27475490274133
1163228.01911368112883.98088631887125
1172527.8388646312644-2.83886463126441
1183742.8425156230228-5.84251562302282
1194839.13939768246858.86060231753151
1204538.45904469445596.54095530554411
1213241.1596830916966-9.15968309169657
1224641.43266363510294.56733636489714
1232042.658514607755-22.658514607755
1244237.22105253948324.77894746051685
1254530.831246588878514.1687534111215
1262938.7523182355638-9.75231823556378
1275142.17211796096738.82788203903274
1285538.580654777115516.4193452228845
1295040.35423866903039.64576133096974
1304440.19640495413663.80359504586339
1314134.50849293607066.4915070639294
1324037.98654213285182.01345786714819
1334738.08263169807188.91736830192824
1344234.95182658653937.04817341346068
1354038.08372376747861.91627623252136
1365140.522450163083310.4775498369167
1374340.86541191668182.13458808331818
1384539.38439794481035.61560205518969
1394132.81071700090848.18928299909159
1404138.12569275732312.87430724267686
1413739.847843518705-2.84784351870504
1424634.689213419082111.3107865809179
1433838.7857446711579-0.785744671157934
1443932.57682793943616.42317206056392
1454528.115671050132216.8843289498678
1462826.61807526848271.38192473151729
1474537.15916802531867.84083197468136
1482127.1314689730685-6.13146897306853
1493335.8654777966963-2.86547779669632
1502421.38758913957872.61241086042126
1511621.2672686153581-5.26726861535806
1522342.383847373134-19.383847373134
1534039.78509558346920.214904416530849
1544941.5387076613047.46129233869598
1553842.2356109094779-4.23561090947788
1563239.4641123378523-7.46411233785233
1574639.75904438317716.24095561682288
1583241.8293045142391-9.82930451423912
1594143.8411207733459-2.84112077334594
1604342.77220826514760.227791734852427
1614441.96299216181012.03700783818990
1624739.9569520120037.04304798799702
1632842.1311359098207-14.1311359098207
1645241.941182577796110.0588174222039
1652741.1011942399206-14.1011942399206
1664541.63604937568943.36395062431065
1672737.2457898800738-10.2457898800738
1682538.4103544268903-13.4103544268903
1692840.0364179431271-12.0364179431271
1702543.9528100691583-18.9528100691583
1715239.588361699411212.4116383005888
1724443.57725625465080.422743745349176
1734339.07460005967833.92539994032169
1744740.91839019300396.08160980699605
1755240.272438087762911.7275619122371
1764040.626081177185-0.62608117718503
1774240.15779774474231.84220225525766
1784540.04842862138444.9515713786156
1794545.6646677181087-0.664667718108656
1805040.12403114113809.87596885886204
1814941.66167637568157.3383236243185
1825238.358418976352513.6415810236475
1834838.44700471466769.55299528533236
1845137.151859926227813.8481400737722
1854941.72669803620537.27330196379472
1863141.1435026367017-10.1435026367017
1874338.77094241190614.22905758809391
1883138.8929230361987-7.89292303619867
1892839.4151245301093-11.4151245301093
1904342.28669932844700.713300671553051
1913143.2146052189251-12.2146052189250
1925143.00432015268887.9956798473112
1935839.802939817113718.1970601828863
1942537.448188012544-12.4481880125440
1952738.5622024299982-11.5622024299982


Goldfeld-Quandt test for Heteroskedasticity
p-valuesAlternative Hypothesis
breakpoint indexgreater2-sidedless
90.01145892327362450.0229178465472490.988541076726375
100.005580255084646560.01116051016929310.994419744915353
110.003830394951385410.007660789902770820.996169605048615
120.001446881691108900.002893763382217790.99855311830889
130.0004068296906227460.0008136593812454930.999593170309377
140.0001108453200228620.0002216906400457230.999889154679977
157.23420617892117e-050.0001446841235784230.99992765793821
161.75447938266853e-053.50895876533705e-050.999982455206173
175.37635136478092e-061.07527027295618e-050.999994623648635
182.89050727484676e-065.78101454969352e-060.999997109492725
191.20016921465064e-062.40033842930127e-060.999998799830785
209.13359193218533e-071.82671838643707e-060.999999086640807
212.61232875895234e-075.22465751790467e-070.999999738767124
222.52252598181453e-075.04505196362905e-070.999999747747402
237.28640359549451e-081.45728071909890e-070.999999927135964
241.84663738701327e-083.69327477402655e-080.999999981533626
255.44503040070167e-091.08900608014033e-080.99999999455497
264.41030311973868e-098.82060623947737e-090.999999995589697
271.95896596257071e-093.91793192514142e-090.999999998041034
285.15437507545988e-101.03087501509198e-090.999999999484563
291.68819821438689e-093.37639642877377e-090.999999998311802
305.97728836986143e-101.19545767397229e-090.999999999402271
310.0001506816645327530.0003013633290655070.999849318335467
328.04157568769302e-050.0001608315137538600.999919584243123
330.0003659071099302150.0007318142198604310.99963409289007
340.001647329585041560.003294659170083110.998352670414958
350.002663321124423540.005326642248847070.997336678875576
360.002758548276660560.005517096553321130.99724145172334
370.004570073596382140.009140147192764290.995429926403618
380.0244512042985660.0489024085971320.975548795701434
390.01834191306157650.03668382612315290.981658086938423
400.01465260367781120.02930520735562250.985347396322189
410.04461983549027190.08923967098054380.955380164509728
420.1543526594979820.3087053189959650.845647340502018
430.1944954064896870.3889908129793740.805504593510313
440.3794246752763580.7588493505527170.620575324723642
450.3365929552365330.6731859104730660.663407044763467
460.7802383812630820.4395232374738370.219761618736918
470.7705109611154850.458978077769030.229489038884515
480.7431219071644850.513756185671030.256878092835515
490.842645505336920.3147089893261600.157354494663080
500.815705503819520.3685889923609610.184294496180480
510.7956943690302840.4086112619394320.204305630969716
520.7744545300198640.4510909399602730.225545469980136
530.7386582097333680.5226835805332650.261341790266632
540.8652085778887780.2695828442224440.134791422111222
550.855211145068370.2895777098632580.144788854931629
560.8560807565885060.2878384868229870.143919243411494
570.8443511105909670.3112977788180660.155648889409033
580.818575428099170.3628491438016610.181424571900831
590.7913918252118410.4172163495763180.208608174788159
600.7676274514122940.4647450971754120.232372548587706
610.763725584282320.472548831435360.23627441571768
620.7607276491621360.4785447016757280.239272350837864
630.7926213191611820.4147573616776360.207378680838818
640.7854981822013880.4290036355972240.214501817798612
650.7588638528346710.4822722943306570.241136147165329
660.7296985227489090.5406029545021830.270301477251091
670.6976887222051810.6046225555896380.302311277794819
680.6705091697279110.6589816605441790.329490830272089
690.6340033364609590.7319933270780820.365996663539041
700.5992892304148620.8014215391702760.400710769585138
710.5652256227820440.8695487544359130.434774377217956
720.5259812483444870.9480375033110250.474018751655513
730.5571203989054750.8857592021890490.442879601094525
740.5310714331946770.9378571336106460.468928566805323
750.4967245435716770.9934490871433540.503275456428323
760.4975102186618580.9950204373237150.502489781338142
770.5026291752231360.9947416495537280.497370824776864
780.506425799985830.987148400028340.49357420001417
790.5345128147011360.9309743705977280.465487185298864
800.5973395850832530.8053208298334950.402660414916747
810.5679743958868760.8640512082262470.432025604113124
820.6602304954978440.6795390090043120.339769504502156
830.6423772413587080.7152455172825840.357622758641292
840.6221470619979980.7557058760040050.377852938002002
850.6119803703959520.7760392592080960.388019629604048
860.6288448101885920.7423103796228170.371155189811408
870.603137017927940.7937259641441210.396862982072060
880.5820966521661640.8358066956676720.417903347833836
890.558679888516550.88264022296690.44132011148345
900.5981570962200240.8036858075599510.401842903779976
910.5703241980178440.8593516039643130.429675801982156
920.5482742532700930.9034514934598140.451725746729907
930.5937088658824070.8125822682351860.406291134117593
940.5526818640052970.8946362719894060.447318135994703
950.5989642361095760.8020715277808480.401035763890424
960.5788046377310230.8423907245379540.421195362268977
970.5971376621099160.8057246757801680.402862337890084
980.5757269424536080.8485461150927830.424273057546392
990.585142003008530.829715993982940.41485799699147
1000.6366055336629420.7267889326741150.363394466337058
1010.6150445118132010.7699109763735980.384955488186799
1020.5818110708045920.8363778583908150.418188929195408
1030.5682678482017760.8634643035964480.431732151798224
1040.5267289341565010.9465421316869980.473271065843499
1050.4890101526964460.9780203053928920.510989847303554
1060.4840850905159250.968170181031850.515914909484075
1070.4432511969017210.8865023938034420.556748803098279
1080.4231130511259580.8462261022519150.576886948874042
1090.4207056633130160.8414113266260330.579294336686984
1100.3978120416231980.7956240832463960.602187958376802
1110.3644817518685330.7289635037370660.635518248131467
1120.3313349396436060.6626698792872120.668665060356394
1130.3452325100207790.6904650200415580.654767489979221
1140.307222544628450.61444508925690.69277745537155
1150.2850532358517730.5701064717035470.714946764148227
1160.2567796639805740.5135593279611480.743220336019426
1170.2335237746186240.4670475492372480.766476225381376
1180.2177409541022750.435481908204550.782259045897725
1190.2691910251967240.5383820503934490.730808974803276
1200.2775299358784840.5550598717569680.722470064121516
1210.277320878782890.554641757565780.72267912121711
1220.2639758976801430.5279517953602850.736024102319857
1230.4644935868123720.9289871736247450.535506413187628
1240.4556162528207060.9112325056414120.544383747179294
1250.5266866220320220.9466267559359560.473313377967978
1260.555556359736650.8888872805266990.444443640263349
1270.5483862502290480.9032274995419050.451613749770952
1280.6390285959796840.7219428080406330.360971404020317
1290.6331501455055310.7336997089889380.366849854494469
1300.5993304172637780.8013391654724440.400669582736222
1310.571528528041580.856942943916840.42847147195842
1320.5288282133904890.9423435732190220.471171786609511
1330.5100020592937680.9799958814124640.489997940706232
1340.4781713570186970.9563427140373940.521828642981303
1350.4409046013920020.8818092027840050.559095398607998
1360.4433797600969560.8867595201939120.556620239903044
1370.3990746657787180.7981493315574360.600925334221282
1380.3654779510367080.7309559020734160.634522048963292
1390.3474507874875120.6949015749750240.652549212512488
1400.3073774481161690.6147548962323380.692622551883831
1410.2716633034827370.5433266069654730.728336696517264
1420.285226503807550.57045300761510.71477349619245
1430.2497082878113290.4994165756226580.750291712188671
1440.2652288173313150.530457634662630.734771182668685
1450.41189522304880.82379044609760.5881047769512
1460.3811166337940840.7622332675881690.618883366205916
1470.3997748748402530.7995497496805070.600225125159747
1480.3590553327199950.718110665439990.640944667280005
1490.3150504962313190.6301009924626380.684949503768681
1500.2734384535569040.5468769071138080.726561546443096
1510.2372028669615420.4744057339230850.762797133038458
1520.3962798011294870.7925596022589750.603720198870513
1530.346859501475780.693719002951560.65314049852422
1540.3160260606152070.6320521212304150.683973939384793
1550.2726923804286900.5453847608573790.72730761957131
1560.2379211878790650.4758423757581290.762078812120935
1570.2408579872699450.4817159745398890.759142012730055
1580.2372864158285480.4745728316570950.762713584171453
1590.1988108996124740.3976217992249480.801189100387526
1600.1627581812124260.3255163624248510.837241818787574
1610.1370372142810660.2740744285621310.862962785718934
1620.1154269284110260.2308538568220520.884573071588974
1630.1217476227680370.2434952455360740.878252377231963
1640.1047490751731660.2094981503463310.895250924826834
1650.1257839601781310.2515679203562610.874216039821869
1660.1140611495062330.2281222990124660.885938850493767
1670.1649481814534920.3298963629069830.835051818546508
1680.2030215628754230.4060431257508450.796978437124577
1690.1955942832168850.391188566433770.804405716783115
1700.3019372081604860.6038744163209730.698062791839514
1710.3189872460807770.6379744921615540.681012753919223
1720.2590627623262120.5181255246524240.740937237673788
1730.2072318528499320.4144637056998630.792768147150068
1740.1814383989223160.3628767978446330.818561601077684
1750.1857026871275360.3714053742550730.814297312872464
1760.1563470849791660.3126941699583320.843652915020834
1770.1160174150441170.2320348300882340.883982584955883
1780.1020605940961490.2041211881922980.897939405903851
1790.0901741680289290.1803483360578580.90982583197107
1800.1351662217223720.2703324434447440.864833778277628
1810.1115344902226880.2230689804453760.888465509777312
1820.07726311056732140.1545262211346430.922736889432679
1830.05402914401000270.1080582880200050.945970855989997
1840.0512555479809750.102511095961950.948744452019025
1850.08654840045558130.1730968009111630.913451599544419
1860.04484173696538020.08968347393076030.95515826303462


Meta Analysis of Goldfeld-Quandt test for Heteroskedasticity
Description# significant tests% significant testsOK/NOK
1% type I error level270.151685393258427NOK
5% type I error level320.179775280898876NOK
10% type I error level340.191011235955056NOK
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/10m5jz1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/10m5jz1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/1qvl91293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/1qvl91293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/2qvl91293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/2qvl91293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/3qvl91293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/3qvl91293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/4j43c1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/4j43c1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/5j43c1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/5j43c1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/6j43c1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/6j43c1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/7twkw1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/7twkw1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/8m5jz1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/8m5jz1293537510.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/9m5jz1293537510.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/28/t1293537380ual4nrmee42ous4/9m5jz1293537510.ps (open in new window)


 
Parameters (Session):
par1 = 1 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;
 
Parameters (R input):
par1 = 1 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;
 
R code (references can be found in the software module):
library(lattice)
library(lmtest)
n25 <- 25 #minimum number of obs. for Goldfeld-Quandt test
par1 <- as.numeric(par1)
x <- t(y)
k <- length(x[1,])
n <- length(x[,1])
x1 <- cbind(x[,par1], x[,1:k!=par1])
mycolnames <- c(colnames(x)[par1], colnames(x)[1:k!=par1])
colnames(x1) <- mycolnames #colnames(x)[par1]
x <- x1
if (par3 == 'First Differences'){
x2 <- array(0, dim=c(n-1,k), dimnames=list(1:(n-1), paste('(1-B)',colnames(x),sep='')))
for (i in 1:n-1) {
for (j in 1:k) {
x2[i,j] <- x[i+1,j] - x[i,j]
}
}
x <- x2
}
if (par2 == 'Include Monthly Dummies'){
x2 <- array(0, dim=c(n,11), dimnames=list(1:n, paste('M', seq(1:11), sep ='')))
for (i in 1:11){
x2[seq(i,n,12),i] <- 1
}
x <- cbind(x, x2)
}
if (par2 == 'Include Quarterly Dummies'){
x2 <- array(0, dim=c(n,3), dimnames=list(1:n, paste('Q', seq(1:3), sep ='')))
for (i in 1:3){
x2[seq(i,n,4),i] <- 1
}
x <- cbind(x, x2)
}
k <- length(x[1,])
if (par3 == 'Linear Trend'){
x <- cbind(x, c(1:n))
colnames(x)[k+1] <- 't'
}
x
k <- length(x[1,])
df <- as.data.frame(x)
(mylm <- lm(df))
(mysum <- summary(mylm))
if (n > n25) {
kp3 <- k + 3
nmkm3 <- n - k - 3
gqarr <- array(NA, dim=c(nmkm3-kp3+1,3))
numgqtests <- 0
numsignificant1 <- 0
numsignificant5 <- 0
numsignificant10 <- 0
for (mypoint in kp3:nmkm3) {
j <- 0
numgqtests <- numgqtests + 1
for (myalt in c('greater', 'two.sided', 'less')) {
j <- j + 1
gqarr[mypoint-kp3+1,j] <- gqtest(mylm, point=mypoint, alternative=myalt)$p.value
}
if (gqarr[mypoint-kp3+1,2] < 0.01) numsignificant1 <- numsignificant1 + 1
if (gqarr[mypoint-kp3+1,2] < 0.05) numsignificant5 <- numsignificant5 + 1
if (gqarr[mypoint-kp3+1,2] < 0.10) numsignificant10 <- numsignificant10 + 1
}
gqarr
}
bitmap(file='test0.png')
plot(x[,1], type='l', main='Actuals and Interpolation', ylab='value of Actuals and Interpolation (dots)', xlab='time or index')
points(x[,1]-mysum$resid)
grid()
dev.off()
bitmap(file='test1.png')
plot(mysum$resid, type='b', pch=19, main='Residuals', ylab='value of Residuals', xlab='time or index')
grid()
dev.off()
bitmap(file='test2.png')
hist(mysum$resid, main='Residual Histogram', xlab='values of Residuals')
grid()
dev.off()
bitmap(file='test3.png')
densityplot(~mysum$resid,col='black',main='Residual Density Plot', xlab='values of Residuals')
dev.off()
bitmap(file='test4.png')
qqnorm(mysum$resid, main='Residual Normal Q-Q Plot')
qqline(mysum$resid)
grid()
dev.off()
(myerror <- as.ts(mysum$resid))
bitmap(file='test5.png')
dum <- cbind(lag(myerror,k=1),myerror)
dum
dum1 <- dum[2:length(myerror),]
dum1
z <- as.data.frame(dum1)
z
plot(z,main=paste('Residual Lag plot, lowess, and regression line'), ylab='values of Residuals', xlab='lagged values of Residuals')
lines(lowess(z))
abline(lm(z))
grid()
dev.off()
bitmap(file='test6.png')
acf(mysum$resid, lag.max=length(mysum$resid)/2, main='Residual Autocorrelation Function')
grid()
dev.off()
bitmap(file='test7.png')
pacf(mysum$resid, lag.max=length(mysum$resid)/2, main='Residual Partial Autocorrelation Function')
grid()
dev.off()
bitmap(file='test8.png')
opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1, 0))
plot(mylm, las = 1, sub='Residual Diagnostics')
par(opar)
dev.off()
if (n > n25) {
bitmap(file='test9.png')
plot(kp3:nmkm3,gqarr[,2], main='Goldfeld-Quandt test',ylab='2-sided p-value',xlab='breakpoint')
grid()
dev.off()
}
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a, 'Multiple Linear Regression - Estimated Regression Equation', 1, TRUE)
a<-table.row.end(a)
myeq <- colnames(x)[1]
myeq <- paste(myeq, '[t] = ', sep='')
for (i in 1:k){
if (mysum$coefficients[i,1] > 0) myeq <- paste(myeq, '+', '')
myeq <- paste(myeq, mysum$coefficients[i,1], sep=' ')
if (rownames(mysum$coefficients)[i] != '(Intercept)') {
myeq <- paste(myeq, rownames(mysum$coefficients)[i], sep='')
if (rownames(mysum$coefficients)[i] != 't') myeq <- paste(myeq, '[t]', sep='')
}
}
myeq <- paste(myeq, ' + e[t]')
a<-table.row.start(a)
a<-table.element(a, myeq)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable1.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,hyperlink('http://www.xycoon.com/ols1.htm','Multiple Linear Regression - Ordinary Least Squares',''), 6, TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Variable',header=TRUE)
a<-table.element(a,'Parameter',header=TRUE)
a<-table.element(a,'S.D.',header=TRUE)
a<-table.element(a,'T-STAT<br />H0: parameter = 0',header=TRUE)
a<-table.element(a,'2-tail p-value',header=TRUE)
a<-table.element(a,'1-tail p-value',header=TRUE)
a<-table.row.end(a)
for (i in 1:k){
a<-table.row.start(a)
a<-table.element(a,rownames(mysum$coefficients)[i],header=TRUE)
a<-table.element(a,mysum$coefficients[i,1])
a<-table.element(a, round(mysum$coefficients[i,2],6))
a<-table.element(a, round(mysum$coefficients[i,3],4))
a<-table.element(a, round(mysum$coefficients[i,4],6))
a<-table.element(a, round(mysum$coefficients[i,4]/2,6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable2.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a, 'Multiple Linear Regression - Regression Statistics', 2, TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Multiple R',1,TRUE)
a<-table.element(a, sqrt(mysum$r.squared))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'R-squared',1,TRUE)
a<-table.element(a, mysum$r.squared)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Adjusted R-squared',1,TRUE)
a<-table.element(a, mysum$adj.r.squared)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'F-TEST (value)',1,TRUE)
a<-table.element(a, mysum$fstatistic[1])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'F-TEST (DF numerator)',1,TRUE)
a<-table.element(a, mysum$fstatistic[2])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'F-TEST (DF denominator)',1,TRUE)
a<-table.element(a, mysum$fstatistic[3])
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'p-value',1,TRUE)
a<-table.element(a, 1-pf(mysum$fstatistic[1],mysum$fstatistic[2],mysum$fstatistic[3]))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Multiple Linear Regression - Residual Statistics', 2, TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Residual Standard Deviation',1,TRUE)
a<-table.element(a, mysum$sigma)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Sum Squared Residuals',1,TRUE)
a<-table.element(a, sum(myerror*myerror))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable3.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a, 'Multiple Linear Regression - Actuals, Interpolation, and Residuals', 4, TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a, 'Time or Index', 1, TRUE)
a<-table.element(a, 'Actuals', 1, TRUE)
a<-table.element(a, 'Interpolation<br />Forecast', 1, TRUE)
a<-table.element(a, 'Residuals<br />Prediction Error', 1, TRUE)
a<-table.row.end(a)
for (i in 1:n) {
a<-table.row.start(a)
a<-table.element(a,i, 1, TRUE)
a<-table.element(a,x[i])
a<-table.element(a,x[i]-mysum$resid[i])
a<-table.element(a,mysum$resid[i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable4.tab')
if (n > n25) {
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Goldfeld-Quandt test for Heteroskedasticity',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'p-values',header=TRUE)
a<-table.element(a,'Alternative Hypothesis',3,header=TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'breakpoint index',header=TRUE)
a<-table.element(a,'greater',header=TRUE)
a<-table.element(a,'2-sided',header=TRUE)
a<-table.element(a,'less',header=TRUE)
a<-table.row.end(a)
for (mypoint in kp3:nmkm3) {
a<-table.row.start(a)
a<-table.element(a,mypoint,header=TRUE)
a<-table.element(a,gqarr[mypoint-kp3+1,1])
a<-table.element(a,gqarr[mypoint-kp3+1,2])
a<-table.element(a,gqarr[mypoint-kp3+1,3])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable5.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Meta Analysis of Goldfeld-Quandt test for Heteroskedasticity',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description',header=TRUE)
a<-table.element(a,'# significant tests',header=TRUE)
a<-table.element(a,'% significant tests',header=TRUE)
a<-table.element(a,'OK/NOK',header=TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'1% type I error level',header=TRUE)
a<-table.element(a,numsignificant1)
a<-table.element(a,numsignificant1/numgqtests)
if (numsignificant1/numgqtests < 0.01) dum <- 'OK' else dum <- 'NOK'
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'5% type I error level',header=TRUE)
a<-table.element(a,numsignificant5)
a<-table.element(a,numsignificant5/numgqtests)
if (numsignificant5/numgqtests < 0.05) dum <- 'OK' else dum <- 'NOK'
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'10% type I error level',header=TRUE)
a<-table.element(a,numsignificant10)
a<-table.element(a,numsignificant10/numgqtests)
if (numsignificant10/numgqtests < 0.1) dum <- 'OK' else dum <- 'NOK'
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable6.tab')
}
 





Copyright

Creative Commons License

This work is licensed under a Creative Commons Attribution-Noncommercial-Share Alike 3.0 License.

Software written by Ed van Stee & Patrick Wessa


Disclaimer

Information provided on this web site is provided "AS IS" without warranty of any kind, either express or implied, including, without limitation, warranties of merchantability, fitness for a particular purpose, and noninfringement. We use reasonable efforts to include accurate and timely information and periodically update the information, and software without notice. However, we make no warranties or representations as to the accuracy or completeness of such information (or software), and we assume no liability or responsibility for errors or omissions in the content of this web site, or any software bugs in online applications. Your use of this web site is AT YOUR OWN RISK. Under no circumstances and under no legal theory shall we be liable to you or any other person for any direct, indirect, special, incidental, exemplary, or consequential damages arising from your access to, or use of, this web site.


Privacy Policy

We may request personal information to be submitted to our servers in order to be able to:

  • personalize online software applications according to your needs
  • enforce strict security rules with respect to the data that you upload (e.g. statistical data)
  • manage user sessions of online applications
  • alert you about important changes or upgrades in resources or applications

We NEVER allow other companies to directly offer registered users information about their products and services. Banner references and hyperlinks of third parties NEVER contain any personal data of the visitor.

We do NOT sell, nor transmit by any means, personal information, nor statistical data series uploaded by you to third parties.

We carefully protect your data from loss, misuse, alteration, and destruction. However, at any time, and under any circumstance you are solely responsible for managing your passwords, and keeping them secret.

We store a unique ANONYMOUS USER ID in the form of a small 'Cookie' on your computer. This allows us to track your progress when using this website which is necessary to create state-dependent features. The cookie is used for NO OTHER PURPOSE. At any time you may opt to disallow cookies from this website - this will not affect other features of this website.

We examine cookies that are used by third-parties (banner and online ads) very closely: abuse from third-parties automatically results in termination of the advertising contract without refund. We have very good reason to believe that the cookies that are produced by third parties (banner ads) do NOT cause any privacy or security risk.

FreeStatistics.org is safe. There is no need to download any software to use the applications and services contained in this website. Hence, your system's security is not compromised by their use, and your personal data - other than data you submit in the account application form, and the user-agent information that is transmitted by your browser - is never transmitted to our servers.

As a general rule, we do not log on-line behavior of individuals (other than normal logging of webserver 'hits'). However, in cases of abuse, hacking, unauthorized access, Denial of Service attacks, illegal copying, hotlinking, non-compliance with international webstandards (such as robots.txt), or any other harmful behavior, our system engineers are empowered to log, track, identify, publish, and ban misbehaving individuals - even if this leads to ban entire blocks of IP addresses, or disclosing user's identity.


FreeStatistics.org is powered by