Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_centraltendency.wasp

Title produced by software

Central Tendency

Date of computation

Thu, 24 May 2012 06:59:49 -0400

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/2012/May/24/t1337857228rbbxl633iwm64xx.htm/, Retrieved Sun, 05 May 2024 13:54:35 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=167295, Retrieved Sun, 05 May 2024 13:54:35 +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

KDG2011W52a

Estimated Impact

115

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

-       [Central Tendency] [jens vanpachtenbe...] [2012-05-24 10:59:49] [4080e77d9380e2af46712fd05e0afa1e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

2,3
2,31
2,31
2,32
2,33
2,34
2,36
2,37
2,37
2,38
2,39
2,4
2,4
2,39
2,4
2,42
2,42
2,44
2,44
2,44
2,45
2,46
2,47
2,48
2,48
2,49
2,5
2,51
2,52
2,52
2,52
2,54
2,54
2,54
2,56
2,57
2,58
2,58
2,58
2,58
2,59
2,6
2,61
2,61
2,62
2,63
2,65
2,67
2,68
2,67
2,68
2,68
2,68
2,68
2,69
2,69
2,69
2,7
2,71
2,72
2,71
2,72
2,73
2,74
2,74
2,75
2,75
2,76
2,75
2,78
2,79
2,8
2,81
2,81
2,82
2,82
2,83
2,83
2,84
2,84
2,84
2,86
2,87

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 seconds
R Server	'AstonUniversity' @ aston.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 & 2 seconds \tabularnewline
R Server & 'AstonUniversity' @ aston.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=167295&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]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'AstonUniversity' @ aston.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=167295&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=167295&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	2 seconds
R Server	'AstonUniversity' @ aston.wessa.net

Central Tendency - Ungrouped Data
Measure	Value	S.E.	Value/S.E.
Arithmetic Mean	2.59566265060241	0.0179144740361174	144.891926236254
Geometric Mean	2.59055554333593
Harmonic Mean	2.58541705633151
Quadratic Mean	2.60072696046539
Winsorized Mean ( 1 / 27 )	2.59566265060241	0.0178684854750818	145.264838154423
Winsorized Mean ( 2 / 27 )	2.59518072289157	0.0177845543814146	145.923292045125
Winsorized Mean ( 3 / 27 )	2.5955421686747	0.0177149309313716	146.517205103985
Winsorized Mean ( 4 / 27 )	2.59602409638554	0.0176248660253263	147.293266947684
Winsorized Mean ( 5 / 27 )	2.59602409638554	0.0174152072455065	149.066506059259
Winsorized Mean ( 6 / 27 )	2.59746987951807	0.0171635778196215	151.336155364334
Winsorized Mean ( 7 / 27 )	2.59746987951807	0.0168856792688212	153.82679240593
Winsorized Mean ( 8 / 27 )	2.59746987951807	0.0168856792688212	153.82679240593
Winsorized Mean ( 9 / 27 )	2.59746987951807	0.0165375141210156	157.065315893956
Winsorized Mean ( 10 / 27 )	2.59867469879518	0.0163471118535272	158.968429535427
Winsorized Mean ( 11 / 27 )	2.59734939759036	0.0161411678802747	160.914589133569
Winsorized Mean ( 12 / 27 )	2.59734939759036	0.0156981559186497	165.455701360735
Winsorized Mean ( 13 / 27 )	2.59578313253012	0.0154671791726308	167.825244898137
Winsorized Mean ( 14 / 27 )	2.59240963855422	0.0149920052761265	172.919472132417
Winsorized Mean ( 15 / 27 )	2.59421686746988	0.0141941125916178	182.767105074386
Winsorized Mean ( 16 / 27 )	2.59421686746988	0.0141941125916178	182.767105074386
Winsorized Mean ( 17 / 27 )	2.59831325301205	0.0135963592094656	191.103604500471
Winsorized Mean ( 18 / 27 )	2.59614457831325	0.013305814721987	195.11353739379
Winsorized Mean ( 19 / 27 )	2.59614457831325	0.013305814721987	195.11353739379
Winsorized Mean ( 20 / 27 )	2.59614457831325	0.0126491470273756	205.242659658759
Winsorized Mean ( 21 / 27 )	2.59614457831325	0.0119724329813466	216.843525652482
Winsorized Mean ( 22 / 27 )	2.59879518072289	0.0116092690357813	223.855194733886
Winsorized Mean ( 23 / 27 )	2.59879518072289	0.0108882572553291	238.678708610687
Winsorized Mean ( 24 / 27 )	2.59879518072289	0.0108882572553291	238.678708610687
Winsorized Mean ( 25 / 27 )	2.59879518072289	0.0101188900697338	256.826110651804
Winsorized Mean ( 26 / 27 )	2.59879518072289	0.00933334353323068	278.442036497432
Winsorized Mean ( 27 / 27 )	2.60204819277108	0.00891854120362966	291.757153256421
Trimmed Mean ( 1 / 27 )	2.59592592592593	0.0176626286246247	146.972796693849
Trimmed Mean ( 2 / 27 )	2.59620253164557	0.0174207565496554	149.029264271357
Trimmed Mean ( 3 / 27 )	2.59675324675325	0.0171872418849111	151.086094216953
Trimmed Mean ( 4 / 27 )	2.5972	0.0169414040495813	153.304885025995
Trimmed Mean ( 5 / 27 )	2.59753424657534	0.0166812502655842	155.715800987317
Trimmed Mean ( 6 / 27 )	2.59788732394366	0.0164334099166069	158.085713015553
Trimmed Mean ( 7 / 27 )	2.59788732394366	0.0162022854604181	160.340794531133
Trimmed Mean ( 8 / 27 )	2.59805970149254	0.0159888003627762	162.492472389681
Trimmed Mean ( 9 / 27 )	2.59815384615385	0.0157289118707892	165.183317669863
Trimmed Mean ( 10 / 27 )	2.59825396825397	0.0154858832409112	167.782097271003
Trimmed Mean ( 11 / 27 )	2.59819672131148	0.0152259991133969	170.642116944916
Trimmed Mean ( 12 / 27 )	2.59830508474576	0.0149461385257423	173.844573986158
Trimmed Mean ( 13 / 27 )	2.59842105263158	0.0146850593982144	176.943176201761
Trimmed Mean ( 14 / 27 )	2.59842105263158	0.014401773519327	180.423685259633
Trimmed Mean ( 15 / 27 )	2.59943396226415	0.0141329348400981	183.92740019497
Trimmed Mean ( 16 / 27 )	2.6	0.0139410523697629	186.499550467167
Trimmed Mean ( 17 / 27 )	2.60061224489796	0.0136881203871622	189.990456785946
Trimmed Mean ( 18 / 27 )	2.60085106382979	0.0134749906668672	193.013199647317
Trimmed Mean ( 19 / 27 )	2.60133333333333	0.013244400379562	196.410049438521
Trimmed Mean ( 20 / 27 )	2.60186046511628	0.0129324671220991	201.188252833073
Trimmed Mean ( 21 / 27 )	2.60243902439024	0.0126528724580476	205.679701033817
Trimmed Mean ( 22 / 27 )	2.60307692307692	0.0124151851111169	209.668796701714
Trimmed Mean ( 23 / 27 )	2.60351351351351	0.0121626626523647	214.057857882569
Trimmed Mean ( 24 / 27 )	2.604	0.0119677437621426	217.584872449994
Trimmed Mean ( 25 / 27 )	2.60454545454545	0.0116701096847929	223.180889031351
Trimmed Mean ( 26 / 27 )	2.60516129032258	0.0114335007455871	227.853336287057
Trimmed Mean ( 27 / 27 )	2.60586206896552	0.0112792284937235	231.031942514118
Median	2.6
Midrange	2.585
Midmean - Weighted Average at Xnp	2.59880952380952
Midmean - Weighted Average at X(n+1)p	2.60186046511628
Midmean - Empirical Distribution Function	2.60186046511628
Midmean - Empirical Distribution Function - Averaging	2.60186046511628
Midmean - Empirical Distribution Function - Interpolation	2.60243902439024
Midmean - Closest Observation	2.59880952380952
Midmean - True Basic - Statistics Graphics Toolkit	2.60186046511628
Midmean - MS Excel (old versions)	2.60186046511628
Number of observations	83

\begin{tabular}{lllllllll}
\hline
Central Tendency - Ungrouped Data \tabularnewline
Measure & Value & S.E. & Value/S.E. \tabularnewline
Arithmetic Mean & 2.59566265060241 & 0.0179144740361174 & 144.891926236254 \tabularnewline
Geometric Mean & 2.59055554333593 &  &  \tabularnewline
Harmonic Mean & 2.58541705633151 &  &  \tabularnewline
Quadratic Mean & 2.60072696046539 &  &  \tabularnewline
Winsorized Mean ( 1 / 27 ) & 2.59566265060241 & 0.0178684854750818 & 145.264838154423 \tabularnewline
Winsorized Mean ( 2 / 27 ) & 2.59518072289157 & 0.0177845543814146 & 145.923292045125 \tabularnewline
Winsorized Mean ( 3 / 27 ) & 2.5955421686747 & 0.0177149309313716 & 146.517205103985 \tabularnewline
Winsorized Mean ( 4 / 27 ) & 2.59602409638554 & 0.0176248660253263 & 147.293266947684 \tabularnewline
Winsorized Mean ( 5 / 27 ) & 2.59602409638554 & 0.0174152072455065 & 149.066506059259 \tabularnewline
Winsorized Mean ( 6 / 27 ) & 2.59746987951807 & 0.0171635778196215 & 151.336155364334 \tabularnewline
Winsorized Mean ( 7 / 27 ) & 2.59746987951807 & 0.0168856792688212 & 153.82679240593 \tabularnewline
Winsorized Mean ( 8 / 27 ) & 2.59746987951807 & 0.0168856792688212 & 153.82679240593 \tabularnewline
Winsorized Mean ( 9 / 27 ) & 2.59746987951807 & 0.0165375141210156 & 157.065315893956 \tabularnewline
Winsorized Mean ( 10 / 27 ) & 2.59867469879518 & 0.0163471118535272 & 158.968429535427 \tabularnewline
Winsorized Mean ( 11 / 27 ) & 2.59734939759036 & 0.0161411678802747 & 160.914589133569 \tabularnewline
Winsorized Mean ( 12 / 27 ) & 2.59734939759036 & 0.0156981559186497 & 165.455701360735 \tabularnewline
Winsorized Mean ( 13 / 27 ) & 2.59578313253012 & 0.0154671791726308 & 167.825244898137 \tabularnewline
Winsorized Mean ( 14 / 27 ) & 2.59240963855422 & 0.0149920052761265 & 172.919472132417 \tabularnewline
Winsorized Mean ( 15 / 27 ) & 2.59421686746988 & 0.0141941125916178 & 182.767105074386 \tabularnewline
Winsorized Mean ( 16 / 27 ) & 2.59421686746988 & 0.0141941125916178 & 182.767105074386 \tabularnewline
Winsorized Mean ( 17 / 27 ) & 2.59831325301205 & 0.0135963592094656 & 191.103604500471 \tabularnewline
Winsorized Mean ( 18 / 27 ) & 2.59614457831325 & 0.013305814721987 & 195.11353739379 \tabularnewline
Winsorized Mean ( 19 / 27 ) & 2.59614457831325 & 0.013305814721987 & 195.11353739379 \tabularnewline
Winsorized Mean ( 20 / 27 ) & 2.59614457831325 & 0.0126491470273756 & 205.242659658759 \tabularnewline
Winsorized Mean ( 21 / 27 ) & 2.59614457831325 & 0.0119724329813466 & 216.843525652482 \tabularnewline
Winsorized Mean ( 22 / 27 ) & 2.59879518072289 & 0.0116092690357813 & 223.855194733886 \tabularnewline
Winsorized Mean ( 23 / 27 ) & 2.59879518072289 & 0.0108882572553291 & 238.678708610687 \tabularnewline
Winsorized Mean ( 24 / 27 ) & 2.59879518072289 & 0.0108882572553291 & 238.678708610687 \tabularnewline
Winsorized Mean ( 25 / 27 ) & 2.59879518072289 & 0.0101188900697338 & 256.826110651804 \tabularnewline
Winsorized Mean ( 26 / 27 ) & 2.59879518072289 & 0.00933334353323068 & 278.442036497432 \tabularnewline
Winsorized Mean ( 27 / 27 ) & 2.60204819277108 & 0.00891854120362966 & 291.757153256421 \tabularnewline
Trimmed Mean ( 1 / 27 ) & 2.59592592592593 & 0.0176626286246247 & 146.972796693849 \tabularnewline
Trimmed Mean ( 2 / 27 ) & 2.59620253164557 & 0.0174207565496554 & 149.029264271357 \tabularnewline
Trimmed Mean ( 3 / 27 ) & 2.59675324675325 & 0.0171872418849111 & 151.086094216953 \tabularnewline
Trimmed Mean ( 4 / 27 ) & 2.5972 & 0.0169414040495813 & 153.304885025995 \tabularnewline
Trimmed Mean ( 5 / 27 ) & 2.59753424657534 & 0.0166812502655842 & 155.715800987317 \tabularnewline
Trimmed Mean ( 6 / 27 ) & 2.59788732394366 & 0.0164334099166069 & 158.085713015553 \tabularnewline
Trimmed Mean ( 7 / 27 ) & 2.59788732394366 & 0.0162022854604181 & 160.340794531133 \tabularnewline
Trimmed Mean ( 8 / 27 ) & 2.59805970149254 & 0.0159888003627762 & 162.492472389681 \tabularnewline
Trimmed Mean ( 9 / 27 ) & 2.59815384615385 & 0.0157289118707892 & 165.183317669863 \tabularnewline
Trimmed Mean ( 10 / 27 ) & 2.59825396825397 & 0.0154858832409112 & 167.782097271003 \tabularnewline
Trimmed Mean ( 11 / 27 ) & 2.59819672131148 & 0.0152259991133969 & 170.642116944916 \tabularnewline
Trimmed Mean ( 12 / 27 ) & 2.59830508474576 & 0.0149461385257423 & 173.844573986158 \tabularnewline
Trimmed Mean ( 13 / 27 ) & 2.59842105263158 & 0.0146850593982144 & 176.943176201761 \tabularnewline
Trimmed Mean ( 14 / 27 ) & 2.59842105263158 & 0.014401773519327 & 180.423685259633 \tabularnewline
Trimmed Mean ( 15 / 27 ) & 2.59943396226415 & 0.0141329348400981 & 183.92740019497 \tabularnewline
Trimmed Mean ( 16 / 27 ) & 2.6 & 0.0139410523697629 & 186.499550467167 \tabularnewline
Trimmed Mean ( 17 / 27 ) & 2.60061224489796 & 0.0136881203871622 & 189.990456785946 \tabularnewline
Trimmed Mean ( 18 / 27 ) & 2.60085106382979 & 0.0134749906668672 & 193.013199647317 \tabularnewline
Trimmed Mean ( 19 / 27 ) & 2.60133333333333 & 0.013244400379562 & 196.410049438521 \tabularnewline
Trimmed Mean ( 20 / 27 ) & 2.60186046511628 & 0.0129324671220991 & 201.188252833073 \tabularnewline
Trimmed Mean ( 21 / 27 ) & 2.60243902439024 & 0.0126528724580476 & 205.679701033817 \tabularnewline
Trimmed Mean ( 22 / 27 ) & 2.60307692307692 & 0.0124151851111169 & 209.668796701714 \tabularnewline
Trimmed Mean ( 23 / 27 ) & 2.60351351351351 & 0.0121626626523647 & 214.057857882569 \tabularnewline
Trimmed Mean ( 24 / 27 ) & 2.604 & 0.0119677437621426 & 217.584872449994 \tabularnewline
Trimmed Mean ( 25 / 27 ) & 2.60454545454545 & 0.0116701096847929 & 223.180889031351 \tabularnewline
Trimmed Mean ( 26 / 27 ) & 2.60516129032258 & 0.0114335007455871 & 227.853336287057 \tabularnewline
Trimmed Mean ( 27 / 27 ) & 2.60586206896552 & 0.0112792284937235 & 231.031942514118 \tabularnewline
Median & 2.6 &  &  \tabularnewline
Midrange & 2.585 &  &  \tabularnewline
Midmean - Weighted Average at Xnp & 2.59880952380952 &  &  \tabularnewline
Midmean - Weighted Average at X(n+1)p & 2.60186046511628 &  &  \tabularnewline
Midmean - Empirical Distribution Function & 2.60186046511628 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Averaging & 2.60186046511628 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Interpolation & 2.60243902439024 &  &  \tabularnewline
Midmean - Closest Observation & 2.59880952380952 &  &  \tabularnewline
Midmean - True Basic - Statistics Graphics Toolkit & 2.60186046511628 &  &  \tabularnewline
Midmean - MS Excel (old versions) & 2.60186046511628 &  &  \tabularnewline
Number of observations & 83 &  &  \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=167295&T=1

[TABLE]
[ROW][C]Central Tendency - Ungrouped Data[/C][/ROW]
[ROW][C]Measure[/C][C]Value[/C][C]S.E.[/C][C]Value/S.E.[/C][/ROW]
[ROW][C]Arithmetic Mean[/C][C]2.59566265060241[/C][C]0.0179144740361174[/C][C]144.891926236254[/C][/ROW]
[ROW][C]Geometric Mean[/C][C]2.59055554333593[/C][C][/C][C][/C][/ROW]
[ROW][C]Harmonic Mean[/C][C]2.58541705633151[/C][C][/C][C][/C][/ROW]
[ROW][C]Quadratic Mean[/C][C]2.60072696046539[/C][C][/C][C][/C][/ROW]
[ROW][C]Winsorized Mean ( 1 / 27 )[/C][C]2.59566265060241[/C][C]0.0178684854750818[/C][C]145.264838154423[/C][/ROW]
[ROW][C]Winsorized Mean ( 2 / 27 )[/C][C]2.59518072289157[/C][C]0.0177845543814146[/C][C]145.923292045125[/C][/ROW]
[ROW][C]Winsorized Mean ( 3 / 27 )[/C][C]2.5955421686747[/C][C]0.0177149309313716[/C][C]146.517205103985[/C][/ROW]
[ROW][C]Winsorized Mean ( 4 / 27 )[/C][C]2.59602409638554[/C][C]0.0176248660253263[/C][C]147.293266947684[/C][/ROW]
[ROW][C]Winsorized Mean ( 5 / 27 )[/C][C]2.59602409638554[/C][C]0.0174152072455065[/C][C]149.066506059259[/C][/ROW]
[ROW][C]Winsorized Mean ( 6 / 27 )[/C][C]2.59746987951807[/C][C]0.0171635778196215[/C][C]151.336155364334[/C][/ROW]
[ROW][C]Winsorized Mean ( 7 / 27 )[/C][C]2.59746987951807[/C][C]0.0168856792688212[/C][C]153.82679240593[/C][/ROW]
[ROW][C]Winsorized Mean ( 8 / 27 )[/C][C]2.59746987951807[/C][C]0.0168856792688212[/C][C]153.82679240593[/C][/ROW]
[ROW][C]Winsorized Mean ( 9 / 27 )[/C][C]2.59746987951807[/C][C]0.0165375141210156[/C][C]157.065315893956[/C][/ROW]
[ROW][C]Winsorized Mean ( 10 / 27 )[/C][C]2.59867469879518[/C][C]0.0163471118535272[/C][C]158.968429535427[/C][/ROW]
[ROW][C]Winsorized Mean ( 11 / 27 )[/C][C]2.59734939759036[/C][C]0.0161411678802747[/C][C]160.914589133569[/C][/ROW]
[ROW][C]Winsorized Mean ( 12 / 27 )[/C][C]2.59734939759036[/C][C]0.0156981559186497[/C][C]165.455701360735[/C][/ROW]
[ROW][C]Winsorized Mean ( 13 / 27 )[/C][C]2.59578313253012[/C][C]0.0154671791726308[/C][C]167.825244898137[/C][/ROW]
[ROW][C]Winsorized Mean ( 14 / 27 )[/C][C]2.59240963855422[/C][C]0.0149920052761265[/C][C]172.919472132417[/C][/ROW]
[ROW][C]Winsorized Mean ( 15 / 27 )[/C][C]2.59421686746988[/C][C]0.0141941125916178[/C][C]182.767105074386[/C][/ROW]
[ROW][C]Winsorized Mean ( 16 / 27 )[/C][C]2.59421686746988[/C][C]0.0141941125916178[/C][C]182.767105074386[/C][/ROW]
[ROW][C]Winsorized Mean ( 17 / 27 )[/C][C]2.59831325301205[/C][C]0.0135963592094656[/C][C]191.103604500471[/C][/ROW]
[ROW][C]Winsorized Mean ( 18 / 27 )[/C][C]2.59614457831325[/C][C]0.013305814721987[/C][C]195.11353739379[/C][/ROW]
[ROW][C]Winsorized Mean ( 19 / 27 )[/C][C]2.59614457831325[/C][C]0.013305814721987[/C][C]195.11353739379[/C][/ROW]
[ROW][C]Winsorized Mean ( 20 / 27 )[/C][C]2.59614457831325[/C][C]0.0126491470273756[/C][C]205.242659658759[/C][/ROW]
[ROW][C]Winsorized Mean ( 21 / 27 )[/C][C]2.59614457831325[/C][C]0.0119724329813466[/C][C]216.843525652482[/C][/ROW]
[ROW][C]Winsorized Mean ( 22 / 27 )[/C][C]2.59879518072289[/C][C]0.0116092690357813[/C][C]223.855194733886[/C][/ROW]
[ROW][C]Winsorized Mean ( 23 / 27 )[/C][C]2.59879518072289[/C][C]0.0108882572553291[/C][C]238.678708610687[/C][/ROW]
[ROW][C]Winsorized Mean ( 24 / 27 )[/C][C]2.59879518072289[/C][C]0.0108882572553291[/C][C]238.678708610687[/C][/ROW]
[ROW][C]Winsorized Mean ( 25 / 27 )[/C][C]2.59879518072289[/C][C]0.0101188900697338[/C][C]256.826110651804[/C][/ROW]
[ROW][C]Winsorized Mean ( 26 / 27 )[/C][C]2.59879518072289[/C][C]0.00933334353323068[/C][C]278.442036497432[/C][/ROW]
[ROW][C]Winsorized Mean ( 27 / 27 )[/C][C]2.60204819277108[/C][C]0.00891854120362966[/C][C]291.757153256421[/C][/ROW]
[ROW][C]Trimmed Mean ( 1 / 27 )[/C][C]2.59592592592593[/C][C]0.0176626286246247[/C][C]146.972796693849[/C][/ROW]
[ROW][C]Trimmed Mean ( 2 / 27 )[/C][C]2.59620253164557[/C][C]0.0174207565496554[/C][C]149.029264271357[/C][/ROW]
[ROW][C]Trimmed Mean ( 3 / 27 )[/C][C]2.59675324675325[/C][C]0.0171872418849111[/C][C]151.086094216953[/C][/ROW]
[ROW][C]Trimmed Mean ( 4 / 27 )[/C][C]2.5972[/C][C]0.0169414040495813[/C][C]153.304885025995[/C][/ROW]
[ROW][C]Trimmed Mean ( 5 / 27 )[/C][C]2.59753424657534[/C][C]0.0166812502655842[/C][C]155.715800987317[/C][/ROW]
[ROW][C]Trimmed Mean ( 6 / 27 )[/C][C]2.59788732394366[/C][C]0.0164334099166069[/C][C]158.085713015553[/C][/ROW]
[ROW][C]Trimmed Mean ( 7 / 27 )[/C][C]2.59788732394366[/C][C]0.0162022854604181[/C][C]160.340794531133[/C][/ROW]
[ROW][C]Trimmed Mean ( 8 / 27 )[/C][C]2.59805970149254[/C][C]0.0159888003627762[/C][C]162.492472389681[/C][/ROW]
[ROW][C]Trimmed Mean ( 9 / 27 )[/C][C]2.59815384615385[/C][C]0.0157289118707892[/C][C]165.183317669863[/C][/ROW]
[ROW][C]Trimmed Mean ( 10 / 27 )[/C][C]2.59825396825397[/C][C]0.0154858832409112[/C][C]167.782097271003[/C][/ROW]
[ROW][C]Trimmed Mean ( 11 / 27 )[/C][C]2.59819672131148[/C][C]0.0152259991133969[/C][C]170.642116944916[/C][/ROW]
[ROW][C]Trimmed Mean ( 12 / 27 )[/C][C]2.59830508474576[/C][C]0.0149461385257423[/C][C]173.844573986158[/C][/ROW]
[ROW][C]Trimmed Mean ( 13 / 27 )[/C][C]2.59842105263158[/C][C]0.0146850593982144[/C][C]176.943176201761[/C][/ROW]
[ROW][C]Trimmed Mean ( 14 / 27 )[/C][C]2.59842105263158[/C][C]0.014401773519327[/C][C]180.423685259633[/C][/ROW]
[ROW][C]Trimmed Mean ( 15 / 27 )[/C][C]2.59943396226415[/C][C]0.0141329348400981[/C][C]183.92740019497[/C][/ROW]
[ROW][C]Trimmed Mean ( 16 / 27 )[/C][C]2.6[/C][C]0.0139410523697629[/C][C]186.499550467167[/C][/ROW]
[ROW][C]Trimmed Mean ( 17 / 27 )[/C][C]2.60061224489796[/C][C]0.0136881203871622[/C][C]189.990456785946[/C][/ROW]
[ROW][C]Trimmed Mean ( 18 / 27 )[/C][C]2.60085106382979[/C][C]0.0134749906668672[/C][C]193.013199647317[/C][/ROW]
[ROW][C]Trimmed Mean ( 19 / 27 )[/C][C]2.60133333333333[/C][C]0.013244400379562[/C][C]196.410049438521[/C][/ROW]
[ROW][C]Trimmed Mean ( 20 / 27 )[/C][C]2.60186046511628[/C][C]0.0129324671220991[/C][C]201.188252833073[/C][/ROW]
[ROW][C]Trimmed Mean ( 21 / 27 )[/C][C]2.60243902439024[/C][C]0.0126528724580476[/C][C]205.679701033817[/C][/ROW]
[ROW][C]Trimmed Mean ( 22 / 27 )[/C][C]2.60307692307692[/C][C]0.0124151851111169[/C][C]209.668796701714[/C][/ROW]
[ROW][C]Trimmed Mean ( 23 / 27 )[/C][C]2.60351351351351[/C][C]0.0121626626523647[/C][C]214.057857882569[/C][/ROW]
[ROW][C]Trimmed Mean ( 24 / 27 )[/C][C]2.604[/C][C]0.0119677437621426[/C][C]217.584872449994[/C][/ROW]
[ROW][C]Trimmed Mean ( 25 / 27 )[/C][C]2.60454545454545[/C][C]0.0116701096847929[/C][C]223.180889031351[/C][/ROW]
[ROW][C]Trimmed Mean ( 26 / 27 )[/C][C]2.60516129032258[/C][C]0.0114335007455871[/C][C]227.853336287057[/C][/ROW]
[ROW][C]Trimmed Mean ( 27 / 27 )[/C][C]2.60586206896552[/C][C]0.0112792284937235[/C][C]231.031942514118[/C][/ROW]
[ROW][C]Median[/C][C]2.6[/C][C][/C][C][/C][/ROW]
[ROW][C]Midrange[/C][C]2.585[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at Xnp[/C][C]2.59880952380952[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at X(n+1)p[/C][C]2.60186046511628[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function[/C][C]2.60186046511628[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Averaging[/C][C]2.60186046511628[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Interpolation[/C][C]2.60243902439024[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Closest Observation[/C][C]2.59880952380952[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - True Basic - Statistics Graphics Toolkit[/C][C]2.60186046511628[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - MS Excel (old versions)[/C][C]2.60186046511628[/C][C][/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]83[/C][C][/C][C][/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=167295&T=1

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

As an alternative you can also use a QR Code:

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

Central Tendency - Ungrouped Data
Measure	Value	S.E.	Value/S.E.
Arithmetic Mean	2.59566265060241	0.0179144740361174	144.891926236254
Geometric Mean	2.59055554333593
Harmonic Mean	2.58541705633151
Quadratic Mean	2.60072696046539
Winsorized Mean ( 1 / 27 )	2.59566265060241	0.0178684854750818	145.264838154423
Winsorized Mean ( 2 / 27 )	2.59518072289157	0.0177845543814146	145.923292045125
Winsorized Mean ( 3 / 27 )	2.5955421686747	0.0177149309313716	146.517205103985
Winsorized Mean ( 4 / 27 )	2.59602409638554	0.0176248660253263	147.293266947684
Winsorized Mean ( 5 / 27 )	2.59602409638554	0.0174152072455065	149.066506059259
Winsorized Mean ( 6 / 27 )	2.59746987951807	0.0171635778196215	151.336155364334
Winsorized Mean ( 7 / 27 )	2.59746987951807	0.0168856792688212	153.82679240593
Winsorized Mean ( 8 / 27 )	2.59746987951807	0.0168856792688212	153.82679240593
Winsorized Mean ( 9 / 27 )	2.59746987951807	0.0165375141210156	157.065315893956
Winsorized Mean ( 10 / 27 )	2.59867469879518	0.0163471118535272	158.968429535427
Winsorized Mean ( 11 / 27 )	2.59734939759036	0.0161411678802747	160.914589133569
Winsorized Mean ( 12 / 27 )	2.59734939759036	0.0156981559186497	165.455701360735
Winsorized Mean ( 13 / 27 )	2.59578313253012	0.0154671791726308	167.825244898137
Winsorized Mean ( 14 / 27 )	2.59240963855422	0.0149920052761265	172.919472132417
Winsorized Mean ( 15 / 27 )	2.59421686746988	0.0141941125916178	182.767105074386
Winsorized Mean ( 16 / 27 )	2.59421686746988	0.0141941125916178	182.767105074386
Winsorized Mean ( 17 / 27 )	2.59831325301205	0.0135963592094656	191.103604500471
Winsorized Mean ( 18 / 27 )	2.59614457831325	0.013305814721987	195.11353739379
Winsorized Mean ( 19 / 27 )	2.59614457831325	0.013305814721987	195.11353739379
Winsorized Mean ( 20 / 27 )	2.59614457831325	0.0126491470273756	205.242659658759
Winsorized Mean ( 21 / 27 )	2.59614457831325	0.0119724329813466	216.843525652482
Winsorized Mean ( 22 / 27 )	2.59879518072289	0.0116092690357813	223.855194733886
Winsorized Mean ( 23 / 27 )	2.59879518072289	0.0108882572553291	238.678708610687
Winsorized Mean ( 24 / 27 )	2.59879518072289	0.0108882572553291	238.678708610687
Winsorized Mean ( 25 / 27 )	2.59879518072289	0.0101188900697338	256.826110651804
Winsorized Mean ( 26 / 27 )	2.59879518072289	0.00933334353323068	278.442036497432
Winsorized Mean ( 27 / 27 )	2.60204819277108	0.00891854120362966	291.757153256421
Trimmed Mean ( 1 / 27 )	2.59592592592593	0.0176626286246247	146.972796693849
Trimmed Mean ( 2 / 27 )	2.59620253164557	0.0174207565496554	149.029264271357
Trimmed Mean ( 3 / 27 )	2.59675324675325	0.0171872418849111	151.086094216953
Trimmed Mean ( 4 / 27 )	2.5972	0.0169414040495813	153.304885025995
Trimmed Mean ( 5 / 27 )	2.59753424657534	0.0166812502655842	155.715800987317
Trimmed Mean ( 6 / 27 )	2.59788732394366	0.0164334099166069	158.085713015553
Trimmed Mean ( 7 / 27 )	2.59788732394366	0.0162022854604181	160.340794531133
Trimmed Mean ( 8 / 27 )	2.59805970149254	0.0159888003627762	162.492472389681
Trimmed Mean ( 9 / 27 )	2.59815384615385	0.0157289118707892	165.183317669863
Trimmed Mean ( 10 / 27 )	2.59825396825397	0.0154858832409112	167.782097271003
Trimmed Mean ( 11 / 27 )	2.59819672131148	0.0152259991133969	170.642116944916
Trimmed Mean ( 12 / 27 )	2.59830508474576	0.0149461385257423	173.844573986158
Trimmed Mean ( 13 / 27 )	2.59842105263158	0.0146850593982144	176.943176201761
Trimmed Mean ( 14 / 27 )	2.59842105263158	0.014401773519327	180.423685259633
Trimmed Mean ( 15 / 27 )	2.59943396226415	0.0141329348400981	183.92740019497
Trimmed Mean ( 16 / 27 )	2.6	0.0139410523697629	186.499550467167
Trimmed Mean ( 17 / 27 )	2.60061224489796	0.0136881203871622	189.990456785946
Trimmed Mean ( 18 / 27 )	2.60085106382979	0.0134749906668672	193.013199647317
Trimmed Mean ( 19 / 27 )	2.60133333333333	0.013244400379562	196.410049438521
Trimmed Mean ( 20 / 27 )	2.60186046511628	0.0129324671220991	201.188252833073
Trimmed Mean ( 21 / 27 )	2.60243902439024	0.0126528724580476	205.679701033817
Trimmed Mean ( 22 / 27 )	2.60307692307692	0.0124151851111169	209.668796701714
Trimmed Mean ( 23 / 27 )	2.60351351351351	0.0121626626523647	214.057857882569
Trimmed Mean ( 24 / 27 )	2.604	0.0119677437621426	217.584872449994
Trimmed Mean ( 25 / 27 )	2.60454545454545	0.0116701096847929	223.180889031351
Trimmed Mean ( 26 / 27 )	2.60516129032258	0.0114335007455871	227.853336287057
Trimmed Mean ( 27 / 27 )	2.60586206896552	0.0112792284937235	231.031942514118
Median	2.6
Midrange	2.585
Midmean - Weighted Average at Xnp	2.59880952380952
Midmean - Weighted Average at X(n+1)p	2.60186046511628
Midmean - Empirical Distribution Function	2.60186046511628
Midmean - Empirical Distribution Function - Averaging	2.60186046511628
Midmean - Empirical Distribution Function - Interpolation	2.60243902439024
Midmean - Closest Observation	2.59880952380952
Midmean - True Basic - Statistics Graphics Toolkit	2.60186046511628
Midmean - MS Excel (old versions)	2.60186046511628
Number of observations	83

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Parameters (Session):

Parameters (R input):

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

geomean <- function(x) {
return(exp(mean(log(x))))
}
harmean <- function(x) {
return(1/mean(1/x))
}
quamean <- function(x) {
return(sqrt(mean(x*x)))
}
winmean <- function(x) {
x <-sort(x[!is.na(x)])
n<-length(x)
denom <- 3
nodenom <- n/denom
if (nodenom>40) denom <- n/40
sqrtn = sqrt(n)
roundnodenom = floor(nodenom)
win <- array(NA,dim=c(roundnodenom,2))
for (j in 1:roundnodenom) {
win[j,1] <- (j*x[j+1]+sum(x[(j+1):(n-j)])+j*x[n-j])/n
win[j,2] <- sd(c(rep(x[j+1],j),x[(j+1):(n-j)],rep(x[n-j],j)))/sqrtn
}
return(win)
}
trimean <- function(x) {
x <-sort(x[!is.na(x)])
n<-length(x)
denom <- 3
nodenom <- n/denom
if (nodenom>40) denom <- n/40
sqrtn = sqrt(n)
roundnodenom = floor(nodenom)
tri <- array(NA,dim=c(roundnodenom,2))
for (j in 1:roundnodenom) {
tri[j,1] <- mean(x,trim=j/n)
tri[j,2] <- sd(x[(j+1):(n-j)]) / sqrt(n-j*2)
}
return(tri)
}
midrange <- function(x) {
return((max(x)+min(x))/2)
}
q1 <- function(data,n,p,i,f) {
np <- n*p;
i <<- floor(np)
f <<- np - i
qvalue <- (1-f)*data[i] + f*data[i+1]
}
q2 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
qvalue <- (1-f)*data[i] + f*data[i+1]
}
q3 <- function(data,n,p,i,f) {
np <- n*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
qvalue <- data[i+1]
}
}
q4 <- function(data,n,p,i,f) {
np <- n*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- (data[i]+data[i+1])/2
} else {
qvalue <- data[i+1]
}
}
q5 <- function(data,n,p,i,f) {
np <- (n-1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i+1]
} else {
qvalue <- data[i+1] + f*(data[i+2]-data[i+1])
}
}
q6 <- function(data,n,p,i,f) {
np <- n*p+0.5
i <<- floor(np)
f <<- np - i
qvalue <- data[i]
}
q7 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
qvalue <- f*data[i] + (1-f)*data[i+1]
}
}
q8 <- function(data,n,p,i,f) {
np <- (n+1)*p
i <<- floor(np)
f <<- np - i
if (f==0) {
qvalue <- data[i]
} else {
if (f == 0.5) {
qvalue <- (data[i]+data[i+1])/2
} else {
if (f < 0.5) {
qvalue <- data[i]
} else {
qvalue <- data[i+1]
}
}
}
}
midmean <- function(x,def) {
x <-sort(x[!is.na(x)])
n<-length(x)
if (def==1) {
qvalue1 <- q1(x,n,0.25,i,f)
qvalue3 <- q1(x,n,0.75,i,f)
}
if (def==2) {
qvalue1 <- q2(x,n,0.25,i,f)
qvalue3 <- q2(x,n,0.75,i,f)
}
if (def==3) {
qvalue1 <- q3(x,n,0.25,i,f)
qvalue3 <- q3(x,n,0.75,i,f)
}
if (def==4) {
qvalue1 <- q4(x,n,0.25,i,f)
qvalue3 <- q4(x,n,0.75,i,f)
}
if (def==5) {
qvalue1 <- q5(x,n,0.25,i,f)
qvalue3 <- q5(x,n,0.75,i,f)
}
if (def==6) {
qvalue1 <- q6(x,n,0.25,i,f)
qvalue3 <- q6(x,n,0.75,i,f)
}
if (def==7) {
qvalue1 <- q7(x,n,0.25,i,f)
qvalue3 <- q7(x,n,0.75,i,f)
}
if (def==8) {
qvalue1 <- q8(x,n,0.25,i,f)
qvalue3 <- q8(x,n,0.75,i,f)
}
midm <- 0
myn <- 0
roundno4 <- round(n/4)
round3no4 <- round(3*n/4)
for (i in 1:n) {
if ((x[i]>=qvalue1) & (x[i]<=qvalue3)){
midm = midm + x[i]
myn = myn + 1
}
}
midm = midm / myn
return(midm)
}
(arm <- mean(x))
sqrtn <- sqrt(length(x))
(armse <- sd(x) / sqrtn)
(armose <- arm / armse)
(geo <- geomean(x))
(har <- harmean(x))
(qua <- quamean(x))
(win <- winmean(x))
(tri <- trimean(x))
(midr <- midrange(x))
midm <- array(NA,dim=8)
for (j in 1:8) midm[j] <- midmean(x,j)
midm
bitmap(file='test1.png')
lb <- win[,1] - 2*win[,2]
ub <- win[,1] + 2*win[,2]
if ((ylimmin == '') | (ylimmax == '')) plot(win[,1],type='b',main=main, xlab='j', pch=19, ylab='Winsorized Mean(j/n)', ylim=c(min(lb),max(ub))) else plot(win[,1],type='l',main=main, xlab='j', pch=19, ylab='Winsorized Mean(j/n)', ylim=c(ylimmin,ylimmax))
lines(ub,lty=3)
lines(lb,lty=3)
grid()
dev.off()
bitmap(file='test2.png')
lb <- tri[,1] - 2*tri[,2]
ub <- tri[,1] + 2*tri[,2]
if ((ylimmin == '') | (ylimmax == '')) plot(tri[,1],type='b',main=main, xlab='j', pch=19, ylab='Trimmed Mean(j/n)', ylim=c(min(lb),max(ub))) else plot(tri[,1],type='l',main=main, xlab='j', pch=19, ylab='Trimmed Mean(j/n)', ylim=c(ylimmin,ylimmax))
lines(ub,lty=3)
lines(lb,lty=3)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Central Tendency - Ungrouped Data',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Measure',header=TRUE)
a<-table.element(a,'Value',header=TRUE)
a<-table.element(a,'S.E.',header=TRUE)
a<-table.element(a,'Value/S.E.',header=TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,hyperlink('arithmetic_mean.htm', 'Arithmetic Mean', 'click to view the definition of the Arithmetic Mean'),header=TRUE)
a<-table.element(a,arm)
a<-table.element(a,hyperlink('arithmetic_mean_standard_error.htm', armse, 'click to view the definition of the Standard Error of the Arithmetic Mean'))
a<-table.element(a,armose)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,hyperlink('geometric_mean.htm', 'Geometric Mean', 'click to view the definition of the Geometric Mean'),header=TRUE)
a<-table.element(a,geo)
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,hyperlink('harmonic_mean.htm', 'Harmonic Mean', 'click to view the definition of the Harmonic Mean'),header=TRUE)
a<-table.element(a,har)
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,hyperlink('quadratic_mean.htm', 'Quadratic Mean', 'click to view the definition of the Quadratic Mean'),header=TRUE)
a<-table.element(a,qua)
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
for (j in 1:length(win[,1])) {
a<-table.row.start(a)
mylabel <- paste('Winsorized Mean (',j)
mylabel <- paste(mylabel,'/')
mylabel <- paste(mylabel,length(win[,1]))
mylabel <- paste(mylabel,')')
a<-table.element(a,hyperlink('winsorized_mean.htm', mylabel, 'click to view the definition of the Winsorized Mean'),header=TRUE)
a<-table.element(a,win[j,1])
a<-table.element(a,win[j,2])
a<-table.element(a,win[j,1]/win[j,2])
a<-table.row.end(a)
}
for (j in 1:length(tri[,1])) {
a<-table.row.start(a)
mylabel <- paste('Trimmed Mean (',j)
mylabel <- paste(mylabel,'/')
mylabel <- paste(mylabel,length(tri[,1]))
mylabel <- paste(mylabel,')')
a<-table.element(a,hyperlink('arithmetic_mean.htm', mylabel, 'click to view the definition of the Trimmed Mean'),header=TRUE)
a<-table.element(a,tri[j,1])
a<-table.element(a,tri[j,2])
a<-table.element(a,tri[j,1]/tri[j,2])
a<-table.row.end(a)
}
a<-table.row.start(a)
a<-table.element(a,hyperlink('median_1.htm', 'Median', 'click to view the definition of the Median'),header=TRUE)
a<-table.element(a,median(x))
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,hyperlink('midrange.htm', 'Midrange', 'click to view the definition of the Midrange'),header=TRUE)
a<-table.element(a,midr)
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_1.htm','Weighted Average at Xnp',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[1])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_2.htm','Weighted Average at X(n+1)p',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[2])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_3.htm','Empirical Distribution Function',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[3])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_4.htm','Empirical Distribution Function - Averaging',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[4])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_5.htm','Empirical Distribution Function - Interpolation',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[5])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_6.htm','Closest Observation',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[6])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_7.htm','True Basic - Statistics Graphics Toolkit',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[7])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
mymid <- hyperlink('midmean.htm', 'Midmean', 'click to view the definition of the Midmean')
mylabel <- paste(mymid,hyperlink('method_8.htm','MS Excel (old versions)',''),sep=' - ')
a<-table.element(a,mylabel,header=TRUE)
a<-table.element(a,midm[8])
a<-table.element(a,'')
a<-table.element(a,'')
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Number of observations',header=TRUE)
a<-table.element(a,length(x))
a<-table.element(a,'')
a<-table.element(a,'')
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