Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_onesampletests_mean.wasp
Title produced by softwareOne Sample Tests about the Mean
Date of computationTue, 20 Jan 2015 14:31:16 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2015/Jan/20/t1421764291iacnl5excomhr4t.htm/, Retrieved Wed, 15 May 2024 01:24:21 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=275217, Retrieved Wed, 15 May 2024 01:24:21 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact91
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [One Sample Tests about the Mean] [] [2015-01-20 14:31:16] [d555f1d33a280a2d3b46ab822b1fbc33] [Current]
Feedback Forum

Post a new message
Dataseries X:
0.000452101212319012
0.00298814643657628
-0.00198302656694066
-0.00495997645258872
0.00431997749839595
0.00112967245875038
-0.00232821185258389
0.000414462625008296
-0.00271999682686692
0.00810734270282199
0.00268049854642658
3.23107808188679e-05
-0.00140391971074126
0.00165260969355763
0.00130434845441032
0.00554905103271759
-0.000339248606825232
-0.00299248792437661
-0.0010295803182525
0.00226276910705381
-0.000574643112747923
0.000647964988379823
-0.00139891315803451
0.00188030742206528
0.00268802245061609
0.00173849221785849
-0.00293719419495516
0.00220450810687743
0.00258907800845296
0.00270266653190641
0.00288114530333053
0.000348557836666773
0.000563393571638723
0.000146610955128317
0.00030856621715267
0.00106162661984596
0.00274136936711237
0.000828473929192548
-0.000248254870413949
4.92812255526136e-05
0.000108880167839232
0.00150930990938724
0.00272005174545696
-0.00384298491239769
-0.000201423306809019
-0.00216052824289604
0.000123641569994393
-0.00111414559280874
-0.00259509794018491
-0.00195950217182052
-0.000641558758770762
0.00369318992081205
-0.000125352853209593
0.0018614264692623
0.00108823904209858
-0.000665240517317461
0.000351525323117392
-0.00454764081522771
0.00682011431170838
0.00743042587423353
0.00223750993219234
-0.00366786500594596
-0.00219674375866624
-0.00206866204043163
0.00858468150666519
0.00644690394601141
-0.00366736108731272
0.00429641658888327
9.71652186502794e-05
0.000305000055734757
-0.0023502770670041
0.00141980448670042
-0.0035440494373747
0.00859108570452375
-0.000894602181201521
0.0039864861115566
0.00216840356587686
0.00344095695888495
-0.0045113820603612
0.000542535539601645
-0.00550182120921429
0.00535396388153494
-0.00107400102643868
-0.00106594166254373
0.000625123595608407
0.000536557249563046
-0.00301905454309711
-0.00457563808159686
0.000627044097598684
0.000760004020003512
0.00350862390895236
0.00489425558018258
-0.000244518644756271
0.000165342816541489
-0.00258809809617749
-0.00110543406942372
-0.00196393632867674
-0.00543917014822028
-0.0068434214649695
0.00571059269012957
0.000675575343617377
0.00366439704401677
0.0012234447995292
-0.00193170560826342
0.00301998931488584
0.00241966636017297
0.0016078983645631
-0.00492084027011051
-0.0019074729499128
-0.0018278169578166
0.00417851273142209
0.0058309809736514
-0.000721636819751516
-0.00195858493707616
0.00056103054097246
-0.00102013157971888
0.000361737567422847
-0.0015466157436813
0.00251472917713922
-0.00202682282498639
-0.000446908923590404




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'Herman Ole Andreas Wold' @ wold.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 & 0 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=275217&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]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=275217&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=275217&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 time0 seconds
R Server'Herman Ole Andreas Wold' @ wold.wessa.net







One Sample t-test
H00
Alternativetwo.sided
CI0.95
Sample Mean0.000454025917952418
T-Test1.62979989902117
DF120
P-Value0.105766025030675

\begin{tabular}{lllllllll}
\hline
One Sample t-test \tabularnewline
H0 & 0 \tabularnewline
Alternative & two.sided \tabularnewline
CI & 0.95 \tabularnewline
Sample Mean & 0.000454025917952418 \tabularnewline
T-Test & 1.62979989902117 \tabularnewline
DF & 120 \tabularnewline
P-Value & 0.105766025030675 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=275217&T=1

[TABLE]
[ROW][C]One Sample t-test[/C][/ROW]
[ROW][C]H0[/C][C]0[/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]0.000454025917952418[/C][/ROW]
[ROW][C]T-Test[/C][C]1.62979989902117[/C][/ROW]
[ROW][C]DF[/C][C]120[/C][/ROW]
[ROW][C]P-Value[/C][C]0.105766025030675[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=275217&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=275217&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
H00
Alternativetwo.sided
CI0.95
Sample Mean0.000454025917952418
T-Test1.62979989902117
DF120
P-Value0.105766025030675



Parameters (Session):
par1 = 1 ; par2 = 2 ; par3 = Pearson Chi-Squared ;
Parameters (R input):
par1 = two.sided ; par2 = 0.95 ; par3 = 0 ;
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')