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_onesampletests_mean.wasp

Title produced by software

One Sample Tests about the Mean

Date of computation

Wed, 10 Nov 2010 12:58:04 +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/10/t1289393850yogpx0k7kiao60h.htm/, Retrieved Mon, 29 Apr 2024 13:02:30 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=93045, Retrieved Mon, 29 Apr 2024 13:02:30 +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

163

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

-     [Factor Analysis] [Sleep in Mammals ...] [2010-03-21 11:39:53] [b98453cac15ba1066b407e146608df68]
- RMPD  [Testing Mean with unknown Variance - Critical Value] [Hypothesis Test a...] [2010-10-19 11:45:26] [b98453cac15ba1066b407e146608df68]
- RMPD      [One Sample Tests about the Mean] [testjeuh] [2010-11-10 12:58:04] [c2514e24605d0513c6bae17788e1fef3] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

21.57042605
20.85991791
22.83338801
20.66336595
21.32536531
22.27684597
21.92591154
22.45459793
20.16265437
21.71889618
22.24418926
21.72461014
22.67014274
21.87964138
21.53258772
21.53542828
22.63324758
20.42954621
20.81940637
20.96742398
22.18603695
20.11073351
22.87939108
21.82631661
21.65535202
22.57684411
21.7253128
21.20477983
22.27307508
20.90219256
21.74908873
20.30973801
22.38754616
22.95654799
20.876948
21.56883418
20.51653508
21.56341137
22.17861935
20.20484476
20.49361503
22.2309343
20.56952319
22.55967854
20.66271844
20.16212462
20.43230715
21.43489345
21.15185608
20.21515545
21.01443381
20.48614743
20.30248735
21.04262218
22.35057069
21.15904728
22.35394545
22.00808343
20.13613076
20.70746214
20.82365356
22.42575992
22.49573871
20.93909849
20.50384265
21.69786569
22.7096688
20.0921546
21.17153149
20.35431418
22.2412928
22.12421728
22.00827589
21.79463904
20.4826361
22.3296286
22.73437354
22.12449167
20.07122105
22.41530833
21.70962552
20.07060461
20.28970842
20.98122517
20.24677417
22.76607882
22.02423968
21.09339434
22.56336875
21.09338725
20.95836627
21.87011511
21.49702004
21.03452784
22.90201002
22.00374104
21.6740742
22.00133469
22.90021635
22.37643116
21.50504737
22.08329736
20.05610928
22.36177195
22.46186163

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

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

One Sample t-test
H0	20
Alternative	two.sided
CI	0.95
Sample Mean	21.4992144881905
T-Test	17.7945506591044
DF	104
P-Value	2.48184894003195e-33

\begin{tabular}{lllllllll}
\hline
One Sample t-test \tabularnewline
H0 & 20 \tabularnewline
Alternative & two.sided \tabularnewline
CI & 0.95 \tabularnewline
Sample Mean & 21.4992144881905 \tabularnewline
T-Test & 17.7945506591044 \tabularnewline
DF & 104 \tabularnewline
P-Value & 2.48184894003195e-33 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=93045&T=1

[TABLE]
[ROW][C]One Sample t-test[/C][/ROW]
[ROW][C]H0[/C][C]20[/C][/ROW]
[ROW][C]Alternative[/C][C]two.sided[/C][/ROW]
[ROW][C]CI[/C][C]0.95[/C][/ROW]
[ROW][C]Sample Mean[/C][C]21.4992144881905[/C][/ROW]
[ROW][C]T-Test[/C][C]17.7945506591044[/C][/ROW]
[ROW][C]DF[/C][C]104[/C][/ROW]
[ROW][C]P-Value[/C][C]2.48184894003195e-33[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=93045&T=1

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

As an alternative you can also use a QR Code:

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

One Sample t-test
H0	20
Alternative	two.sided
CI	0.95
Sample Mean	21.4992144881905
T-Test	17.7945506591044
DF	104
P-Value	2.48184894003195e-33

Parameters (Session):

par1 = two.sided ; par2 = 0.95 ; par3 = 20 ;

Parameters (R input):

par1 = two.sided ; par2 = 0.95 ; par3 = 20 ;

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

par2 <- as.numeric(par2)
par3 <- as.numeric(par3)
(tt <- t.test(x,mu=par3,alternative=par1,conf.level=par2))
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'One Sample t-test',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'H0',header=TRUE)
a<-table.element(a,tt$null.value)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Alternative',header=TRUE)
a<-table.element(a,tt$alternative)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'CI',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,mean(x))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'T-Test',header=TRUE)
a<-table.element(a,tt$statistic)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'DF',header=TRUE)
a<-table.element(a,tt$parameter)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'P-Value',header=TRUE)
a<-table.element(a,tt$p.value)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code