FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_pairs.wasp
Title produced by softwareKendall tau Correlation Matrix
Date of computationSun, 08 Nov 2009 05:21:45 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Nov/08/t1257683943azu0nyqzea48mmq.htm/, Retrieved Sat, 04 May 2024 11:48:57 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=54530, Retrieved Sat, 04 May 2024 11:48:57 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Kendall tau Correlation Matrix] [3/11/2009] [2009-11-02 21:25:00] [b98453cac15ba1066b407e146608df68]
-    D    [Kendall tau Correlation Matrix] [] [2009-11-08 12:21:45] [7dd0431c761b876151627bfbf92230c8] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
8.9	1.6	90398	3633	180600
8.8	1.8	90269	3597	179835
8.3	1.6	90390	3600	179390
7.5	1.5	88219	3522	181871
7.2	1.5	87032	3503	175153
7.4	1.3	87175	3532	177709
8.8	1.4	92603	3686	190370
9.3	1.4	93571	3748	193423
9.3	1.3	94118	3672	193211
8.7	1.3	92159	3843	192691
8.2	1.2	89528	3905	188728
8.3	1.1	89955	3999	192632
8.5	1.4	89587	4070	192977
8.6	1.2	89488	4084	192941
8.5	1.5	88521	4042	192822
8.2	1.1	86587	3951	189644
8.1	1.3	85159	3933	189056
7.9	1.5	84915	3958	190574
8.6	1.1	91378	4147	204210
8.7	1.4	92729	4221	204888
8.7	1.3	92194	4058	201858
8.5	1.5	89664	4057	197077
8.4	1.6	86285	4089	192734
8.5	1.7	86858	4268	196020
8.7	1.1	87184	4309	197603
8.7	1.6	86629	4303	197965
8.6	1.3	85220	4177	195756
8.5	1.7	84816	4117	195182
8.3	1.6	84831	4065	195728
8	1.7	84957	3983	196950
8.2	1.9	90951	4091	210029
8.1	1.8	92134	4067	211516
8.1	1.9	91790	4024	205624
8	1.6	86625	3868	195776
7.9	1.5	83324	3800	189706
7.9	1.6	82719	3804	190040
8	1.6	83614	3862	191434
8	1.7	81640	3792	187925
7.9	2	78665	3674	182239
8	2	77828	3560	182031
7.7	1.9	75728	3489	178459
7.2	1.7	72187	3412	173278
7.5	1.8	79357	3674	191660
7.3	1.9	81329	3672	194075
7	1.7	77304	3463	181591
7	2	75576	3429	177660
7	2.1	72932	3400	172607
7.2	2.4	74291	3533	176520
7.3	2.5	74988	3578	177271
7.1	2.5	73302	3544	174540
6.8	2.6	70483	3435	170148
6.4	2.2	69848	3352	169799
6.1	2.5	66466	3213	163249
6.5	2.8	67610	3235	167363
7.7	2.8	75091	3460	185332
7.9	2.9	76207	3385	185969
7.5	3	73454	3283	174955
6.9	3.1	72008	3295	172088
6.6	2.9	71362	3331	172037
6.9	2.7	74250	3520	179351

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 3 seconds \tabularnewline
R Server & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=54530&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=54530&T=0

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

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


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

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk






Kendall tau rank correlations for all pairs of data series
pairtaup-value
tau( graad , inflatie )-0.5161984040546552.39008490867667e-08
tau( graad , leeftijd )0.7047904154574595.10702591327572e-15
tau( graad , landbouw )0.6049414925589191.94111393625462e-11
tau( graad , diensten )0.5827188729109059.97832927396303e-11
tau( inflatie , leeftijd )-0.5734318317771832.85008816018215e-10
tau( inflatie , landbouw )-0.492206991951566.28338595517022e-08
tau( inflatie , diensten )-0.380153285431982.90224876751067e-05
tau( leeftijd , landbouw )0.5098926761554068.76085914924829e-09
tau( leeftijd , diensten )0.5853107344632773.90776300207563e-11
tau( landbouw , diensten )0.7133975136453698.88178419700125e-16

\begin{tabular}{lllllllll}
\hline
Kendall tau rank correlations for all pairs of data series \tabularnewline
pair & tau & p-value \tabularnewline
tau( graad , inflatie ) & -0.516198404054655 & 2.39008490867667e-08 \tabularnewline
tau( graad , leeftijd ) & 0.704790415457459 & 5.10702591327572e-15 \tabularnewline
tau( graad , landbouw ) & 0.604941492558919 & 1.94111393625462e-11 \tabularnewline
tau( graad , diensten ) & 0.582718872910905 & 9.97832927396303e-11 \tabularnewline
tau( inflatie , leeftijd ) & -0.573431831777183 & 2.85008816018215e-10 \tabularnewline
tau( inflatie , landbouw ) & -0.49220699195156 & 6.28338595517022e-08 \tabularnewline
tau( inflatie , diensten ) & -0.38015328543198 & 2.90224876751067e-05 \tabularnewline
tau( leeftijd , landbouw ) & 0.509892676155406 & 8.76085914924829e-09 \tabularnewline
tau( leeftijd , diensten ) & 0.585310734463277 & 3.90776300207563e-11 \tabularnewline
tau( landbouw , diensten ) & 0.713397513645369 & 8.88178419700125e-16 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=54530&T=1

[TABLE]
[ROW][C]Kendall tau rank correlations for all pairs of data series[/C][/ROW]
[ROW][C]pair[/C][C]tau[/C][C]p-value[/C][/ROW]
[ROW][C]tau( graad , inflatie )[/C][C]-0.516198404054655[/C][C]2.39008490867667e-08[/C][/ROW]
[ROW][C]tau( graad , leeftijd )[/C][C]0.704790415457459[/C][C]5.10702591327572e-15[/C][/ROW]
[ROW][C]tau( graad , landbouw )[/C][C]0.604941492558919[/C][C]1.94111393625462e-11[/C][/ROW]
[ROW][C]tau( graad , diensten )[/C][C]0.582718872910905[/C][C]9.97832927396303e-11[/C][/ROW]
[ROW][C]tau( inflatie , leeftijd )[/C][C]-0.573431831777183[/C][C]2.85008816018215e-10[/C][/ROW]
[ROW][C]tau( inflatie , landbouw )[/C][C]-0.49220699195156[/C][C]6.28338595517022e-08[/C][/ROW]
[ROW][C]tau( inflatie , diensten )[/C][C]-0.38015328543198[/C][C]2.90224876751067e-05[/C][/ROW]
[ROW][C]tau( leeftijd , landbouw )[/C][C]0.509892676155406[/C][C]8.76085914924829e-09[/C][/ROW]
[ROW][C]tau( leeftijd , diensten )[/C][C]0.585310734463277[/C][C]3.90776300207563e-11[/C][/ROW]
[ROW][C]tau( landbouw , diensten )[/C][C]0.713397513645369[/C][C]8.88178419700125e-16[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=54530&T=1

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

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


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

Kendall tau rank correlations for all pairs of data series
pairtaup-value
tau( graad , inflatie )-0.5161984040546552.39008490867667e-08
tau( graad , leeftijd )0.7047904154574595.10702591327572e-15
tau( graad , landbouw )0.6049414925589191.94111393625462e-11
tau( graad , diensten )0.5827188729109059.97832927396303e-11
tau( inflatie , leeftijd )-0.5734318317771832.85008816018215e-10
tau( inflatie , landbouw )-0.492206991951566.28338595517022e-08
tau( inflatie , diensten )-0.380153285431982.90224876751067e-05
tau( leeftijd , landbouw )0.5098926761554068.76085914924829e-09
tau( leeftijd , diensten )0.5853107344632773.90776300207563e-11
tau( landbouw , diensten )0.7133975136453698.88178419700125e-16


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
Parameters (R input):
R code (references can be found in the software module):
panel.tau <- function(x, y, digits=2, prefix='', cex.cor)
{
usr <- par('usr'); on.exit(par(usr))
par(usr = c(0, 1, 0, 1))
rr <- cor.test(x, y, method='kendall')
r <- round(rr$p.value,2)
txt <- format(c(r, 0.123456789), digits=digits)[1]
txt <- paste(prefix, txt, sep='')
if(missing(cex.cor)) cex <- 0.5/strwidth(txt)
text(0.5, 0.5, txt, cex = cex)
}
panel.hist <- function(x, ...)
{
usr <- par('usr'); on.exit(par(usr))
par(usr = c(usr[1:2], 0, 1.5) )
h <- hist(x, plot = FALSE)
breaks <- h$breaks; nB <- length(breaks)
y <- h$counts; y <- y/max(y)
rect(breaks[-nB], 0, breaks[-1], y, col='grey', ...)
}
bitmap(file='test1.png')
pairs(t(y),diag.panel=panel.hist, upper.panel=panel.smooth, lower.panel=panel.tau, main=main)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Kendall tau rank correlations for all pairs of data series',3,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'pair',1,TRUE)
a<-table.element(a,'tau',1,TRUE)
a<-table.element(a,'p-value',1,TRUE)
a<-table.row.end(a)
n <- length(y[,1])
n
cor.test(y[1,],y[2,],method='kendall')
for (i in 1:(n-1))
{
for (j in (i+1):n)
{
a<-table.row.start(a)
dum <- paste('tau(',dimnames(t(x))[[2]][i])
dum <- paste(dum,',')
dum <- paste(dum,dimnames(t(x))[[2]][j])
dum <- paste(dum,')')
a<-table.element(a,dum,header=TRUE)
r <- cor.test(y[i,],y[j,],method='kendall')
a<-table.element(a,r$estimate)
a<-table.element(a,r$p.value)
a<-table.row.end(a)
}
}
a<-table.end(a)
table.save(a,file='mytable.tab')