Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
86.45220101 86.86160934 87.25262954 87.65247282 88.03233804 88.42326434 88.79294174 89.17549228 89.53576998 89.91040853 90.26194439 90.62907762 90.97242937 91.33242379 91.66807639 92.02127167 92.34966005 92.69637946 93.01790703 93.35846546 93.67351901 94.00822923 94.31719279 94.64636981 94.94962511 95.27359106 95.59527537 95.91474929 96.23208252 96.54734328 96.86059835 97.17191309 97.48135324 97.78897727 98.09484897 98.3990283 98.70157424 99.00254338 99.30199274 99.599977 99.89654989 100.191764 100.4856705 100.7783198 101.0697607 101.3600411 101.6492076 101.9373058 102.22438 102.5104735 102.7956282 103.0798852 103.3632842 103.645864 103.9276621 104.208713 104.4890572 104.7687256 105.0477513 105.3261638 105.603998 105.8812823 106.1580453 106.4343146 106.7101166 106.9854769 107.2604196 107.534968 107.8091443 108.0829695 108.3564636 108.6296457 108.9025336 109.1751441 109.4474931 109.7195954 109.9914646 110.2631136 110.5345541 110.8057967 111.0768513 111.3477265 111.6184303 111.8889694 112.1593496 112.4295761 112.6996527 112.9695827 113.2393683 113.5090108 113.7785108 114.0478678 114.3170807 114.5861486 114.8550663 115.1238315 115.3924398 115.6608862 115.9291648 116.1972691 116.4651918 116.732925 117.0004601 117.2677879 117.5348987 117.8017819 118.0684267 118.3348215 118.6009542 118.8668123 119.1323827 119.397652 119.6626062 119.9272309 120.1915116 120.455433 120.7189798 120.9821362 121.2448862 121.5072136 121.7691018 122.0305342 122.2914937 122.5519634 122.8119261 123.0713645 123.3302613 123.588599 123.8463633 124.1035312 124.3600879 124.6160161 124.8712986 125.1259182 125.379858 125.6331012 125.8856313 126.1374319 126.3884868 126.6387804 126.8882971 127.1370217 127.3849396 127.6320362 127.8782976 128.1237104 128.3682615 128.6119383 128.854729 129.096622 129.3376065 129.5776723 129.8168098 130.0550101 130.292265 130.5285669 130.7639091 130.9982857 131.2316913 131.4641218 131.6955735 131.9260439 132.1555313 132.3840348 132.6115547 132.838092 133.0636491 133.2882291 133.5118362 133.7344759 133.9561547 134.1768801 134.3966611 134.6155076 134.8334308 135.0504433 135.2665588 135.4817925 135.6961607 135.9096813 136.1223734 136.3342577 136.5453561 136.7556923 136.9652912 137.1741794 137.3823851 137.5899378 137.796869 138.0032114 138.2089998 138.4142703 138.619061 138.8234114 139.0273631 139.2309592 139.4342447 139.6372663 139.8400726 140.042714 140.2452427 140.4477127 140.6501799 140.8527022 141.0553389 141.2581515 141.4612033 141.6645592 141.8682859 142.072452 142.2771278 142.4823852 142.6882976 142.8949403 143.1023898 143.3107241 143.5200228 143.7303663 143.9418367 144.1545167 144.3684901 144.5838414 144.8006565 145.0190192 145.2390172 145.4607359 145.6842611 145.9096784 146.1370726 146.3665278 146.5981269 146.8319513 147.0680808 147.3065929 147.547563 147.7910635 148.0371637 148.2859294 148.5374225 148.7917006 149.0488164 149.3088178 149.5717466 149.8376391 150.1065248 150.3784267 150.6533601 150.9313331 151.2123454 151.4963887 151.7834455 152.0734897 152.3664855 152.6623878 152.9611416 153.2626819 153.5669339 153.8738124 154.1832222 154.495058 154.8092045 155.1255365 155.4439192 155.7642086 156.0862514 156.4098858 156.7349403 157.0612415 157.3886015 157.7168289 158.0457268 158.3750929 158.7047204 159.034399 159.363915 159.6930501 160.0215904 160.3493168 160.6760118 161.0014586 161.3254426 161.6477515 161.9681762 162.2865119 162.6025582 162.9161202 163.2270117 163.535045 163.8400467 164.1418486 164.4402904 164.7352199 165.0264932 165.3139755 165.5975406 165.8770715 166.1524604 166.4236087 166.6904271 166.9528354 167.2107626 167.4641466 167.7129344 167.9570814 168.1965517 168.4313175 168.6613591 168.8866644 169.1072288 169.3230548 169.5341516 169.7405351 169.942227 170.139255 170.3316521 170.5194567 170.7027115 170.881464 171.0557657 171.2256717 171.3912407 171.5525345 171.7096178 171.8625576 172.0114234 172.1562865 172.29722 172.4342983 172.5675966 172.6971935 172.8231652 172.9455898 173.0645459 173.180112 173.2923671 173.4013896 173.5072579 173.6100518 173.7098458 173.8067179 173.9007442 173.9919998 174.080559 174.1664951 174.2498803 174.3307855 174.4092807 174.4854344 174.5593141 174.6309856 174.7005137 174.7679617 174.8333914 174.8968634 174.9584367 175.0181691 175.0761167 175.1323345 175.1868758 175.2397926 175.2911356 175.340954 175.3892956 175.4362071 175.4817337 175.5259191 175.568806 175.6104358 175.6508485 175.690083 175.728177 175.7651671 175.8010885 175.8359757 175.8698617 175.9027788 175.9347579 175.9658293 175.9960219 176.0253641 176.053883 176.081605 176.1085555 176.1347593 176.1602401 176.1850208 176.2091239 176.2325707 176.2553821 176.2775781 176.2991781 176.3202008 176.3406645 176.3605864 176.3799837 176.3988725 176.4172686 176.4351874 176.4526434 176.469651 176.4862238 176.5023751 176.5181177 176.533464 176.548426 176.5630153 176.5772429 176.5911197 176.6046561 176.6178621 176.6307476 176.6433219 176.655594 176.6675729 176.679267 176.6906844 176.7018332 176.712721 176.7233552 176.733743 176.7438914 176.753807 176.7634963 176.7729657 176.7822212 176.7912687 176.8001139 176.8087622 176.817219 176.8254895 176.8335787 176.8414914 176.8492322 176.8568057
Data Y:
12.6707633 12.74154396 12.81159383 12.88102276 12.94993386 13.01842382 13.08658317 13.1544966 13.22224319 13.28989667 13.3575257 13.42519408 13.49296097 13.56088113 13.62900513 13.69737858 13.76604628 13.83504622 13.90441401 13.97418299 14.04437938 14.1150324 14.18616443 14.25779618 14.32994444 14.40262749 14.47585763 14.54964614 14.62400225 14.69893326 14.77444466 14.85054151 14.92722304 15.00449143 15.08234595 15.16078454 15.23980565 15.31940246 15.39957041 15.48030313 15.56159336 15.64343309 15.72581355 15.80872535 15.89216021 15.97610456 16.06054891 16.14548194 16.23089203 16.31676727 16.40309556 16.4898646 16.577062 16.66467529 16.75269194 16.84109948 16.92988544 17.01903746 17.10854328 17.1983908 17.28856808 17.37906341 17.46986528 17.56096245 17.65234555 17.74400082 17.83591938 17.92809121 18.0205066 18.11315625 18.20603119 18.29912286 18.3924231 18.48592413 18.57961862 18.67349965 18.76756071 18.86179576 18.95619918 19.05076579 19.14549088 19.24037019 19.33539989 19.43057662 19.5258975 19.62136007 19.71696234 19.8127028 19.90858036 20.0045944 20.10074476 20.19703171 20.29345597 20.39001872 20.48672347 20.58356862 20.68055839 20.77769565 20.87498372 20.97242631 21.07002754 21.16779192 21.26572436 21.36383013 21.4621149 21.56058467 21.65924582 21.75810506 21.85716942 21.95644627 22.05594328 22.15566842 22.2556318 22.35583862 22.45629922 22.55702268 22.65801829 22.75929558 22.8608643 22.9627344 23.06491603 23.16741888 23.27025534 23.37343341 23.47696538 23.58086145 23.68513322 23.78979096 23.89484664 24.00031064 24.10619501 24.21251028 24.31926857 24.42648043 24.53415806 24.642312 24.75095449 24.86009596 24.96975012 25.07992303 25.19063309 25.30188584 25.41369439 25.52606977 25.6390231 25.75256528 25.8667073 25.9814599 26.09683392 26.2128399 26.32948858 26.44679027 26.56475557 26.68339457 26.80271774 26.92273494 27.04345648 27.16489199 27.28705168 27.40994539 27.53358074 27.65796978 27.78312173 27.90904433 28.035749 28.16324264 28.2915364 28.42063744 28.5505561 28.68130005 28.81287875 28.94530029 29.07857344 29.21270645 29.34770775 29.48358527 29.62034774 29.75800198 29.89655787 30.03602021 30.17640101 30.31770417 30.45993837 30.60311107 30.74722941 30.89230072 31.0383318 31.18532984 31.33330127 31.48225315 31.63219151 31.78312329 31.93505405 32.08799062 32.2419381 32.39690313 32.55289035 32.7099062 32.86795484 33.02704244 33.18717272 33.34835148 33.51058203 33.67386973 33.8382175 34.00363017 34.17011029 34.33766207 34.50628773 34.67599076 34.84677306 35.01863732 35.19158513 35.36561737 35.54073816 35.71694723 35.8942414 36.07262569 36.25209851 36.43265996 36.61430874 36.79704392 36.98086412 37.1657671 37.35175104 37.53881268 37.72694943 37.91615721 38.10643241 38.2977703 38.490166 38.6836143 38.87810934 39.07364401 39.27021252 39.46780643 39.66641887 39.86604044 40.06666311 40.26827652 40.47087146 40.67443658 40.87896143 41.08443363 41.29084151 41.49817164 41.70641106 41.91554528 42.12556004 42.33643978 42.54816892 42.76073078 42.97410848 43.18828419 43.40323972 43.61895703 43.83541378 44.0525931 44.27047188 44.48903027 44.7082453 44.92809483 45.14855539 45.36960315 45.59121362 45.81336172 46.03602168 46.25916729 46.48277159 46.70680701 46.93124587 47.15605863 47.38121777 47.60669074 47.83245155 48.05846572 48.28470272 48.51113138 48.73771886 48.96443224 49.19123863 49.41810374 49.64499405 49.87187409 50.0987099 50.32546478 50.55210455 50.77859121 51.00489059 51.23096332 51.45677547 51.68228625 51.90746222 52.13226113 52.35665024 52.58058583 52.80403612 53.02695588 53.24931447 53.47106525 53.69217887 53.91260737 54.13232282 54.35127608 54.56944068 54.78676659 55.00322876 55.21877657 55.43338629 55.64701131 55.85961655 56.07116407 56.28162788 56.49095862 56.69913482 56.90610886 57.11185914 57.31634059 57.51953091 57.72138846 57.92188956 58.12099696 58.31868487 58.51492143 58.70967796 58.90293208 59.0946422 59.28479948 59.47336411 59.66032626 59.84564416 60.02931704 60.21129753 60.39158721 60.5701548 60.74698785 60.9220626 61.09536847 61.26688412 61.43660077 61.60449962 61.77057372 61.9348069 62.09719399 62.25771935 62.41638628 62.57317824 62.72809362 62.88112689 63.03227756 63.18154067 63.32891841 63.47440858 63.61801537 63.75973927 63.89958662 64.03756048 64.17366943 64.30792124 64.44032016 64.57087982 64.69961427 64.82653086 64.95164625 65.07497309 65.1965295 65.31633033 65.43440186 65.55074394 65.66540015 65.77837356 65.88970117 65.99939663 66.10749114 66.21400781 66.31897311 66.42241823 66.52436618 66.62485449 66.72390443 66.82155784 66.91783563 67.01278124 67.10641956 67.19879018 67.28992603 67.37985875 67.46863255 67.55626776 67.64281378 67.72830188 67.8127675 67.89624639 67.97877331 68.06038342 68.14111022 68.22098763 68.30004741 68.37832144 68.4558454 68.53262945 68.60872174 68.6841324 68.75889263 68.83301921 68.90653028 68.97944417 69.05176427 69.12351072 69.19467288 69.26526819 69.33527376 69.40470034 69.47351373 69.54171473 69.60925782 69.67613132 69.74227758 69.80767051 69.87223885 69.93594056 69.99868896 70.06042482 70.12104381 70.18046864 70.23857482 70.2952666 70.35039626 70.40385005 70.45546105 70.50507555 70.55252127 70.59761453 70.6401583
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
library(psychometric) x <- x[!is.na(y)] y <- y[!is.na(y)] y <- y[!is.na(x)] x <- x[!is.na(x)] bitmap(file='test1.png') histx <- hist(x, plot=FALSE) histy <- hist(y, plot=FALSE) maxcounts <- max(c(histx$counts, histx$counts)) xrange <- c(min(x),max(x)) yrange <- c(min(y),max(y)) nf <- layout(matrix(c(2,0,1,3),2,2,byrow=TRUE), c(3,1), c(1,3), TRUE) par(mar=c(4,4,1,1)) plot(x, y, xlim=xrange, ylim=yrange, xlab=xlab, ylab=ylab, sub=main) par(mar=c(0,4,1,1)) barplot(histx$counts, axes=FALSE, ylim=c(0, maxcounts), space=0) par(mar=c(4,0,1,1)) barplot(histy$counts, axes=FALSE, xlim=c(0, maxcounts), space=0, horiz=TRUE) dev.off() lx = length(x) makebiased = (lx-1)/lx varx = var(x)*makebiased vary = var(y)*makebiased corxy <- cor.test(x,y,method='pearson', na.rm = T) cxy <- as.matrix(corxy$estimate)[1,1] load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Pearson Product Moment Correlation - Ungrouped Data',3,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Statistic',1,TRUE) a<-table.element(a,'Variable X',1,TRUE) a<-table.element(a,'Variable Y',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/arithmetic_mean.htm','Mean',''),header=TRUE) a<-table.element(a,mean(x)) a<-table.element(a,mean(y)) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/biased.htm','Biased Variance',''),header=TRUE) a<-table.element(a,varx) a<-table.element(a,vary) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/biased1.htm','Biased Standard Deviation',''),header=TRUE) a<-table.element(a,sqrt(varx)) a<-table.element(a,sqrt(vary)) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/covariance.htm','Covariance',''),header=TRUE) a<-table.element(a,cov(x,y),2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/pearson_correlation.htm','Correlation',''),header=TRUE) a<-table.element(a,cxy,2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/coeff_of_determination.htm','Determination',''),header=TRUE) a<-table.element(a,cxy*cxy,2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,hyperlink('http://www.xycoon.com/ttest_statistic.htm','T-Test',''),header=TRUE) a<-table.element(a,as.matrix(corxy$statistic)[1,1],2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'p-value (2 sided)',header=TRUE) a<-table.element(a,(p2 <- as.matrix(corxy$p.value)[1,1]),2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'p-value (1 sided)',header=TRUE) a<-table.element(a,p2/2,2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'95% CI of Correlation',header=TRUE) a<-table.element(a,paste('[',CIr(r=cxy, n = lx, level = .95)[1],', ', CIr(r=cxy, n = lx, level = .95)[2],']',sep=''),2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Degrees of Freedom',header=TRUE) a<-table.element(a,lx-2,2) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Number of Observations',header=TRUE) a<-table.element(a,lx,2) a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable.tab') library(moments) library(nortest) jarque.x <- jarque.test(x) jarque.y <- jarque.test(y) if(lx>7) { ad.x <- ad.test(x) ad.y <- ad.test(y) } a<-table.start() a<-table.row.start(a) a<-table.element(a,'Normality Tests',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('jarque.x'),'</pre>',sep='')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('jarque.y'),'</pre>',sep='')) a<-table.row.end(a) if(lx>7) { a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('ad.x'),'</pre>',sep='')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('ad.y'),'</pre>',sep='')) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable1.tab') library(car) bitmap(file='test2.png') qq.plot(x,main='QQplot of variable x') dev.off() bitmap(file='test3.png') qq.plot(y,main='QQplot of variable y') dev.off()
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation