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 Module--
Title produced by softwareTesting Mean with unknown Variance - Critical Value
Date of computationMon, 22 Oct 2012 12:58:16 -0400
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Oct/22/t13509251122qlol7q8jkim2jd.htm/, Retrieved Sat, 04 May 2024 01:22:12 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=181784, Retrieved Sat, 04 May 2024 01:22:12 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Testing Mean with unknown Variance - Critical Value] [] [2010-10-25 13:26:31] [b98453cac15ba1066b407e146608df68]
- R PD  [Testing Mean with unknown Variance - Critical Value] [Workshop 4 - Ques...] [2012-10-22 16:47:02] [a4b60d76ea6b846adbf54f7861413bce]
- RM        [Testing Mean with unknown Variance - Critical Value] [] [2012-10-22 16:58:16] [ab4290de075ebbfc5b460761b0110080] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
26		21		21		23		17		23		4	
20		16		15		24		17		20		4	
19		19		18		22		18		20		6	
	19		18		11		20		21		21		8
20		16		8		24		20		24		8	
25		23		19		27		28		22		4	
	25		17		4		28		19		23		4
22		12		20		27		22		20		8	
26		19		16		24		16		25		5	
22		16		14		23		18		23		4	
	17		19		10		24		25		27		4
	22		20		13		27		17		27		4
19		13		14		27		14		22		4	
24		20		8		28		11		24		4	
26		27		23		27		27		25		4	
	21		17		11		23		20		22		8
13		8		9		24		22		28		4	
	26		25		24		28		22		28		4
	20		26		5		27		21		27		4
22		13		15		25		23		25		8	
	14		19		5		19		17		16		4
21		15		19		24		24		28		7	
7		5		6		20		14		21		4	
	23		16		13		28		17		24		4
17		14		11		26		23		27		5	
25		24		17		23		24		14		4	
25		24		17		23		24		14		4	
19		9		5		20		8		27		4	
	20		19		9		11		22		20		4
23		19		15		24		23		21		4	
	22		25		17		25		25		22		4
22		19		17		23		21		21		4	
21		18		20		18		24		12		15	
	15		15		12		20		15		20		10
	20		12		7		20		22		24		4
	22		21		16		24		21		19		8
18		12		7		23		25		28		4	
	20		15		14		25		16		23		4
	28		28		24		28		28		27		4
22		25		15		26		23		22		4	
18		19		15		26		21		27		7	
23		20		10		23		21		26		4	
20		24		14		22		26		22		6	
	25		26		18		24		22		21		5
	26		25		12		21		21		19		4
15		12		9		20		18		24		16	
	17		12		9		22		12		19		5
	23		15		8		20		25		26		12
21		17		18		25		17		22		6	
	13		14		10		20		24		28		9
18		16		17		22		15		21		9	
19		11		14		23		13		23		4	
22		20		16		25		26		28		5	
16		11		10		23		16		10		4	
	24		22		19		23		24		24		4
18		20		10		22		21		21		5	
20		19		14		24		20		21		4	
24		17		10		25		14		24		4	
	14		21		4		21		25		24		4
	22		23		19		12		25		25		5
24		18		9		17		20		25		4	
18		17		12		20		22		23		6	
21		27		16		23		20		21		4	
	23		25		11		23		26		16		4
17		19		18		20		18		17		18	
	22		22		11		28		22		25		4
	24		24		24		24		24		24		6
	21		20		17		24		17		23		4
22		19		18		24		24		25		4	
16		11		9		24		20		23		5	
21		22		19		28		19		28		4	
	23		22		18		25		20		26		4
	22		16		12		21		15		22		5
24		20		23		25		23		19		10	
24		24		22		25		26		26		5	
16		16		14		18		22		18		8	
16		16		14		17		20		18		8	
	21		22		16		26		24		25		5
	26		24		23		28		26		27		4
	15		16		7		21		21		12		4
	25		27		10		27		25		15		4
18		11		12		22		13		21		5	
													
20		20		12		25		22		22		4	
	17		20		17		22		23		21		8
	25		27		21		23		28		24		4
24		20		16		26		22		27		5	
17		12		11		19		20		22		14	
19		8		14		25		6		28		8	
20		21		13		21		21		26		8	
15		18		9		13		20		10		4	
	27		24		19		24		18		19		4
22		16		13		25		23		22		6	
23		18		19		26		20		21		4	
16		20		13		25		24		24		7	
19		20		13		25		22		25		7	
	25		19		13		22		21		21		4
19		17		14		21		18		20		6	
	19		16		12		23		21		21		4
	26		26		22		25		23		24		7
21		15		11		24		23		23		4	
	20		22		5		21		15		18		4
24		17		18		21		21		24		8	
22		23		19		25		24		24		4	
	20		21		14		22		23		19		4
18		19		15		20		21		20		10	
	18		14		12		20		21		18		8
24		17		19		23		20		20		6	
24		12		15		28		11		27		4	
22		24		17		23		22		23		4	
23		18		8		28		27		26		4	
22		20		10		24		25		23		5	
20		16		12		18		18		17		4	
18		20		12		20		20		21		6	
25		22		20		28		24		25		4	
	18		12		12		21		10		23		5
16		16		12		21		27		27		7	
20		17		14		25		21		24		8	
	19		22		6		19		21		20		5
15		12		10		18		18		27		8	
19		14		18		21		15		21		10	
19		23		18		22		24		24		8	
16		15		7		24		22		21		5	
17		17		18		15		14		15		12	
28		28		9		28		28		25		4	
	23		20		17		26		18		25		5
25		23		22		23		26		22		4	
20		13		11		26		17		24		6	
	17		18		15		20		19		21		4
	23		23		17		22		22		22		4
16		19		15		20		18		23		7	
	23		23		22		23		24		22		7
	11		12		9		22		15		20		10
	18		16		13		24		18		23		4
	24		23		20		23		26		25		5
23		13		14		22		11		23		8	
21		22		14		26		26		22		11	
	16		18		12		23		21		25		7
	24		23		20		27		23		26		4
23		20		20		23		23		22		8	
18		10		8		21		15		24		6	
20		17		17		26		22		24		7	
9		18		9		23		26		25		5	
	24		15		18		21		16		20		4
25		23		22		27		20		26		8	
20		17		10		19		18		21		4	
	21		17		13		23		22		26		8
	25		22		15		25		16		21		6
	22		20		18		23		19		22		4
	21		20		18		22		20		16		9
21		19		12		22		19		26		5	
22		18		12		25		23		28		6	
27		22		20		25		24		18		4	
	24		20		12		28		25		25		4
	24		22		16		28		21		23		4
	21		18		16		20		21		21		5
18		16		18		25		23		20		6	
16		16		16		19		27		25		16	
22		16		13		25		23		22		6	
20		16		17		22		18		21		6	
	18		17		13		18		16		16		4
20		18		17		20		16		18		4

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'George Udny Yule' @ yule.wessa.net
R Framework error message
Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.

\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' @ yule.wessa.net \tabularnewline
R Framework error message & 
Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=181784&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' @ yule.wessa.net[/C][/ROW]
[ROW][C]R Framework error message[/C][C]
Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=181784&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=181784&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 time0 seconds
R Server'George Udny Yule' @ yule.wessa.net
R Framework error message
Warning: there are blank lines in the 'Data X' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 0.95 ; par2 = 20 ;
Parameters (R input):
par1 = 0.95 ; par2 = 20 ; par3 = ; par4 = ; par5 = ; par6 = ; par7 = ; par8 = ; par9 = ; par10 = ; par11 = ; par12 = ; par13 = ; par14 = ; par15 = ; par16 = ; par17 = ; par18 = ; par19 = ; par20 = ;
R code (references can be found in the software module):
par1 <- as.numeric(par1)
par2 <- as.numeric(par2)
len <- length(x)
df <- len - 1
sd <- sd(x)
mx <- mean(x)
load(file='createtable')
delta2 <- abs(qt((1-par1)/2,df)) * sd / sqrt(len)
delta1 <- abs(qt((1-par1),df)) * sd / sqrt(len)
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Hypothesis Test about the Mean - Confidence Interval',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Sample size',header=TRUE)
a<-table.element(a,len)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Sample standard deviation',header=TRUE)
a<-table.element(a,sd)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Confidence',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Null hypothesis',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Sample Mean',header=TRUE)
a<-table.element(a,mx)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'2-sided Confidence Interval',header=TRUE)
dum <- paste('[',mx-delta2)
dum <- paste(dum,',')
dum <- paste(dum,mx+delta2)
dum <- paste(dum,']')
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Left-sided Confidence Interval',header=TRUE)
dum <- paste('[',mx-delta1)
dum <- paste(dum,', +inf ]')
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Right-sided Confidence Interval',header=TRUE)
dum <- paste('[ -inf, ',mx+delta1)
dum <- paste(dum,']')
a<-table.element(a,dum)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')