Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

Ian.Hollidayrwasp_Reddy-Moores K-S Test.wasp

Title produced by software

Kolmogorov-Smirnov Test

Date of computation

Fri, 05 Nov 2010 15:19:49 +0000

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/2010/Nov/05/t1288970310xivk4n3f9oe3dgt.htm/, Retrieved Wed, 01 May 2024 19:30:24 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=92378, Retrieved Wed, 01 May 2024 19:30:24 +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

157

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

-     [Aston University Statistical Software] [Reddy_Moores Wilc...] [2009-11-02 09:28:43] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RM    [Kolmogorov-Smirnov Test] [Mann-Whitney-Wilc...] [2010-11-02 12:37:15] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RM      [Wilcoxon-Mann-Whitney Test] [Mann-Whitney-Wilc...] [2010-11-03 14:20:14] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RM        [Kolmogorov-Smirnov Test] [Kolmogorov_Smirno...] [2010-11-05 15:07:21] [74be16979710d4c4e7c6647856088456]
-    D          [Kolmogorov-Smirnov Test] [K-S test Reddy Mo...] [2010-11-05 15:19:49] [d41d8cd98f00b204e9800998ecf8427e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

70.8	70.948
69.6	70.608
69.87	68.608
67.47	68.278
67.6	67.608
67.13	65.608
66.27	68.948
66.73	67.278
68.07	64.948
67.8	67.948
64.8	64.948
64.6	65.948
64.2	66.608
64.2	64.608
63.67	63.948
61	64.608
59.67	63.608
59.67	62.948
59.8	62.948
60.73	63.608
59.4	61.608
58.07	63.608
57.47	60.278
70.73	57.948
72.87	62.948
66	53.608
66.07	75.608
66	74.608
66.27	73.278
64	70.278
63.67	70.278
63.73	67.608
63.33	69.608
63.53	68.608
63.53	68.278
62.87	65.948
59.53	67.948
62.8	68.948
60.8	65.948
59.8	66.278
56.67	65.608
57.67	67.948
58.4	65.608
55.47	66.608
56.2	63.948
71.53	63.608
68.67	65.948
65.67	62.948
66.73	62.278
67.33	60.948
66.73	63.948
66.87	62.278
65.8	61.278
64.73	61.948
65.47	62.948
63.6	59.608
64.07	60.278
64.67	59.948
63.73	57.608
62.53	57.948
61.93	55.278
62.67	51.278
62.8	8.608
61.33	74.278
62.6	72.948
59.13	71.948
61.27	70.278
59.47	69.948
57.87	69.948
59.73	67.948
61.4	67.948
58.8	68.278
58.33	66.278
57.47	66.278
57.13	65.948
55	65.948
51.53	67.608
72.73	65.278
73	66.608
70.8	64.608
70.07	64.608
71.67	64.948
71.07	61.948
70.67	62.608
70.73	62.278
70.73	61.608
68.6	60.948
69.6	62.278
66.47	59.608
67.07	59.948
68.67	58.948
66.93	60.608
65.93	59.278
68.87	59.278
66.53	58.948
65.8	58.608
66.6	53.278
66	52.608
65	53.948
66.8	47.948
65.6	10.608
66	7.278
65.67	70.948
64.67	71.608
65.07	69.608
64.67	70.278
65.07	69.948
65.2	70.948
64.87	69.948
63.47	69.278
62.6	68.948
64.07	70.948
63.73	67.948
64.67	67.608
61.6	67.948
61.6	67.608
60.47	67.948
61.27	67.278
63	65.948
61.47	65.608
60.87	64.948
61.67	64.278
62.87	65.948
62.4	65.608
59.73	62.948
60.13	64.608
58.8	63.948
59.6	63.608
58.93	63.948
60.13	65.278
58.2	65.278
58.27	64.278
58.27	64.278
55.07	62.948
53.87	62.608
52.33	62.278
47.2	60.608
37.93	58.948
72.73	59.608
70.07	58.278
70.67	56.948
72.07	48.278
68.8	69.948
68.8	69.278
67.47	70.608
66.73	68.278
66.53	66.608
66	65.608
67.6	67.278
66	67.948
66	66.278
66.53	65.608
65.8	68.948
64.27	66.948
64.67	68.278
64.6	65.278
64.13	64.948
65.47	63.948
62.93	64.608
63.53	60.948
62.13	60.948
63.87	58.608
64.67	55.278
63.33	55.278
63.13	51.278
62.8	72.278
62.4	69.278
62.4	68.278
62.6	68.278
61.47	68.278
62.2	66.278
63	65.278
61.8	64.278
59.73	64.278
60.33	66.278
60.13	64.278
59.53	63.278
59	65.278
55.93	64.278
41.87	64.278
36.33	62.278
71.67	62.278
71.47	64.278
70.47	62.278
69.53	63.278
70.73	60.278
69.93	58.278
68.73	55.278
67.53	51.278

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	'George Udny Yule' @ 72.249.76.132

\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 & 0 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=92378&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]0 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=92378&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=92378&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	0 seconds
R Server	'George Udny Yule' @ 72.249.76.132

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=92378&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=92378&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=92378&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	0.00025397

\begin{tabular}{lllllllll}
\hline
Means of Data Distributions  \tabularnewline
Mean 1 & Mean 2 & Difference \tabularnewline
63.58 & 63.58 & 0.00025397 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=92378&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]0.00025397[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=92378&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=92378&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	0.00025397

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