Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software ModuleIan.Hollidayrwasp_Reddy-Moores K-S Test.wasp
Title produced by softwareAston University Statistical Software
Date of computationTue, 10 Nov 2009 07:26:22 -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/10/t12578632254rlsibxxk7pz0kn.htm/, Retrieved Mon, 06 May 2024 02:00:16 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=55243, Retrieved Mon, 06 May 2024 02:00:16 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact119
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 D    [Aston University Statistical Software] [] [2009-11-10 14:26:22] [638eea484b8c3584402aa8830e42c104] [Current]
Feedback Forum

Post a new message
Dataseries X:
67.01	66.67
66.67	66.33
64.67	64.33
64.34	64
63.67	63.33
61.67	61.33
65.01	64.67
63.34	63
61.01	60.67
64.01	63.67
61.01	60.67
62.01	61.67
62.67	62.33
60.67	60.33
60.01	59.67
60.67	60.33
59.67	59.33
59.01	58.67
59.01	58.67
59.67	59.33
57.67	57.33
59.67	59.33
56.34	56
54.01	53.67
59.01	58.67
49.67	49.33
71.67	71.33
70.67	70.33
69.34	69
66.34	66
66.34	66
63.67	63.33
65.67	65.33
64.67	64.33
64.34	64
62.01	61.67
64.01	63.67
65.01	64.67
62.01	61.67
62.34	62
61.67	61.33
64.01	63.67
61.67	61.33
62.67	62.33
60.01	59.67
59.67	59.33
62.01	61.67
59.01	58.67
58.34	58
57.01	56.67
60.01	59.67
58.34	58
57.34	57
58.01	57.67
59.01	58.67
55.67	55.33
56.34	56
56.01	55.67
53.67	53.33
54.01	53.67
51.34	51
47.34	47
4.67	4.33
70.34	70
69.01	68.67
68.01	67.67
66.34	66
66.01	65.67
66.01	65.67
64.01	63.67
64.01	63.67
64.34	64
62.34	62
62.34	62
62.01	61.67
62.01	61.67
63.67	63.33
61.34	61
62.67	62.33
60.67	60.33
60.67	60.33
61.01	60.67
58.01	57.67
58.67	58.33
58.34	58
57.67	57.33
57.01	56.67
58.34	58
55.67	55.33
56.01	55.67
55.01	54.67
56.67	56.33
55.34	55
55.34	55
55.01	54.67
54.67	54.33
49.34	49
48.67	48.33
50.01	49.67
44.01	43.67
6.67	6.33
3.34	3
67.01	66.67
67.67	67.33
65.67	65.33
66.34	66
66.01	65.67
67.01	66.67
66.01	65.67
65.34	65
65.01	64.67
67.01	66.67
64.01	63.67
63.67	63.33
64.01	63.67
63.67	63.33
64.01	63.67
63.34	63
62.01	61.67
61.67	61.33
61.01	60.67
60.34	60
62.01	61.67
61.67	61.33
59.01	58.67
60.67	60.33
60.01	59.67
59.67	59.33
60.01	59.67
61.34	61
61.34	61
60.34	60
60.34	60
59.01	58.67
58.67	58.33
58.34	58
56.67	56.33
55.01	54.67
55.67	55.33
54.34	54
53.01	52.67
44.34	44
66.01	65.67
65.34	65
66.67	66.33
64.34	64
62.67	62.33
61.67	61.33
63.34	63
64.01	63.67
62.34	62
61.67	61.33
65.01	64.67
63.01	62.67
64.34	64
61.34	61
61.01	60.67
60.01	59.67
60.67	60.33
57.01	56.67
57.01	56.67
54.67	54.33
51.34	51
51.34	51
47.34	47
68.34	68
65.34	65
64.34	64
64.34	64
64.34	64
62.34	62
61.34	61
60.34	60
60.34	60
62.34	62
60.34	60
59.34	59
61.34	61
60.34	60
60.34	60
58.34	58
58.34	58
60.34	60
58.34	58
59.34	59
56.34	56
54.34	54
51.34	51
47.34	47




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\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 & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55243&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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55243&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55243&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'Gwilym Jenkins' @ 72.249.127.135







Kolmogorov_Smirnov Test
StatisticP-value
K-S Test0.089950.42905

\begin{tabular}{lllllllll}
\hline
Kolmogorov_Smirnov Test \tabularnewline
 & Statistic & P-value \tabularnewline
K-S Test & 0.08995 & 0.42905 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=55243&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.08995[/C][C]0.42905[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=55243&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55243&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
StatisticP-value
K-S Test0.089950.42905







Means of Data Distributions
Mean 1Mean 2Difference
59.6418559.301850.34

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=55243&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 1Mean 2Difference
59.6418559.301850.34



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,round(D$statistic[[1]], digits=5) )
a<-table.element(a,round(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,round(mean(x[,par2]), digits=5),1,TRUE)
a<-table.element(a,round(mean(x[,par3]), digits=5),1,TRUE)
a<-table.element(a,round( (mean(x[,par2])- mean(x[,par3])), digits=5),1,TRUE)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable1.tab')