Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_kendall.wasp
Title produced by softwareKendall tau Rank Correlation
Date of computationSat, 13 Dec 2014 17:51:08 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/13/t1418493248xdbod8csespue78.htm/, Retrieved Tue, 28 May 2024 16:26:45 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=267251, Retrieved Tue, 28 May 2024 16:26:45 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact72
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Kendall tau Rank Correlation] [Kendall Rank Corr...] [2014-12-13 17:51:08] [ca907db95fc0b179b22bb0898c34dff4] [Current]
Feedback Forum

Post a new message
Dataseries X:
30
17
24
20
25
20
27
18
28
21
27
22
28
25
21
22
28
20
29
20
20
23
18
18
19
25
25
25
24
19
26
10
17
13
17
30
4
16
21
22
20
22
23
16
0
18
25
18
18
24
29
15
22
23
24
22
15
17
20
27
26
23
23
15
26
22
18
15
22
27
10
20
17
23
19
13
27
23
16
25
2
26
20
22
24
23
22
21
25
27
23
23
18
18
23
19
15
20
16
25
25
19
19
16
19
19
23
21
22
19
20
3
23
14
23
20
15
13
16
7
24
17
24
24
19
28
23
19
23
25
25
20
16
20
25
25
23
17
20
16
23
12
24
11
14
23
18
29
16
19
16
23
19
4
20
20
4
24
16
3
24
23
17
20
22
19
24
19
27
22
23
Dataseries Y:
26,56
20,16
30,24
18,56
23,36
22,16
23,76
18,8
29,52
25,44
31,84
17,52
29,52
24,16
24
18,16
25,52
28,96
23,36
28,16
24,56
21,44
22,24
24,4
20,64
25,76
27,76
21,04
19,44
20,16
16,56
24,64
15,36
29,12
21,76
23,76
22,56
23,84
26
21,76
25,04
23,36
20,24
19,04
30,72
26,56
17,92
21,12
25,36
17,84
25,04
12,24
24,32
24,96
20,96
18,96
19,84
18,24
23,84
31,84
17,92
23,36
23,6
24,24
26,96
12,56
20,16
12,56
17,52
19,76
15,92
23,84
26,64
21,44
22,32
25,12
26,96
17,52
24,56
19,52
24,16
28,4
24,32
26,64
12,96
6,96
20,32
28,96
28,56
27,36
30,56
25,76
21,36
29,44
23,52
16,96
20,16
25,92
21,76
22,56
23,2
25,84
23,6
23,68
19,92
20,24
27,76
13,76
29,44
25,76
28,4
24,4
28,24
24,96
26,16
28,24
21,76
18,72
22,96
23,6
29,2
15,84
25,6
29,2
26,96
30,32
24,96
27,36
25,76
24,64
24,64
21,36
30,56
12,16
30,56
23,6
30,8
21,76
20,4
15,76
24,4
19,04
26,16
19,84
22,96
29,04
28,4
19,76
24,96
30,88
27,36
29,44
30,48
29,68
30,56
20,56
15,2
7,2
21,76
18,72
21,36
28,4
28,16
22,48
25,76
21,36
18,96
19,12
21,12
12,32
23,36




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net

\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 & 1 seconds \tabularnewline
R Server & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267251&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Maurice George Kendall' @ kendall.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267251&T=0

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

As an alternative you can also use a 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 time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net







Kendall tau Rank Correlation
Kendall tau0.119429759681225
2-sided p-value0.0250173807144165
Score1673
Var(Score)556591.5
Denominator14008.2333984375

\begin{tabular}{lllllllll}
\hline
Kendall tau Rank Correlation \tabularnewline
Kendall tau & 0.119429759681225 \tabularnewline
2-sided p-value & 0.0250173807144165 \tabularnewline
Score & 1673 \tabularnewline
Var(Score) & 556591.5 \tabularnewline
Denominator & 14008.2333984375 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267251&T=1

[TABLE]
[ROW][C]Kendall tau Rank Correlation[/C][/ROW]
[ROW][C]Kendall tau[/C][C]0.119429759681225[/C][/ROW]
[ROW][C]2-sided p-value[/C][C]0.0250173807144165[/C][/ROW]
[ROW][C]Score[/C][C]1673[/C][/ROW]
[ROW][C]Var(Score)[/C][C]556591.5[/C][/ROW]
[ROW][C]Denominator[/C][C]14008.2333984375[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267251&T=1

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

As an alternative you can also use a QR Code:  

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

Kendall tau Rank Correlation
Kendall tau0.119429759681225
2-sided p-value0.0250173807144165
Score1673
Var(Score)556591.5
Denominator14008.2333984375



Parameters (Session):
Parameters (R input):
R code (references can be found in the software module):
library('Kendall')
k <- Kendall(x,y)
bitmap(file='test1.png')
par(bg=rgb(0.2,0.4,0.6))
plot(x,y,main='Scatterplot',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='test2.png')
par(bg=rgb(0.2,0.4,0.6))
plot(rank(x),rank(y),main='Scatterplot of Ranks',xlab=xlab,ylab=ylab)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Kendall tau Rank Correlation',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Kendall tau',header=TRUE)
a<-table.element(a,k$tau)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'2-sided p-value',header=TRUE)
a<-table.element(a,k$sl)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Score',header=TRUE)
a<-table.element(a,k$S)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Var(Score)',header=TRUE)
a<-table.element(a,k$varS)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Denominator',header=TRUE)
a<-table.element(a,k$D)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')