R version 3.3.0 (2016-05-03) -- "Supposedly Educational" Copyright (C) 2016 The R Foundation for Statistical Computing Platform: x86_64-pc-linux-gnu (64-bit) R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > y <- c(0.485602623 + ,0.470553883 + ,0.477965949 + ,0.49638381 + ,0.521764521 + ,0.525582858 + ,0.518844616 + ,0.509411078 + ,0.482682719 + ,0.486545977 + ,0.479807736 + ,0.489645568 + ,0.499663088 + ,0.500247069 + ,0.497417007 + ,0.495350613 + ,0.482278424 + ,0.473473788 + ,0.472260905 + ,0.473698396 + ,0.481649522 + ,0.474282377 + ,0.464085171 + ,0.463276582 + ,0.462018777 + ,0.463456269 + ,0.476528458 + ,0.468981627 + ,0.477786263 + ,0.477381968 + ,0.469385922 + ,0.48187413 + ,0.512959885 + ,0.512959885 + ,0.505997035 + ,0.509455999 + ,0.472036297 + ,0.44508333 + ,0.500471677 + ,0.485333094 + ,0.490454157 + ,0.474731593 + ,0.462018777 + ,0.470419119 + ,0.45038408 + ,0.458784421 + ,0.43281973 + ,0.429944746 + ,0.41583936 + ,0.393109025 + ,0.388437177 + ,0.393109025 + ,0.411122591 + ,0.395804321 + ,0.403306231 + ,0.414806163 + ,0.403710525 + ,0.40384529 + ,0.40384529 + ,0.40384529 + ,0.415614752 + ,0.42585688 + ,0.43645838 + ,0.441399757 + ,0.399173442 + ,0.396478146 + ,0.406944881 + ,0.419702619 + ,0.420106913 + ,0.399712502 + ,0.404653879 + ,0.406585508 + ,0.413772966 + ,0.443645838 + ,0.433224024 + ,0.426261174 + ,0.414401869 + ,0.397646108 + ,0.385652037 + ,0.378868874 + ,0.375769283 + ,0.392839495 + ,0.433808005 + ,0.426261174 + ,0.442388033 + ,0.446071605 + ,0.461210188 + ,0.421140111 + ,0.426440861 + ,0.418714343 + ,0.443241544 + ,0.45038408 + ,0.47185661 + ,0.49108306 + ,0.480616325 + ,0.464264858 + ,0.472665199 + ,0.482907327 + ,0.492295944 + ,0.486141683 + ,0.48021203 + ,0.490454157 + ,0.476528458 + ,0.487579174 + ,0.470598805 + ,0.45038408 + ,0.47881946 + ,0.468173038 + ,0.485333094 + ,0.493104533 + ,0.49413773 + ,0.489016666 + ,0.511297785 + ,0.508243116 + ,0.513543866 + ,0.521315305 + ,0.524190288 + ,0.52091101 + ,0.551188177 + ,0.555051435 + ,0.551188177 + ,0.550963569 + ,0.549930372 + ,0.559139302 + ,0.559139302 + ,0.555276043 + ,0.531737119 + ,0.53317461 + ,0.53317461 + ,0.527649252 + ,0.526840663 + ,0.525403171 + ,0.515205966 + ,0.535241004 + ,0.547504604 + ,0.515789947 + ,0.522123894 + ,0.544000719 + ,0.545258524 + ,0.551367863 + ,0.571402902 + ,0.575086474 + ,0.576703652 + ,0.57998293 + ,0.596334396 + ,0.575311082 + ,0.570998607 + ,0.58222901 + ,0.594312924 + ,0.592650824 + ,0.590719195 + ,0.59170747 + ,0.579488792 + ,0.587170388 + ,0.59170747 + ,0.604285522 + ,0.606262073 + ,0.619424105 + ,0.626881092 + ,0.631418175 + ,0.685324109 + ,0.675486276 + ,0.672341764 + ,0.666232424 + ,0.661695342 + ,0.677238219 + ,0.678630789 + ,0.697497866 + ,0.700058398 + ,0.696913885 + ,0.685728404 + ,0.682583891 + ,0.677462827 + ,0.686312385 + ,0.686312385 + ,0.690445173 + ,0.68451552 + ,0.698306455 + ,0.687660033 + ,0.662683617 + ,0.659763712 + ,0.645388797 + ,0.647140739 + ,0.62180495 + ,0.607834329 + ,0.620187772 + ,0.608822605 + ,0.60311756 + ,0.62373658 + ,0.610574547 + ,0.633170118 + ,0.63712322 + ,0.665648443 + ,0.664255874 + ,0.681954989 + ,0.680787027 + ,0.667041013 + ,0.691792822 + ,0.696329904 + ,0.698306455 + ,0.713265352 + ,0.705988051 + ,0.69731818 + ,0.701046674 + ,0.719554378 + ,0.736085531 + ,0.738421455 + ,0.75890571 + ,0.764970127 + ,0.756929159 + ,0.73940973 + ,0.749247563 + ,0.737253493 + ,0.781096986 + ,0.801760927 + ,0.813754998 + ,0.818876061 + ,0.820268631 + ,0.817708099 + ,0.837159157 + ,0.835811509 + ,0.848793855 + ,0.868469521 + ,0.861955887 + ,0.860383631 + ,0.862135573 + ,0.851713759 + ,0.851534073 + ,0.853286016 + ,0.859395355 + ,0.831454113 + ,0.826557657 + ,0.820852612 + ,0.8283096 + ,0.831678721 + ,0.830465837 + ,0.843448183 + ,0.847580971 + ,0.842100535 + ,0.854094605 + ,0.84308881 + ,0.821256907 + ,0.823188536 + ,0.813395625 + ,0.795471902 + ,0.779749337 + ,0.768339248 + ,0.773639998 + ,0.7881946 + ,0.797044158 + ,0.782489556 + ,0.78680203 + ,0.799784376 + ,0.823592831 + ,0.8283096 + ,0.831274426 + ,0.833655272 + ,0.830286151 + ,0.806702304 + ,0.812587036 + ,0.805489421 + ,0.80099726 + ,0.796639863 + ,0.809846817 + ,0.819280356 + ,0.816540137 + ,0.813575311 + ,0.815147567 + ,0.828893581 + ,0.832666996 + ,0.856250842 + ,0.856655137 + ,0.856071156 + ,0.853780154 + ,0.861596514 + ,0.867526167 + ,0.863528143 + ,0.878981178 + ,0.88544989 + ,0.881047572 + ,0.879520237 + ,0.865235165 + ,0.859125825 + ,0.870940209 + ,0.866942186 + ,0.857778177 + ,0.852432505 + ,0.858541844 + ,0.849422757 + ,0.834329096 + ,0.841786083 + ,0.841786083 + ,0.857598491 + ,0.867121872 + ,0.867121872 + ,0.870760523 + ,0.881047572 + ,0.875162841 + ,0.868110148 + ,0.864651184 + ,0.866178518 + ,0.872871839 + ,0.87345582 + ,0.874399173 + ,0.888100265 + ,0.894434212 + ,0.882979201 + ,0.880508513 + ,0.879160864 + ,0.882799515 + ,0.876106195 + ,0.877229235 + ,0.863123849 + ,0.863123849 + ,0.863123849 + ,0.856655137 + ,0.852252819 + ,0.86483087 + ,0.859889493 + ,0.861416828 + ,0.872692152 + ,0.871703877 + ,0.873231212 + ,0.873231212 + ,0.869233188 + ,0.866178518 + ,0.860832847 + ,0.858766453 + ,0.853016486 + ,0.865819146 + ,0.868110148 + ,0.865414851 + ,0.849422757 + ,0.873994879 + ,0.880688199 + ,0.902609946 + ,0.928574637 + ,0.935807017 + ,0.942275729 + ,0.927990656 + ,0.935807017 + ,0.925879341 + ,0.906607969 + ,0.904900948 + ,0.901486905 + ,0.904316967 + ,0.901262297 + ,0.897848255 + ,0.901666592 + ,0.892906877 + ,0.928574637 + ,0.921881317 + ,0.908135304 + ,0.924172319 + ,0.924172319 + ,0.929877364 + ,0.917883294 + ,0.91388527 + ,0.919230942 + ,0.929338305 + ,0.913121603 + ,0.915592291 + ,0.910830601 + ,0.904721261 + ,0.88239522 + ,0.857598491 + ,0.851489151 + ,0.827456089 + ,0.829567405 + ,0.821930731 + ,0.810880014 + ,0.860832847 + ,0.819819415 + ,0.823637752 + ,0.826108441 + ,0.815237411 + ,0.829567405 + ,0.837743138 + ,0.862360181 + ,0.870760523 + ,0.870760523 + ,0.868469521 + ,0.891918602 + ,0.886617852 + ,0.886617852 + ,0.886617852 + ,0.886617852 + ,0.876285881 + ,0.866178518 + ,0.873635506 + ,0.84614348 + ,0.846727461 + ,0.82916311 + ,0.854723507 + ,0.877453843 + ,0.884865909 + ,0.882080769 + ,0.904227124 + ,0.916311037 + ,0.901441984 + ,0.917254391 + ,0.907775931 + ,0.904047437 + ,0.895647096 + ,0.889133462 + ,0.882844436 + ,0.873321055 + ,0.866852343 + ,0.854948116 + ,0.848209874 + ,0.852881721 + ,0.854543821 + ,0.848614168 + ,0.848973541 + ,0.853061408 + ,0.854948116 + ,0.874623782 + ,0.861641436 + ,0.854948116 + ,0.853241094 + ,0.848209874 + ,0.831858407 + ,0.851219622 + ,0.876151116 + ,0.853645389 + ,0.855846548 + ,0.847850501 + ,0.823098693 + ,0.832038094 + ,0.83221778 + ,0.819774494 + ,0.816046 + ,0.814024527 + ,0.823323301 + ,0.801895692 + ,0.852881721 + ,0.880778042 + ,0.897893176 + ,0.892322897 + ,0.907371636 + ,0.908494677 + ,0.904945869 + ,0.925070752 + ,0.933426171 + ,0.939580432 + ,0.966533399 + ,0.966174026 + ,0.956875253 + ,0.956875253 + ,0.945330398 + ,0.948474911 + ,0.943668299 + ,0.953146759 + ,0.946812812 + ,0.948879206 + ,0.945330398 + ,0.942185886 + ,0.941781591 + ,0.940119491 + ,0.960783433 + ,0.961681865 + ,0.949597952 + ,0.946992498 + ,0.944971026 + ,0.936031625 + ,0.930461345 + ,0.927676205 + ,0.925609811 + ,0.92057859 + ,0.920982885 + ,0.918736804 + ,0.916311037 + ,0.918736804 + ,0.908674363 + ,0.912402857 + ,0.920039531 + ,0.917434078 + ,0.924891065 + ,0.915367683 + ,0.894568977 + ,0.873321055 + ,0.877633529 + ,0.884506536 + ,0.885629576 + ,0.883024123 + ,0.900318943 + ,0.902340416 + ,0.906652891 + ,0.899016217 + ,0.898072863 + ,0.873725349 + ,0.886932303 + ,0.873141368 + ,0.868694129 + ,0.868334756 + ,0.856026234 + ,0.858272315 + ,0.845065361 + ,0.842639594 + ,0.837608373 + ,0.851219622 + ,0.846547774 + ,0.834823233 + ,0.835586901 + ,0.840213827 + ,0.84281928 + ,0.850635641 + ,0.863662908 + ,0.873141368 + ,0.867930461 + ,0.871119896 + ,0.861416828 + ,0.855666861 + ,0.865908989 + ,0.859215669 + ,0.861821122 + ,0.875387449 + ,0.873141368 + ,0.899016217 + ,0.915187997 + ,0.991464894 + ,0.990341853 + ,0.989802794 + ,1) > x <- c(0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.50009978 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.475753343 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.526641389 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.541209339 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,0.819796448 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,1.065855119 + ,5.065855119 + ,15.06585512 + ,9.065855119 + ,4.065855119 + ,1.854320495 + ,3.854320495 + ,1.854320495 + ,3.854320495 + ,2.854320495 + ,1.854320495 + ,3.854320495 + ,0.854320495 + ,20.85432049 + ,3.854320495 + ,4.854320495 + ,1.854320495 + ,6.854320495 + ,2.854320495 + ,3.854320495 + ,4.854320495 + ,1.854320495 + ,-0.145679505 + ,2.854320495 + ,2.854320495 + ,2.854320495 + ,5.854320495 + ,5.854320495 + ,1.854320495 + ,0.854320495 + ,3.854320495 + ,3.854320495 + ,-0.145679505 + ,0.854320495 + ,1.854320495 + ,20.85432049 + ,2.854320495 + ,3.854320495 + ,2.854320495 + ,1.854320495 + ,2.854320495 + ,3.854320495 + ,6.854320495 + ,0.854320495 + ,2.854320495 + ,2.854320495 + ,1.854320495 + ,1.854320495 + ,1.854320495 + ,5.854320495 + ,0.854320495 + ,0.854320495 + ,2.854320495 + ,2.854320495 + ,1.854320495 + ,1.854320495 + ,2.854320495 + ,0.854320495 + ,5.854320495 + ,5.854320495 + ,3.854320495 + ,1.854320495 + ,0.854320495 + ,6.854320495 + ,3.854320495 + ,1.854320495 + ,5.854320495 + ,0.854320495 + ,0.854320495 + ,4.854320495 + ,-0.145679505 + ,3 + ,7 + ,4 + ,1 + ,3 + ,5 + ,6 + ,11 + ,6 + ,7 + ,2 + ,1) > par8 = '1' > par7 = '0' > par6 = '0' > par5 = '1' > par4 = '1' > par3 = '0' > par2 = '0' > par1 = '1' > ylab = 'y' > xlab = 'x' > par8 <- '1' > par7 <- '0' > par6 <- '0' > par5 <- '1' > par4 <- '1' > par3 <- '0' > par2 <- '0' > par1 <- '1' > #'GNU S' R Code compiled by R2WASP v. 1.2.327 () > #Author: root > #To cite this work: Wessa P., (2013), Bivariate Granger Causality (v1.0.3) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_grangercausality.wasp/ > #Source of accompanying publication: Office for Research, Development, and Education > # > library(lmtest) Loading required package: zoo Attaching package: 'zoo' The following objects are masked from 'package:base': as.Date, as.Date.numeric > par1 <- as.numeric(par1) > par2 <- as.numeric(par2) > par3 <- as.numeric(par3) > par4 <- as.numeric(par4) > par5 <- as.numeric(par5) > par6 <- as.numeric(par6) > par7 <- as.numeric(par7) > par8 <- as.numeric(par8) > ox <- x > oy <- y > if (par1 == 0) { + x <- log(x) + } else { + x <- (x ^ par1 - 1) / par1 + } > if (par5 == 0) { + y <- log(y) + } else { + y <- (y ^ par5 - 1) / par5 + } > if (par2 > 0) x <- diff(x,lag=1,difference=par2) > if (par6 > 0) y <- diff(y,lag=1,difference=par6) > if (par3 > 0) x <- diff(x,lag=par4,difference=par3) > if (par7 > 0) y <- diff(y,lag=par4,difference=par7) > x [1] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [7] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [13] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [19] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [25] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [31] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [37] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [43] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [49] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [55] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [61] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [67] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [73] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [79] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [85] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [91] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [97] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [103] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [109] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 [115] -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.49990022 -0.52424666 [121] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [127] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [133] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [139] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [145] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [151] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [157] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [163] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [169] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [175] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 [181] -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.52424666 -0.47335861 [187] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [193] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [199] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [205] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [211] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [217] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [223] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [229] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [235] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [241] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 [247] -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.47335861 -0.45879066 [253] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [259] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [265] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [271] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [277] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [283] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [289] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [295] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [301] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [307] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.45879066 [313] -0.45879066 -0.45879066 -0.45879066 -0.45879066 -0.18020355 -0.18020355 [319] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [325] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [331] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [337] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [343] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [349] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [355] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [361] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [367] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [373] -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 -0.18020355 [379] -0.18020355 -0.18020355 0.06585512 0.06585512 0.06585512 0.06585512 [385] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [391] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [397] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [403] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [409] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [415] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [421] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [427] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [433] 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 0.06585512 [439] 0.06585512 0.06585512 0.06585512 0.06585512 4.06585512 14.06585512 [445] 8.06585512 3.06585512 0.85432050 2.85432050 0.85432050 2.85432050 [451] 1.85432050 0.85432050 2.85432050 -0.14567951 19.85432049 2.85432050 [457] 3.85432049 0.85432050 5.85432049 1.85432050 2.85432050 3.85432049 [463] 0.85432050 -1.14567950 1.85432050 1.85432050 1.85432050 4.85432049 [469] 4.85432049 0.85432050 -0.14567951 2.85432050 2.85432050 -1.14567950 [475] -0.14567951 0.85432050 19.85432049 1.85432050 2.85432050 1.85432050 [481] 0.85432050 1.85432050 2.85432050 5.85432049 -0.14567951 1.85432050 [487] 1.85432050 0.85432050 0.85432050 0.85432050 4.85432049 -0.14567951 [493] -0.14567951 1.85432050 1.85432050 0.85432050 0.85432050 1.85432050 [499] -0.14567951 4.85432049 4.85432049 2.85432050 0.85432050 -0.14567951 [505] 5.85432049 2.85432050 0.85432050 4.85432049 -0.14567951 -0.14567951 [511] 3.85432049 -1.14567950 2.00000000 6.00000000 3.00000000 0.00000000 [517] 2.00000000 4.00000000 5.00000000 10.00000000 5.00000000 6.00000000 [523] 1.00000000 0.00000000 > y [1] -0.514397377 -0.529446117 -0.522034051 -0.503616190 -0.478235479 [6] -0.474417142 -0.481155384 -0.490588922 -0.517317281 -0.513454023 [11] -0.520192264 -0.510354432 -0.500336912 -0.499752931 -0.502582993 [16] -0.504649387 -0.517721576 -0.526526212 -0.527739095 -0.526301604 [21] -0.518350478 -0.525717623 -0.535914829 -0.536723418 -0.537981223 [26] -0.536543731 -0.523471542 -0.531018373 -0.522213737 -0.522618032 [31] -0.530614078 -0.518125870 -0.487040115 -0.487040115 -0.494002965 [36] -0.490544001 -0.527963703 -0.554916670 -0.499528323 -0.514666906 [41] -0.509545843 -0.525268407 -0.537981223 -0.529580881 -0.549615920 [46] -0.541215579 -0.567180270 -0.570055254 -0.584160640 -0.606890975 [51] -0.611562823 -0.606890975 -0.588877409 -0.604195679 -0.596693769 [56] -0.585193837 -0.596289475 -0.596154710 -0.596154710 -0.596154710 [61] -0.584385248 -0.574143120 -0.563541620 -0.558600243 -0.600826558 [66] -0.603521854 -0.593055119 -0.580297381 -0.579893087 -0.600287498 [71] -0.595346121 -0.593414492 -0.586227034 -0.556354162 -0.566775976 [76] -0.573738826 -0.585598131 -0.602353892 -0.614347963 -0.621131126 [81] -0.624230717 -0.607160505 -0.566191995 -0.573738826 -0.557611967 [86] -0.553928395 -0.538789812 -0.578859889 -0.573559139 -0.581285657 [91] -0.556758456 -0.549615920 -0.528143390 -0.508916940 -0.519383675 [96] -0.535735142 -0.527334801 -0.517092673 -0.507704056 -0.513858317 [101] -0.519787970 -0.509545843 -0.523471542 -0.512420826 -0.529401195 [106] -0.549615920 -0.521180540 -0.531826962 -0.514666906 -0.506895467 [111] -0.505862270 -0.510983334 -0.488702215 -0.491756884 -0.486456134 [116] -0.478684695 -0.475809712 -0.479088990 -0.448811823 -0.444948565 [121] -0.448811823 -0.449036431 -0.450069628 -0.440860698 -0.440860698 [126] -0.444723957 -0.468262881 -0.466825390 -0.466825390 -0.472350748 [131] -0.473159337 -0.474596829 -0.484794034 -0.464758996 -0.452495396 [136] -0.484210053 -0.477876106 -0.455999281 -0.454741476 -0.448632137 [141] -0.428597098 -0.424913526 -0.423296348 -0.420017070 -0.403665604 [146] -0.424688918 -0.429001393 -0.417770990 -0.405687076 -0.407349176 [151] -0.409280805 -0.408292530 -0.420511208 -0.412829612 -0.408292530 [156] -0.395714478 -0.393737927 -0.380575895 -0.373118908 -0.368581825 [161] -0.314675891 -0.324513724 -0.327658236 -0.333767576 -0.338304658 [166] -0.322761781 -0.321369211 -0.302502134 -0.299941602 -0.303086115 [171] -0.314271596 -0.317416109 -0.322537173 -0.313687615 -0.313687615 [176] -0.309554827 -0.315484480 -0.301693545 -0.312339967 -0.337316383 [181] -0.340236288 -0.354611203 -0.352859261 -0.378195050 -0.392165671 [186] -0.379812228 -0.391177395 -0.396882440 -0.376263420 -0.389425453 [191] -0.366829882 -0.362876780 -0.334351557 -0.335744126 -0.318045011 [196] -0.319212973 -0.332958987 -0.308207178 -0.303670096 -0.301693545 [201] -0.286734648 -0.294011949 -0.302681820 -0.298953326 -0.280445622 [206] -0.263914469 -0.261578545 -0.241094290 -0.235029873 -0.243070841 [211] -0.260590270 -0.250752437 -0.262746507 -0.218903014 -0.198239073 [216] -0.186245002 -0.181123939 -0.179731369 -0.182291901 -0.162840843 [221] -0.164188491 -0.151206145 -0.131530479 -0.138044113 -0.139616369 [226] -0.137864427 -0.148286241 -0.148465927 -0.146713984 -0.140604645 [231] -0.168545887 -0.173442343 -0.179147388 -0.171690400 -0.168321279 [236] -0.169534163 -0.156551817 -0.152419029 -0.157899465 -0.145905395 [241] -0.156911190 -0.178743093 -0.176811464 -0.186604375 -0.204528098 [246] -0.220250663 -0.231660752 -0.226360002 -0.211805400 -0.202955842 [251] -0.217510444 -0.213197970 -0.200215624 -0.176407169 -0.171690400 [256] -0.168725574 -0.166344728 -0.169713849 -0.193297696 -0.187412964 [261] -0.194510579 -0.199002740 -0.203360137 -0.190153183 -0.180719644 [266] -0.183459863 -0.186424689 -0.184852433 -0.171106419 -0.167333004 [271] -0.143749158 -0.143344863 -0.143928844 -0.146219846 -0.138403486 [276] -0.132473833 -0.136471857 -0.121018822 -0.114550110 -0.118952428 [281] -0.120479763 -0.134764835 -0.140874175 -0.129059791 -0.133057814 [286] -0.142221823 -0.147567495 -0.141458156 -0.150577243 -0.165670904 [291] -0.158213917 -0.158213917 -0.142401509 -0.132878128 -0.132878128 [296] -0.129239477 -0.118952428 -0.124837159 -0.131889852 -0.135348816 [301] -0.133821482 -0.127128161 -0.126544180 -0.125600827 -0.111899735 [306] -0.105565788 -0.117020799 -0.119491487 -0.120839136 -0.117200485 [311] -0.123893805 -0.122770765 -0.136876151 -0.136876151 -0.136876151 [316] -0.143344863 -0.147747181 -0.135169130 -0.140110507 -0.138583172 [321] -0.127307848 -0.128296123 -0.126768788 -0.126768788 -0.130766812 [326] -0.133821482 -0.139167153 -0.141233547 -0.146983514 -0.134180854 [331] -0.131889852 -0.134585149 -0.150577243 -0.126005121 -0.119311801 [336] -0.097390054 -0.071425363 -0.064192983 -0.057724271 -0.072009344 [341] -0.064192983 -0.074120659 -0.093392031 -0.095099052 -0.098513095 [346] -0.095683033 -0.098737703 -0.102151745 -0.098333408 -0.107093123 [351] -0.071425363 -0.078118683 -0.091864696 -0.075827681 -0.075827681 [356] -0.070122636 -0.082116706 -0.086114730 -0.080769058 -0.070661695 [361] -0.086878397 -0.084407709 -0.089169399 -0.095278739 -0.117604780 [366] -0.142401509 -0.148510849 -0.172543911 -0.170432595 -0.178069269 [371] -0.189119986 -0.139167153 -0.180180585 -0.176362248 -0.173891559 [376] -0.184762589 -0.170432595 -0.162256862 -0.137639819 -0.129239477 [381] -0.129239477 -0.131530479 -0.108081398 -0.113382148 -0.113382148 [386] -0.113382148 -0.113382148 -0.123714119 -0.133821482 -0.126364494 [391] -0.153856520 -0.153272539 -0.170836890 -0.145276493 -0.122546157 [396] -0.115134091 -0.117919231 -0.095772876 -0.083688963 -0.098558016 [401] -0.082745609 -0.092224069 -0.095952563 -0.104352904 -0.110866538 [406] -0.117155564 -0.126678945 -0.133147657 -0.145051884 -0.151790126 [411] -0.147118279 -0.145456179 -0.151385832 -0.151026459 -0.146938592 [416] -0.145051884 -0.125376218 -0.138358564 -0.145051884 -0.146758906 [421] -0.151790126 -0.168141593 -0.148780378 -0.123848884 -0.146354611 [426] -0.144153452 -0.152149499 -0.176901307 -0.167961906 -0.167782220 [431] -0.180225506 -0.183954000 -0.185975473 -0.176676699 -0.198104308 [436] -0.147118279 -0.119221958 -0.102106824 -0.107677103 -0.092628364 [441] -0.091505323 -0.095054131 -0.074929248 -0.066573829 -0.060419568 [446] -0.033466601 -0.033825974 -0.043124747 -0.043124747 -0.054669602 [451] -0.051525089 -0.056331701 -0.046853241 -0.053187188 -0.051120794 [456] -0.054669602 -0.057814114 -0.058218409 -0.059880509 -0.039216567 [461] -0.038318135 -0.050402048 -0.053007502 -0.055028974 -0.063968375 [466] -0.069538655 -0.072323795 -0.074390189 -0.079421410 -0.079017115 [471] -0.081263196 -0.083688963 -0.081263196 -0.091325637 -0.087597143 [476] -0.079960469 -0.082565922 -0.075108935 -0.084632317 -0.105431023 [481] -0.126678945 -0.122366471 -0.115493464 -0.114370424 -0.116975877 [486] -0.099681057 -0.097659584 -0.093347109 -0.100983783 -0.101927137 [491] -0.126274651 -0.113067697 -0.126858632 -0.131305871 -0.131665244 [496] -0.143973766 -0.141727685 -0.154934639 -0.157360406 -0.162391627 [501] -0.148780378 -0.153452226 -0.165176767 -0.164413099 -0.159786173 [506] -0.157180720 -0.149364359 -0.136337092 -0.126858632 -0.132069539 [511] -0.128880104 -0.138583172 -0.144333139 -0.134091011 -0.140784331 [516] -0.138178878 -0.124612551 -0.126858632 -0.100983783 -0.084812003 [521] -0.008535106 -0.009658147 -0.010197206 0.000000000 > (gyx <- grangertest(y ~ x, order=par8)) Granger causality test Model 1: y ~ Lags(y, 1:1) + Lags(x, 1:1) Model 2: y ~ Lags(y, 1:1) Res.Df Df F Pr(>F) 1 520 2 521 -1 4.7451 0.02983 * --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 > (gxy <- grangertest(x ~ y, order=par8)) Granger causality test Model 1: x ~ Lags(x, 1:1) + Lags(y, 1:1) Model 2: x ~ Lags(x, 1:1) Res.Df Df F Pr(>F) 1 520 2 521 -1 24.222 1.154e-06 *** --- Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1 > postscript(file="/var/wessaorg/rcomp/tmp/13oan1466522692.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > op <- par(mfrow=c(2,1)) > (r <- ccf(ox,oy,main='Cross Correlation Function (raw data)',ylab='CCF',xlab='Lag (k)')) Autocorrelations of series 'X', by lag -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 0.203 0.211 0.216 0.221 0.223 0.231 0.238 0.241 0.249 0.247 0.246 0.255 0.253 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 0.261 0.272 0.277 0.277 0.281 0.288 0.294 0.308 0.319 0.328 0.328 0.322 0.318 2 3 4 5 6 7 8 9 10 11 12 13 14 0.312 0.309 0.311 0.310 0.312 0.310 0.308 0.304 0.301 0.301 0.302 0.300 0.299 15 16 17 18 19 20 21 22 23 24 0.298 0.299 0.300 0.299 0.299 0.293 0.297 0.295 0.296 0.297 > (r <- ccf(x,y,main='Cross Correlation Function (transformed and differenced)',ylab='CCF',xlab='Lag (k)')) Autocorrelations of series 'X', by lag -24 -23 -22 -21 -20 -19 -18 -17 -16 -15 -14 -13 -12 0.203 0.211 0.216 0.221 0.223 0.231 0.238 0.241 0.249 0.247 0.246 0.255 0.253 -11 -10 -9 -8 -7 -6 -5 -4 -3 -2 -1 0 1 0.261 0.272 0.277 0.277 0.281 0.288 0.294 0.308 0.319 0.328 0.328 0.322 0.318 2 3 4 5 6 7 8 9 10 11 12 13 14 0.312 0.309 0.311 0.310 0.312 0.310 0.308 0.304 0.301 0.301 0.302 0.300 0.299 15 16 17 18 19 20 21 22 23 24 0.298 0.299 0.300 0.299 0.299 0.293 0.297 0.295 0.296 0.297 > par(op) > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/2pwxq1466522692.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > op <- par(mfrow=c(2,1)) > acf(ox,lag.max=round(length(x)/2),main='ACF of x (raw)') > acf(x,lag.max=round(length(x)/2),main='ACF of x (transformed and differenced)') > par(op) > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/3i2ks1466522692.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > op <- par(mfrow=c(2,1)) > acf(oy,lag.max=round(length(y)/2),main='ACF of y (raw)') > acf(y,lag.max=round(length(y)/2),main='ACF of y (transformed and differenced)') > par(op) > dev.off() null device 1 > > #Note: the /var/wessaorg/rcomp/createtable file can be downloaded at http://www.wessa.net/cretab > load(file="/var/wessaorg/rcomp/createtable") > > a<-table.start() > a<-table.row.start(a) > a<-table.element(a,'Granger Causality Test: Y = f(X)',5,TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Model',header=TRUE) > a<-table.element(a,'Res.DF',header=TRUE) > a<-table.element(a,'Diff. DF',header=TRUE) > a<-table.element(a,'F',header=TRUE) > a<-table.element(a,'p-value',header=TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Complete model',header=TRUE) > a<-table.element(a,gyx$Res.Df[1]) > a<-table.element(a,'') > a<-table.element(a,'') > a<-table.element(a,'') > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Reduced model',header=TRUE) > a<-table.element(a,gyx$Res.Df[2]) > a<-table.element(a,gyx$Df[2]) > a<-table.element(a,gyx$F[2]) > a<-table.element(a,gyx$Pr[2]) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/4jgqe1466522692.tab") > a<-table.start() > a<-table.row.start(a) > a<-table.element(a,'Granger Causality Test: X = f(Y)',5,TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Model',header=TRUE) > a<-table.element(a,'Res.DF',header=TRUE) > a<-table.element(a,'Diff. DF',header=TRUE) > a<-table.element(a,'F',header=TRUE) > a<-table.element(a,'p-value',header=TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Complete model',header=TRUE) > a<-table.element(a,gxy$Res.Df[1]) > a<-table.element(a,'') > a<-table.element(a,'') > a<-table.element(a,'') > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Reduced model',header=TRUE) > a<-table.element(a,gxy$Res.Df[2]) > a<-table.element(a,gxy$Df[2]) > a<-table.element(a,gxy$F[2]) > a<-table.element(a,gxy$Pr[2]) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/5slf31466522692.tab") > > try(system("convert tmp/13oan1466522692.ps tmp/13oan1466522692.png",intern=TRUE)) character(0) > try(system("convert tmp/2pwxq1466522692.ps tmp/2pwxq1466522692.png",intern=TRUE)) character(0) > try(system("convert tmp/3i2ks1466522692.ps tmp/3i2ks1466522692.png",intern=TRUE)) character(0) > > > proc.time() user system elapsed 1.352 0.212 1.559