Home » date » 2010 » Dec » 26 »

*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: Sun, 26 Dec 2010 20:25:18 +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/26/t1293395012411t5kacvd9ugti.htm/, Retrieved Sun, 26 Dec 2010 21:23:34 +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/26/t1293395012411t5kacvd9ugti.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 «
27 5 26 49 35 18 36 4 25 45 34 10 25 4 17 54 13 23 27 3 37 36 35 14 25 3 35 36 28 20 44 3 15 53 32 15 50 4 27 46 35 18 41 4 36 42 36 19 48 5 25 41 27 19 43 4 30 45 29 14 47 2 27 47 27 15 41 3 33 42 28 14 44 2 29 45 29 16 47 5 30 40 28 13 40 3 25 45 30 13 46 3 23 40 25 14 28 3 26 42 15 23 56 3 24 45 33 17 49 4 35 47 31 14 25 4 39 31 37 21 41 4 23 46 37 15 26 3 32 34 34 19 50 5 29 43 32 20 47 4 26 45 21 18 52 2 21 42 25 13 37 5 35 51 32 20 41 3 23 44 28 12 45 4 21 47 22 17 26 4 28 47 25 13 3 30 41 26 17 52 4 21 44 34 16 46 2 29 51 34 20 58 3 28 46 36 18 54 5 19 47 36 9 29 3 26 46 26 14 50 3 33 38 26 12 43 2 34 50 34 21 30 3 33 48 33 16 47 2 40 36 31 12 45 3 24 51 33 20 48 1 35 35 22 18 48 3 35 49 29 22 26 4 32 38 24 17 46 5 20 47 37 16 3 35 36 32 14 50 3 35 47 23 19 25 4 21 46 29 21 47 2 33 43 35 18 47 2 40 53 20 23 41 3 22 55 28 20 45 2 35 39 26 10 41 4 20 55 36 16 45 5 28 41 26 18 40 3 46 33 33 12 29 4 18 52 25 15 34 5 22 42 29 19 45 5 20 56 32 11 52 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 time8 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk
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
Extrinsieke_waarden[t] = + 51.6702289080872 -0.395745066818002leeftijd[t] -0.183028527512322opleiding[t] -0.0163919147761365Neuroticisme[t] + 0.0169086989274354Extraversie[t] -0.619153712609344Openheid[t] + e[t]


Multiple Linear Regression - Ordinary Least Squares
VariableParameterS.D.T-STAT
H0: parameter = 0
2-tail p-value1-tail p-value
(Intercept)51.67022890808726.5666327.868600
leeftijd-0.3957450668180020.057026-6.939700
opleiding-0.1830285275123220.059501-3.07610.0024090.001204
Neuroticisme-0.01639191477613650.081075-0.20220.8399930.419996
Extraversie0.01690869892743540.0816750.2070.8362130.418107
Openheid-0.6191537126093440.051566-12.007100


Multiple Linear Regression - Regression Statistics
Multiple R0.772056943864005
R-squared0.596071924568628
Adjusted R-squared0.585385996647163
F-TEST (value)55.7810167679772
F-TEST (DF numerator)5
F-TEST (DF denominator)189
p-value0
Multiple Linear Regression - Residual Statistics
Residual Standard Deviation8.61753412815762
Sum Squared Residuals14035.4980510427


Multiple Linear Regression - Actuals, Interpolation, and Residuals
Time or IndexActualsInterpolation
Forecast
Residuals
Prediction Error
11818.8019259883771-0.801925988377056
21015.9911597462033-5.9911597462033
32333.6298970545535-10.6298970545535
41418.7678588948077-4.76785889480773
52023.9262088462614-3.92620884626141
61514.54572390357110.454276096428875
7189.815699967517088.18430003248292
81912.54308982757486.45691017242522
91915.32563160943063.67436839056938
101416.2347532676433-2.23475326764332
111516.3391306227979-1.33913062279792
121417.7285238002903-3.72852380029027
131616.2214571706261-0.221457170626098
141315.0033546908312-2.00335469083116
151317.067822856881-4.06782285688098
161417.7373613539348-3.73736135393479
172331.0369513362787-8.03695133627873
18178.894832564741068.10516743525894
191412.57383326549081.42616673450919
202118.02068575152332.97931424847673
211512.2046658027652.79533419723505
221919.8308998502609-0.830899850260884
232011.40662265149828.59337734850178
241819.6705703603506-1.67057036035061
251315.6125207079462-2.61252070794625
262016.58822662289493.4117733771051
271217.9262603459065-5.92626034590651
281719.9586837531128-2.95868375311282
291325.5056354813939-12.5056354813939
305234.234082434196417.7659175658036
314636.19084167468979.80915832531032
325832.926745334356825.0732546656432
335434.068113192005319.9318868079947
342940.4798713046882-11.4798713046882
355036.74169810819313.258301891807
364336.82994115903456.17005884096547
373031.408840898962-1.40884089896195
384734.307768053327812.6922319466722
394536.06181385745578.93818614254427
404833.429234206172914.5707657938271
414833.521992910608514.4780070893915
422630.1427620121612-4.14276201216124
434633.487638658827312.5123613411727
44335.9796754878379-32.9796754878379
453-0.01538053930598783.01538053930599
46413.6822192009145-9.68221920091448
4725.7197628956713-3.7197628956713
4821.370830090953120.629169909046876
4930.8156738400391752.18432615996082
5024.91455172230979-2.91455172230979
5145.03863398458822-1.03863398458822
5255.50727174202696-0.507271742026957
5338.19721570131841-5.19721570131841
5449.13252796039819-5.13252796039819
55513.8219406605128-8.82194066051279
5657.26062196626641-2.26062196626641
5730.9711913907165942.02880860928341
5847.66880992076137-3.66880992076137
5933.45231065607589-0.452310656075894
6035.9594177569938-2.9594177569938
6120.4758358812778371.52416411872216
62317.3782943696117-14.3782943696117
63412.7437386882196-8.74373868821962
64413.4585979713591-9.45859797135909
6542.171544117270491.82845588272951
6640.5767809934845663.42321900651543
6731.496760527202981.50323947279702
683-2.60134318527315.6013431852731
6939.772780038826-6.77278003882601
702-3.765799222340275.76579922234027
7136.89116000594672-3.89116000594672
72311.8139072306387-8.81390723063871
7332.04926488660230.9507351133977
74313.3031483914398-10.3031483914398
75512.7536466972975-7.75364669729751
7630.02519541688570512.97480458311429
77510.3936096618548-5.39360966185483
7846.2559484230213-2.2559484230213
7946.98816097820314-2.98816097820314
80411.4903989747347-7.4903989747347
81515.9276165330697-10.9276165330697
82424.8871682212458-20.8871682212458
8357.16634290676526-2.16634290676526
843-1.830307467955674.83030746795567
8534.87317973850349-1.87317973850349
8625.51210863818375-3.51210863818375
87314.6257586715038-11.6257586715038
884-0.2520183975954834.25201839759548
8953.854668357165931.14533164283407
90510.0378246577564-5.03782465775643
91312.3389975666148-9.33899756661483
9222.66691816060563-0.666918160605627
933-2.516127504446235.51612750444623
9442.142335777677841.85766422232216
95110.2293245411558-9.22932454115584
9643.794120333909410.205879666090589
97310.6489738847821-7.64897388478212
983-1.779435671928394.77943567192839
99418.4711818380005-14.4711818380005
10037.67953358786051-4.67953358786051
101415.3379504035163-11.3379504035163
10226.20332274669885-4.20332274669885
10331.018031374124471.98196862587553
10434.4643189336306-1.4643189336306
105314.640862731438-11.640862731438
1062-2.82378492246114.8237849224611
10756.39962241430445-1.39962241430445
10852.034011847657292.96598815234271
109412.6031540916678-8.60315409166782
11023.56166666267819-1.56166666267819
1113-0.2758359449294423.27583594492944
112318.660940643002-15.660940643002
11338.6287936007036-5.6287936007036
11447.94289963663601-3.94289963663601
11550.9742889965205154.02571100347948
11644.26201525734727-0.262015257347274
1172215.74660832741866.25339167258142
1181629.4773687856011-13.4773687856011
1193627.70808071499168.29191928500837
1203527.66254252949747.33745747050262
1212532.8032276691393-7.80322766913934
1222727.7377565717583-0.737756571758339
1233239.7176605639378-7.71766056393782
1243628.51560448039477.48439551960526
1255126.26453229687324.735467703127
1263033.4619034750429-3.4619034750429
1272024.7827617953287-4.78276179532871
1282922.56768576116096.43231423883908
1292624.89595973345661.10404026654335
1302025.9520626433011-5.95206264330109
1314026.824634256057913.1753657439421
1322927.77331504801111.22668495198891
1333225.41884916378946.58115083621057
1343326.16826801459646.83173198540359
1353229.13452367991562.86547632008437
1363426.33320036456127.66679963543884
1372427.583832387369-3.583832387369
1382525.6900538576242-0.690053857624205
1394126.759798992468214.2402010075318
1403930.02487905876028.97512094123978
1412129.2802481334569-8.28024813345693
1423825.86762011753412.132379882466
1432828.6966078704013-0.696607870401336
1443727.01652832173829.98347167826177
1454612.960054731214133.0399452687859
1463918.284645747128820.7153542528712
1472115.084889672555.91511032744997
1483116.399920229076714.6000797709233
1492513.738293219165611.2617067808344
150298.0299762391448520.9700237608551
1513111.462035030696919.5379649693031
1521328.0419159658629-15.0419159658629
1531516.2661574009106-1.26615740091061
1541312.50723203808370.492767961916336
1551320.3538530660089-7.35385306600887
1562321.59198501941411.4080149805859
1571816.82198606283411.17801393716593
1582122.4481276054442-1.44812760544419
1591421.1552313637675-7.15523136376752
1601217.5075284190865-5.5075284190865
1611718.8364252752152-1.83642527521522
1621110.80299794153130.19700205846867
1631525.2145549279422-10.2145549279422
1641411.29652053112922.7034794688708
1651925.7472534828519-6.7472534828519
1661218.5742659031445-6.57426590314448
1671416.6987196731255-2.69871967312549
1681819.2202746752643-1.22027467526427
1692525.2518562706378-0.251856270637825
1702230.4205522005948-8.4205522005948
171159.7268734728255.273126527175
1721819.5832303611929-1.58323036119289
1731812.55429871821175.44570128178825
1741218.9033726306047-6.90337263060474
175129.609546148635562.39045385136445
1761618.2248210365886-2.22482103658862
1772213.68497446937468.31502553062536
1781513.45143242884411.54856757115593
1791618.9045719679274-2.90457196792738
1801110.13398104427340.866018955726642
1812011.79773370313018.20226629686994
1821410.36785403016013.63214596983987
1832014.43957324521695.56042675478307
184157.550369665523637.44963033447637
1851217.075962674728-5.07596267472798
1861823.4142338804761-5.4142338804761
1871811.53063653753676.46936346246327
1881118.4728785812341-7.47287858123412
1891321.6327015628821-8.63270156288208
1901520.4684106306467-5.46841063064672
1911921.9170116277901-2.9170116277901
1921316.4592325221835-3.45923252218351
193197.6216419485631911.3783580514368
1941818.088703787166-0.0887037871659828
1951818.8019259883772-0.801925988377244


Goldfeld-Quandt test for Heteroskedasticity
p-valuesAlternative Hypothesis
breakpoint indexgreater2-sidedless
90.07239473086286680.1447894617257340.927605269137133
100.07628945112818780.1525789022563760.923710548871812
110.03189224811061780.06378449622123560.968107751889382
120.01642364993085310.03284729986170620.983576350069147
130.006389040910829750.01277808182165950.99361095908917
140.004560058230166830.009120116460333670.995439941769833
150.001966874874958360.003933749749916720.998033125125042
160.000695822144429560.001391644288859120.99930417785557
170.0003428454874276210.0006856909748552430.999657154512572
180.0002439546345230160.0004879092690460310.999756045365477
190.000111160643280830.000222321286561660.99988883935672
209.03019693515803e-050.0001806039387031610.999909698030648
213.19821097182198e-056.39642194364396e-050.999968017890282
221.19745945306387e-052.39491890612774e-050.99998802540547
238.83423140540362e-061.76684628108072e-050.999991165768595
243.00479589071574e-066.00959178143148e-060.99999699520411
251.14563864693173e-062.29127729386345e-060.999998854361353
264.39428532750162e-078.78857065500325e-070.999999560571467
272.88079486265597e-075.76158972531194e-070.999999711920514
289.4298437677921e-081.88596875355842e-070.999999905701562
292.08316000049346e-074.16632000098692e-070.999999791684
308.92803331469963e-081.78560666293993e-070.999999910719667
314.64100000938749e-089.28200001877498e-080.99999995359
325.7954760689335e-081.1590952137867e-070.99999994204524
333.40784191186697e-086.81568382373394e-080.99999996592158
344.81310594233458e-069.62621188466916e-060.999995186894058
352.81668785757114e-065.63337571514228e-060.999997183312142
365.07145750806358e-050.0001014291501612720.99994928542492
370.01118613238311790.02237226476623580.988813867616882
380.0102526182650360.02050523653007210.989747381734964
390.01247377053195620.02494754106391240.987526229468044
400.0183175156077270.03663503121545390.981682484392273
410.02146478434138820.04292956868277650.978535215658612
420.1470270828403810.2940541656807630.852972917159619
430.1894821981847150.378964396369430.810517801815285
440.860942017292960.2781159654140820.139057982707041
450.9573652613797840.08526947724043250.0426347386202163
460.985966487942970.028067024114060.01403351205703
470.9869740108347230.02605197833055450.0130259891652773
480.9841706898862830.03165862022743440.0158293101137172
490.978854480559030.04229103888193830.0211455194409691
500.9748207122554440.05035857548911130.0251792877445556
510.9679079035878720.06418419282425550.0320920964121277
520.962097423348760.0758051533024820.037902576651241
530.9555717016951470.08885659660970640.0444282983048532
540.95247688122310.09504623755379840.0475231187768992
550.9488644182875660.1022711634248680.051135581712434
560.936008506455270.127982987089460.0639914935447301
570.922362010807850.15527597838430.0776379891921502
580.9098932272089280.1802135455821450.0901067727910724
590.8929417950201750.214116409959650.107058204979825
600.8733872562938870.2532254874122270.126612743706113
610.8502279476082580.2995441047834850.149772052391742
620.8782492156172460.2435015687655080.121750784382754
630.8705680163718850.2588639672562290.129431983628115
640.8641905420794080.2716189158411850.135809457920592
650.8412507853693170.3174984292613660.158749214630683
660.8172548465974960.3654903068050080.182745153402504
670.7877227569144570.4245544861710870.212277243085543
680.7645378165413980.4709243669172030.235462183458602
690.7454269241294880.5091461517410230.254573075870512
700.718195893063430.563608213873140.28180410693657
710.6899689172709110.6200621654581780.310031082729089
720.6829949337479150.6340101325041690.317005066252085
730.6514088611391170.6971822777217670.348591138860883
740.6501991647307130.6996016705385740.349800835269287
750.6300772396046010.7398455207907970.369922760395399
760.5976414464322310.8047171071355380.402358553567769
770.5803303239113160.8393393521773670.419669676088684
780.5531009209604660.8937981580790690.446899079039534
790.5128091963230870.9743816073538270.487190803676913
800.4891096486177850.978219297235570.510890351382215
810.484120871155780.968241742311560.51587912884422
820.6151971393035280.7696057213929450.384802860696472
830.5746361444058760.8507277111882490.425363855594124
840.5473395846561730.9053208306876530.452660415343827
850.5074009205228620.9851981589542760.492599079477138
860.479780349365520.959560698731040.52021965063448
870.5006193083567430.9987613832865150.499380691643257
880.473245271352910.946490542705820.52675472864709
890.4321207730001340.8642415460002680.567879226999866
900.4024735442187760.8049470884375520.597526455781224
910.3952549368708710.7905098737417410.604745063129129
920.3580874785008090.7161749570016180.641912521499191
930.3253313135015450.650662627003090.674668686498455
940.2892572184455730.5785144368911450.710742781554427
950.3001537159579420.6003074319158830.699846284042058
960.2858677119019710.5717354238039420.714132288098029
970.2968548324181040.5937096648362070.703145167581896
980.270409092061730.540818184123460.72959090793827
990.3066942945723670.6133885891447350.693305705427633
1000.2944673322617940.5889346645235890.705532667738206
1010.3175279748281470.6350559496562940.682472025171853
1020.3007697022996920.6015394045993840.699230297700308
1030.287374651388320.5747493027766390.71262534861168
1040.2640489719563850.528097943912770.735951028043615
1050.3167673770986380.6335347541972760.683232622901362
1060.2963571143794260.5927142287588530.703642885620574
1070.2861840404890850.572368080978170.713815959510915
1080.2529859137519470.5059718275038930.747014086248053
1090.2977862329007320.5955724658014640.702213767099268
1100.2891185120265950.578237024053190.710881487973405
1110.2769589656416010.5539179312832020.723041034358399
1120.4745970354610390.9491940709220780.525402964538961
1130.5725409776987740.8549180446024520.427459022301226
1140.6453847486804980.7092305026390040.354615251319502
1150.7290392711460880.5419214577078240.270960728853912
1160.9142570162877260.1714859674245480.085742983712274
1170.9499261234662180.1001477530675650.0500738765337825
1180.9732917053206360.05341658935872880.0267082946793644
1190.9905098324632550.01898033507349020.0094901675367451
1200.9935447913117420.01291041737651670.00645520868825833
1210.992793267312670.0144134653746580.00720673268732901
1220.9921111487465440.01577770250691230.00788885125345614
1230.991121258296810.0177574834063820.008878741703191
1240.9929027707260530.01419445854789360.0070972292739468
1250.9998791506428470.0002416987143056610.00012084935715283
1260.9998132141206720.0003735717586558410.00018678587932792
1270.999813832721450.0003723345571002110.000186167278550105
1280.9998410496266830.0003179007466342940.000158950373317147
1290.9997633177850160.0004733644299672460.000236682214983623
1300.9999587937463418.24125073173378e-054.12062536586689e-05
1310.9999801657046823.96685906359102e-051.98342953179551e-05
1320.99996787649836.42470033992808e-053.21235016996404e-05
1330.9999540559998069.18880003874685e-054.59440001937342e-05
1340.9999277177688470.0001445644623059167.22822311529578e-05
1350.999919948287150.0001601034257014628.00517128507312e-05
1360.999922652951350.0001546940972979197.73470486489596e-05
1370.9999112961398340.0001774077203322458.87038601661227e-05
1380.9998837296280870.0002325407438267680.000116270371913384
1390.999903087271160.0001938254576806169.69127288403079e-05
1400.9999723315941125.53368117752725e-052.76684058876362e-05
1410.999990245425611.95091487794429e-059.75457438972146e-06
1420.9999948075925651.03848148699478e-055.19240743497392e-06
1430.999992064386511.5871226979395e-057.93561348969751e-06
1440.9999899057696482.01884607037678e-051.00942303518839e-05
1450.9999999836050123.27899768223162e-081.63949884111581e-08
1460.9999999992489461.50210778805624e-097.51053894028118e-10
1470.9999999984775093.04498298034612e-091.52249149017306e-09
1480.99999999923821.52360107378778e-097.6180053689389e-10
1490.9999999992838771.43224624477926e-097.16123122389632e-10
1500.999999999121551.75689946393858e-098.78449731969291e-10
1510.999999999305071.38985904424466e-096.94929522122331e-10
1520.9999999997417575.16485347143555e-102.58242673571777e-10
1530.9999999993170021.36599522993272e-096.8299761496636e-10
1540.9999999982980273.40394630649229e-091.70197315324615e-09
1550.9999999962949287.41014420560039e-093.70507210280019e-09
1560.9999999980714263.8571481297483e-091.92857406487415e-09
1570.9999999963684077.26318532274455e-093.63159266137227e-09
1580.9999999934536171.30927665955757e-086.54638329778787e-09
1590.9999999887293252.25413489443101e-081.1270674472155e-08
1600.9999999827933023.44133956909037e-081.72066978454518e-08
1610.9999999582626148.34747718957871e-084.17373859478935e-08
1620.9999999183487731.63302454774757e-078.16512273873784e-08
1630.9999998296999233.40600154753477e-071.70300077376738e-07
1640.9999996784499576.43100086565324e-073.21550043282662e-07
1650.999999169563231.66087353855275e-068.30436769276376e-07
1660.9999986690224222.66195515550043e-061.33097757775022e-06
1670.9999974223877435.15522451391295e-062.57761225695647e-06
1680.999993400895021.3198209960926e-056.59910498046298e-06
1690.99999739928235.20143540045805e-062.60071770022902e-06
1700.9999969072961786.18540764446703e-063.09270382223351e-06
1710.9999917745523171.64508953661313e-058.22544768306563e-06
1720.9999871171655622.57656688756474e-051.28828344378237e-05
1730.999967890384316.42192313814328e-053.21096156907164e-05
1740.9999196310683250.0001607378633503498.03689316751746e-05
1750.9998768012659580.0002463974680838480.000123198734041924
1760.9996719398382450.0006561203235106550.000328060161755328
1770.9996803317793310.0006393364413375920.000319668220668796
1780.9991454286534330.001709142693134760.000854571346567379
1790.9978032142383830.004393571523233110.00219678576161656
1800.997964025266120.004071949467758970.00203597473387949
1810.9955035559168770.00899288816624520.0044964440831226
1820.9886489320215450.02270213595691030.0113510679784551
1830.985588468810450.02882306237910040.0144115311895502
1840.966018923067120.067962153865760.03398107693288
1850.9805321038857660.03893579222846730.0194678961142336
1860.939365304787580.121269390424840.06063469521242


Meta Analysis of Goldfeld-Quandt test for Heteroskedasticity
Description# significant tests% significant testsOK/NOK
1% type I error level800.449438202247191NOK
5% type I error level1000.561797752808989NOK
10% type I error level1090.612359550561798NOK
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/10kljd1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/10kljd1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/1d24j1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/1d24j1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/2d24j1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/2d24j1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/3ou341293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/3ou341293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/4ou341293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/4ou341293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/5ou341293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/5ou341293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/6z32p1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/6z32p1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/7rc2s1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/7rc2s1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/8rc2s1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/8rc2s1293395106.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/9rc2s1293395106.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/26/t1293395012411t5kacvd9ugti/9rc2s1293395106.ps (open in new window)


 
Parameters (Session):
par1 = 6 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;
 
Parameters (R input):
par1 = 6 ; 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