Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_Reddy-Moores K-S Test.wasp

Title produced by software

Kolmogorov-Smirnov Test

Date of computation

Tue, 29 Oct 2013 09:27:04 -0400

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Oct/29/t138305325561eatc8fs466771.htm/, Retrieved Mon, 29 Apr 2024 18:49:02 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=220595, Retrieved Mon, 29 Apr 2024 18:49:02 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

127

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Kolmogorov-Smirnov Test] [] [2013-10-29 06:14:59] [ed3b7c992b2950bef9e6c2fbfe1ce0e9]
-       [Kolmogorov-Smirnov Test] [] [2013-10-29 06:46:31] [ed3b7c992b2950bef9e6c2fbfe1ce0e9]
-    D      [Kolmogorov-Smirnov Test] [] [2013-10-29 13:27:04] [a70ba42490d729343eea80ef494661e6] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

70.8	70.94821
69.6	70.60821
69.87	68.60821
67.47	68.27821
67.6	67.60821
67.13	65.60821
66.27	68.94821
66.73	67.27821
68.07	64.94821
67.8	67.94821
64.8	64.94821
64.6	65.94821
64.2	66.60821
64.2	64.60821
63.67	63.94821
61	64.60821
59.67	63.60821
59.67	62.94821
59.8	62.94821
60.73	63.60821
59.4	61.60821
58.07	63.60821
57.47	60.27821
70.73	57.94821
72.87	62.94821
66	53.60821
66.07	75.60821
66	74.60821
66.27	73.27821
64	70.27821
63.67	70.27821
63.73	67.60821
63.33	69.60821
63.53	68.60821
63.53	68.27821
62.87	65.94821
59.53	67.94821
62.8	68.94821
60.8	65.94821
59.8	66.27821
56.67	65.60821
57.67	67.94821
58.4	65.60821
55.47	66.60821
56.2	63.94821
71.53	63.60821
68.67	65.94821
65.67	62.94821
66.73	62.27821
67.33	60.94821
66.73	63.94821
66.87	62.27821
65.8	61.27821
64.73	61.94821
65.47	62.94821
63.6	59.60821
64.07	60.27821
64.67	59.94821
63.73	57.60821
62.53	57.94821
61.93	55.27821
62.67	51.27821
62.8	8.60821
61.33	74.27821
62.6	72.94821
59.13	71.94821
61.27	70.27821
59.47	69.94821
57.87	69.94821
59.73	67.94821
61.4	67.94821
58.8	68.27821
58.33	66.27821
57.47	66.27821
57.13	65.94821
55	65.94821
51.53	67.60821
72.73	65.27821
73	66.60821
70.8	64.60821
70.07	64.60821
71.67	64.94821
71.07	61.94821
70.67	62.60821
70.73	62.27821
70.73	61.60821
68.6	60.94821
69.6	62.27821
66.47	59.60821
67.07	59.94821
68.67	58.94821
66.93	60.60821
65.93	59.27821
68.87	59.27821
66.53	58.94821
65.8	58.60821
66.6	53.27821
66	52.60821
65	53.94821
66.8	47.94821
65.6	10.60821
66	7.27821
65.67	70.94821
64.67	71.60821
65.07	69.60821
64.67	70.27821
65.07	69.94821
65.2	70.94821
64.87	69.94821
63.47	69.27821
62.6	68.94821
64.07	70.94821
63.73	67.94821
64.67	67.60821
61.6	67.94821
61.6	67.60821
60.47	67.94821
61.27	67.27821
63	65.94821
61.47	65.60821
60.87	64.94821
61.67	64.27821
62.87	65.94821
62.4	65.60821
59.73	62.94821
60.13	64.60821
58.8	63.94821
59.6	63.60821
58.93	63.94821
60.13	65.27821
58.2	65.27821
58.27	64.27821
58.27	64.27821
55.07	62.94821
53.87	62.60821
52.33	62.27821
47.2	60.60821
37.93	58.94821
72.73	59.60821
70.07	58.27821
70.67	56.94821
72.07	48.27821
68.8	69.94821
68.8	69.27821
67.47	70.60821
66.73	68.27821
66.53	66.60821
66	65.60821
67.6	67.27821
66	67.94821
66	66.27821
66.53	65.60821
65.8	68.94821
64.27	66.94821
64.67	68.27821
64.6	65.27821
64.13	64.94821
65.47	63.94821
62.93	64.60821
63.53	60.94821
62.13	60.94821
63.87	58.60821
64.67	55.27821
63.33	55.27821
63.13	51.27821
62.8	72.27821
62.4	69.27821
62.4	68.27821
62.6	68.27821
61.47	68.27821
62.2	66.27821
63	65.27821
61.8	64.27821
59.73	64.27821
60.33	66.27821
60.13	64.27821
59.53	63.27821
59	65.27821
55.93	64.27821
41.87	64.27821
36.33	62.27821
71.67	62.27821
71.47	64.27821
70.47	62.27821
69.53	63.27821
70.73	60.27821
69.93	58.27821
68.73	55.27821
67.53	51.27821

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 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 & 2 seconds \tabularnewline
R Server & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=220595&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]2 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=220595&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=220595&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

Kolmogorov_Smirnov Test
	Statistic	P-value
K-S Test	0.1164	0.15441

\begin{tabular}{lllllllll}
\hline
Kolmogorov_Smirnov Test \tabularnewline
 & Statistic & P-value \tabularnewline
K-S Test & 0.1164 & 0.15441 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=220595&T=1

[TABLE]
[ROW][C]Kolmogorov_Smirnov Test[/C][/ROW]
[ROW][C][/C][C]Statistic[/C][C]P-value[/C][/ROW]
[ROW][C]K-S Test[/C][C]0.1164[/C][C]0.15441[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=220595&T=1

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

As an alternative you can also use a QR Code:

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

Kolmogorov_Smirnov Test
	Statistic	P-value
K-S Test	0.1164	0.15441

Means of Data Distributions
Mean 1	Mean 2	Difference
63.58	63.58	4.3968e-05

\begin{tabular}{lllllllll}
\hline
Means of Data Distributions  \tabularnewline
Mean 1 & Mean 2 & Difference \tabularnewline
63.58 & 63.58 & 4.3968e-05 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=220595&T=2

[TABLE]
[ROW][C]Means of Data Distributions [/C][/ROW]
[ROW][C]Mean 1[/C][C]Mean 2[/C][C]Difference[/C][/ROW]
[ROW][C]63.58[/C][C]63.58[/C][C]4.3968e-05[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=220595&T=2

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

As an alternative you can also use a QR Code:

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

Means of Data Distributions
Mean 1	Mean 2	Difference
63.58	63.58	4.3968e-05

Parameters (Session):

par1 = two.sided ; par2 = 1 ; par3 = 2 ;

Parameters (R input):

par1 = two.sided ; par2 = 1 ; par3 = 2 ;

R code (references can be found in the software module):

par2 <- as.numeric(par2)
par3 <- as.numeric(par3)
x <- t(y)
load(file='createtable')
a<-table.start()
a <- table.row.start(a)
a <- table.element(a,'Kolmogorov_Smirnov Test',3,TRUE)
a <- table.row.end(a)
a <- table.row.start(a)
a <- table.element(a,'',1,TRUE)
a <- table.element(a,'Statistic',1,TRUE)
a <- table.element(a,'P-value',1,TRUE)
a <- table.row.end(a)
D <- ks.test(x[,par2],x[,par3],alternative=par1)
a<-table.row.start(a)
a<-table.element(a,'K-S Test',1,TRUE)
a<-table.element(a,signif(D$statistic[[1]], digits=5) )
a<-table.element(a,signif(D$p.value, digits =5) )
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')
a<-table.start()
a <- table.row.start(a)
a <- table.element(a,'Means of Data Distributions ',3,TRUE)
a <- table.row.end(a)
a <- table.row.start(a)
a <- table.element(a,'Mean 1',1,TRUE)
a <- table.element(a,'Mean 2',1,TRUE)
a <- table.element(a,'Difference',1,TRUE)
a <- table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,signif(mean(x[,par2]), digits=5),1)
a<-table.element(a,signif(mean(x[,par3]), digits=5),1)
a<-table.element(a,signif( (mean(x[,par2])- mean(x[,par3])), digits=5),1)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable1.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code