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, 20 Feb 2014 08:19:25 -0500

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/2014/Feb/20/t1392902377idg7gel4niwq3uj.htm/, Retrieved Sat, 18 May 2024 07:03:09 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=233923, Retrieved Sat, 18 May 2024 07:03:09 +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

105

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

-       [Central Tendency] [] [2014-02-20 13:19:25] [45a206086251edfa7ba367c121fe1722] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

6
6,7
-0,6
5,8
16,4
1,5
5,1
14,7
4,3
1,5
9,1
4,3
5,7
13
14,5
9,7
-4,7
7,3
5,2
-2,5
11,5
4,9
-2,4
-0,3
4,4
7,9
-9,7
-4,1
16,4
-4,9
3,5
3,8
-0,2
3,1
0,7
-2,8
5,9
-5,3
-2,9
6,6
-8,1
1,3
6,9
-7,2
-1,9
4
-5,7
3,9
-7,6
-0,9
7,3
-3,7
-2,5
9,3
1,3
9,5
11,3
-1,7
8
-4,8
1,6
1,9
-0,9
5,5
1,7
-5,4
1,9
0,2
-13,3
-8,2
0,2
5,7
-1,2
-2,8
5,5
-17,3
1,4
-2,2
-8,6
-5
4,1
0,7
-4,2
-2,3

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

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

Central Tendency - Ungrouped Data
Measure	Value	S.E.	Value/S.E.
Arithmetic Mean	1.62857142857143	0.713120966590338	2.28372394708594
Geometric Mean	NaN
Harmonic Mean	19.0177090985583
Quadratic Mean	6.69784969047458
Winsorized Mean ( 1 / 28 )	1.67619047619048	0.69934938013908	2.39678553208574
Winsorized Mean ( 2 / 28 )	1.72142857142857	0.669566423253092	2.57096011933365
Winsorized Mean ( 3 / 28 )	1.75357142857143	0.660150555744285	2.65632046101116
Winsorized Mean ( 4 / 28 )	1.70119047619048	0.640669592995068	2.65533200699846
Winsorized Mean ( 5 / 28 )	1.61785714285714	0.621502631747243	2.60313804031502
Winsorized Mean ( 6 / 28 )	1.63928571428571	0.612163984797583	2.67785390025478
Winsorized Mean ( 7 / 28 )	1.53928571428571	0.582147432833493	2.64415099589726
Winsorized Mean ( 8 / 28 )	1.66309523809524	0.554535308507787	2.99907907139493
Winsorized Mean ( 9 / 28 )	1.67380952380952	0.545826282964681	3.06656087485958
Winsorized Mean ( 10 / 28 )	1.66190476190476	0.539992416071308	3.07764463433742
Winsorized Mean ( 11 / 28 )	1.55714285714286	0.51098176939917	3.04735501419904
Winsorized Mean ( 12 / 28 )	1.55714285714286	0.506617951751578	3.07360379109978
Winsorized Mean ( 13 / 28 )	1.4797619047619	0.490590695516693	3.01628611851966
Winsorized Mean ( 14 / 28 )	1.49642857142857	0.488030707431189	3.06625904608587
Winsorized Mean ( 15 / 28 )	1.51428571428571	0.464469490085968	3.26024797453421
Winsorized Mean ( 16 / 28 )	1.4952380952381	0.45637231268467	3.27635584736103
Winsorized Mean ( 17 / 28 )	1.55595238095238	0.441806750505192	3.52179404043329
Winsorized Mean ( 18 / 28 )	1.59880952380952	0.400517787530802	3.99185647575407
Winsorized Mean ( 19 / 28 )	1.59880952380952	0.394484689130955	4.05290640641004
Winsorized Mean ( 20 / 28 )	1.575	0.391372370238225	4.02430043551953
Winsorized Mean ( 21 / 28 )	1.625	0.378142313546527	4.29732389575613
Winsorized Mean ( 22 / 28 )	1.625	0.378142313546527	4.29732389575613
Winsorized Mean ( 23 / 28 )	1.59761904761905	0.367489725290568	4.34738426048738
Winsorized Mean ( 24 / 28 )	1.62619047619048	0.363759608696677	4.4705086472272
Winsorized Mean ( 25 / 28 )	1.56666666666667	0.348549709483276	4.4948155859583
Winsorized Mean ( 26 / 28 )	1.62857142857143	0.332679672179735	4.89531391533766
Winsorized Mean ( 27 / 28 )	1.62857142857143	0.316452526390447	5.14633726311938
Winsorized Mean ( 28 / 28 )	1.62857142857143	0.275034924129692	5.92132593242406
Trimmed Mean ( 1 / 28 )	1.67926829268293	0.668567159669462	2.5117421165484
Trimmed Mean ( 2 / 28 )	1.6825	0.632427448683326	2.6603842124545
Trimmed Mean ( 3 / 28 )	1.66153846153846	0.609165839114898	2.72756342337357
Trimmed Mean ( 4 / 28 )	1.62763157894737	0.586172834473266	2.77670933080677
Trimmed Mean ( 5 / 28 )	1.60675675675676	0.566327540330019	2.83715101656621
Trimmed Mean ( 6 / 28 )	1.60416666666667	0.54894776818102	2.92225737975435
Trimmed Mean ( 7 / 28 )	1.59714285714286	0.530974226402577	3.00794799017594
Trimmed Mean ( 8 / 28 )	1.60735294117647	0.517194753857135	3.10782916723179
Trimmed Mean ( 9 / 28 )	1.59848484848485	0.507057384118414	3.15247326742717
Trimmed Mean ( 10 / 28 )	1.5875	0.496687938981972	3.19617183226513
Trimmed Mean ( 11 / 28 )	1.57741935483871	0.485323573171588	3.25024260521755
Trimmed Mean ( 12 / 28 )	1.58	0.477249653366472	3.31063624426929
Trimmed Mean ( 13 / 28 )	1.58275862068966	0.46808705667401	3.38133387395058
Trimmed Mean ( 14 / 28 )	1.59464285714286	0.45971772566574	3.4687434660771
Trimmed Mean ( 15 / 28 )	1.60555555555556	0.449686719637988	3.57038686143117
Trimmed Mean ( 16 / 28 )	1.61538461538462	0.441531550652503	3.65859384906327
Trimmed Mean ( 17 / 28 )	1.628	0.432591054470805	3.76336954538174
Trimmed Mean ( 18 / 28 )	1.63541666666667	0.423892900791707	3.85808930419026
Trimmed Mean ( 19 / 28 )	1.63913043478261	0.420345823359922	3.89948072204133
Trimmed Mean ( 20 / 28 )	1.64318181818182	0.416295930266913	3.94714840745206
Trimmed Mean ( 21 / 28 )	1.65	0.410988016644992	4.01471559552856
Trimmed Mean ( 22 / 28 )	1.6525	0.406075455600342	4.06944073375955
Trimmed Mean ( 23 / 28 )	1.65526315789474	0.398801500523312	4.1505941068995
Trimmed Mean ( 24 / 28 )	1.66111111111111	0.390751773960932	4.25106479817847
Trimmed Mean ( 25 / 28 )	1.66470588235294	0.379930623954636	4.38160489677112
Trimmed Mean ( 26 / 28 )	1.675	0.368245622797715	4.54859446060574
Trimmed Mean ( 27 / 28 )	1.68	0.355592431037971	4.72451001022743
Trimmed Mean ( 28 / 28 )	1.68571428571429	0.341592685978688	4.93486645032985
Median	1.5
Midrange	-0.450000000000001
Midmean - Weighted Average at Xnp	1.44772727272727
Midmean - Weighted Average at X(n+1)p	1.65
Midmean - Empirical Distribution Function	1.44772727272727
Midmean - Empirical Distribution Function - Averaging	1.65
Midmean - Empirical Distribution Function - Interpolation	1.65
Midmean - Closest Observation	1.44772727272727
Midmean - True Basic - Statistics Graphics Toolkit	1.65
Midmean - MS Excel (old versions)	1.54444444444444
Number of observations	84

\begin{tabular}{lllllllll}
\hline
Central Tendency - Ungrouped Data \tabularnewline
Measure & Value & S.E. & Value/S.E. \tabularnewline
Arithmetic Mean & 1.62857142857143 & 0.713120966590338 & 2.28372394708594 \tabularnewline
Geometric Mean & NaN &  &  \tabularnewline
Harmonic Mean & 19.0177090985583 &  &  \tabularnewline
Quadratic Mean & 6.69784969047458 &  &  \tabularnewline
Winsorized Mean ( 1 / 28 ) & 1.67619047619048 & 0.69934938013908 & 2.39678553208574 \tabularnewline
Winsorized Mean ( 2 / 28 ) & 1.72142857142857 & 0.669566423253092 & 2.57096011933365 \tabularnewline
Winsorized Mean ( 3 / 28 ) & 1.75357142857143 & 0.660150555744285 & 2.65632046101116 \tabularnewline
Winsorized Mean ( 4 / 28 ) & 1.70119047619048 & 0.640669592995068 & 2.65533200699846 \tabularnewline
Winsorized Mean ( 5 / 28 ) & 1.61785714285714 & 0.621502631747243 & 2.60313804031502 \tabularnewline
Winsorized Mean ( 6 / 28 ) & 1.63928571428571 & 0.612163984797583 & 2.67785390025478 \tabularnewline
Winsorized Mean ( 7 / 28 ) & 1.53928571428571 & 0.582147432833493 & 2.64415099589726 \tabularnewline
Winsorized Mean ( 8 / 28 ) & 1.66309523809524 & 0.554535308507787 & 2.99907907139493 \tabularnewline
Winsorized Mean ( 9 / 28 ) & 1.67380952380952 & 0.545826282964681 & 3.06656087485958 \tabularnewline
Winsorized Mean ( 10 / 28 ) & 1.66190476190476 & 0.539992416071308 & 3.07764463433742 \tabularnewline
Winsorized Mean ( 11 / 28 ) & 1.55714285714286 & 0.51098176939917 & 3.04735501419904 \tabularnewline
Winsorized Mean ( 12 / 28 ) & 1.55714285714286 & 0.506617951751578 & 3.07360379109978 \tabularnewline
Winsorized Mean ( 13 / 28 ) & 1.4797619047619 & 0.490590695516693 & 3.01628611851966 \tabularnewline
Winsorized Mean ( 14 / 28 ) & 1.49642857142857 & 0.488030707431189 & 3.06625904608587 \tabularnewline
Winsorized Mean ( 15 / 28 ) & 1.51428571428571 & 0.464469490085968 & 3.26024797453421 \tabularnewline
Winsorized Mean ( 16 / 28 ) & 1.4952380952381 & 0.45637231268467 & 3.27635584736103 \tabularnewline
Winsorized Mean ( 17 / 28 ) & 1.55595238095238 & 0.441806750505192 & 3.52179404043329 \tabularnewline
Winsorized Mean ( 18 / 28 ) & 1.59880952380952 & 0.400517787530802 & 3.99185647575407 \tabularnewline
Winsorized Mean ( 19 / 28 ) & 1.59880952380952 & 0.394484689130955 & 4.05290640641004 \tabularnewline
Winsorized Mean ( 20 / 28 ) & 1.575 & 0.391372370238225 & 4.02430043551953 \tabularnewline
Winsorized Mean ( 21 / 28 ) & 1.625 & 0.378142313546527 & 4.29732389575613 \tabularnewline
Winsorized Mean ( 22 / 28 ) & 1.625 & 0.378142313546527 & 4.29732389575613 \tabularnewline
Winsorized Mean ( 23 / 28 ) & 1.59761904761905 & 0.367489725290568 & 4.34738426048738 \tabularnewline
Winsorized Mean ( 24 / 28 ) & 1.62619047619048 & 0.363759608696677 & 4.4705086472272 \tabularnewline
Winsorized Mean ( 25 / 28 ) & 1.56666666666667 & 0.348549709483276 & 4.4948155859583 \tabularnewline
Winsorized Mean ( 26 / 28 ) & 1.62857142857143 & 0.332679672179735 & 4.89531391533766 \tabularnewline
Winsorized Mean ( 27 / 28 ) & 1.62857142857143 & 0.316452526390447 & 5.14633726311938 \tabularnewline
Winsorized Mean ( 28 / 28 ) & 1.62857142857143 & 0.275034924129692 & 5.92132593242406 \tabularnewline
Trimmed Mean ( 1 / 28 ) & 1.67926829268293 & 0.668567159669462 & 2.5117421165484 \tabularnewline
Trimmed Mean ( 2 / 28 ) & 1.6825 & 0.632427448683326 & 2.6603842124545 \tabularnewline
Trimmed Mean ( 3 / 28 ) & 1.66153846153846 & 0.609165839114898 & 2.72756342337357 \tabularnewline
Trimmed Mean ( 4 / 28 ) & 1.62763157894737 & 0.586172834473266 & 2.77670933080677 \tabularnewline
Trimmed Mean ( 5 / 28 ) & 1.60675675675676 & 0.566327540330019 & 2.83715101656621 \tabularnewline
Trimmed Mean ( 6 / 28 ) & 1.60416666666667 & 0.54894776818102 & 2.92225737975435 \tabularnewline
Trimmed Mean ( 7 / 28 ) & 1.59714285714286 & 0.530974226402577 & 3.00794799017594 \tabularnewline
Trimmed Mean ( 8 / 28 ) & 1.60735294117647 & 0.517194753857135 & 3.10782916723179 \tabularnewline
Trimmed Mean ( 9 / 28 ) & 1.59848484848485 & 0.507057384118414 & 3.15247326742717 \tabularnewline
Trimmed Mean ( 10 / 28 ) & 1.5875 & 0.496687938981972 & 3.19617183226513 \tabularnewline
Trimmed Mean ( 11 / 28 ) & 1.57741935483871 & 0.485323573171588 & 3.25024260521755 \tabularnewline
Trimmed Mean ( 12 / 28 ) & 1.58 & 0.477249653366472 & 3.31063624426929 \tabularnewline
Trimmed Mean ( 13 / 28 ) & 1.58275862068966 & 0.46808705667401 & 3.38133387395058 \tabularnewline
Trimmed Mean ( 14 / 28 ) & 1.59464285714286 & 0.45971772566574 & 3.4687434660771 \tabularnewline
Trimmed Mean ( 15 / 28 ) & 1.60555555555556 & 0.449686719637988 & 3.57038686143117 \tabularnewline
Trimmed Mean ( 16 / 28 ) & 1.61538461538462 & 0.441531550652503 & 3.65859384906327 \tabularnewline
Trimmed Mean ( 17 / 28 ) & 1.628 & 0.432591054470805 & 3.76336954538174 \tabularnewline
Trimmed Mean ( 18 / 28 ) & 1.63541666666667 & 0.423892900791707 & 3.85808930419026 \tabularnewline
Trimmed Mean ( 19 / 28 ) & 1.63913043478261 & 0.420345823359922 & 3.89948072204133 \tabularnewline
Trimmed Mean ( 20 / 28 ) & 1.64318181818182 & 0.416295930266913 & 3.94714840745206 \tabularnewline
Trimmed Mean ( 21 / 28 ) & 1.65 & 0.410988016644992 & 4.01471559552856 \tabularnewline
Trimmed Mean ( 22 / 28 ) & 1.6525 & 0.406075455600342 & 4.06944073375955 \tabularnewline
Trimmed Mean ( 23 / 28 ) & 1.65526315789474 & 0.398801500523312 & 4.1505941068995 \tabularnewline
Trimmed Mean ( 24 / 28 ) & 1.66111111111111 & 0.390751773960932 & 4.25106479817847 \tabularnewline
Trimmed Mean ( 25 / 28 ) & 1.66470588235294 & 0.379930623954636 & 4.38160489677112 \tabularnewline
Trimmed Mean ( 26 / 28 ) & 1.675 & 0.368245622797715 & 4.54859446060574 \tabularnewline
Trimmed Mean ( 27 / 28 ) & 1.68 & 0.355592431037971 & 4.72451001022743 \tabularnewline
Trimmed Mean ( 28 / 28 ) & 1.68571428571429 & 0.341592685978688 & 4.93486645032985 \tabularnewline
Median & 1.5 &  &  \tabularnewline
Midrange & -0.450000000000001 &  &  \tabularnewline
Midmean - Weighted Average at Xnp & 1.44772727272727 &  &  \tabularnewline
Midmean - Weighted Average at X(n+1)p & 1.65 &  &  \tabularnewline
Midmean - Empirical Distribution Function & 1.44772727272727 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Averaging & 1.65 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Interpolation & 1.65 &  &  \tabularnewline
Midmean - Closest Observation & 1.44772727272727 &  &  \tabularnewline
Midmean - True Basic - Statistics Graphics Toolkit & 1.65 &  &  \tabularnewline
Midmean - MS Excel (old versions) & 1.54444444444444 &  &  \tabularnewline
Number of observations & 84 &  &  \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=233923&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]1.62857142857143[/C][C]0.713120966590338[/C][C]2.28372394708594[/C][/ROW]
[ROW][C]Geometric Mean[/C][C]NaN[/C][C][/C][C][/C][/ROW]
[ROW][C]Harmonic Mean[/C][C]19.0177090985583[/C][C][/C][C][/C][/ROW]
[ROW][C]Quadratic Mean[/C][C]6.69784969047458[/C][C][/C][C][/C][/ROW]
[ROW][C]Winsorized Mean ( 1 / 28 )[/C][C]1.67619047619048[/C][C]0.69934938013908[/C][C]2.39678553208574[/C][/ROW]
[ROW][C]Winsorized Mean ( 2 / 28 )[/C][C]1.72142857142857[/C][C]0.669566423253092[/C][C]2.57096011933365[/C][/ROW]
[ROW][C]Winsorized Mean ( 3 / 28 )[/C][C]1.75357142857143[/C][C]0.660150555744285[/C][C]2.65632046101116[/C][/ROW]
[ROW][C]Winsorized Mean ( 4 / 28 )[/C][C]1.70119047619048[/C][C]0.640669592995068[/C][C]2.65533200699846[/C][/ROW]
[ROW][C]Winsorized Mean ( 5 / 28 )[/C][C]1.61785714285714[/C][C]0.621502631747243[/C][C]2.60313804031502[/C][/ROW]
[ROW][C]Winsorized Mean ( 6 / 28 )[/C][C]1.63928571428571[/C][C]0.612163984797583[/C][C]2.67785390025478[/C][/ROW]
[ROW][C]Winsorized Mean ( 7 / 28 )[/C][C]1.53928571428571[/C][C]0.582147432833493[/C][C]2.64415099589726[/C][/ROW]
[ROW][C]Winsorized Mean ( 8 / 28 )[/C][C]1.66309523809524[/C][C]0.554535308507787[/C][C]2.99907907139493[/C][/ROW]
[ROW][C]Winsorized Mean ( 9 / 28 )[/C][C]1.67380952380952[/C][C]0.545826282964681[/C][C]3.06656087485958[/C][/ROW]
[ROW][C]Winsorized Mean ( 10 / 28 )[/C][C]1.66190476190476[/C][C]0.539992416071308[/C][C]3.07764463433742[/C][/ROW]
[ROW][C]Winsorized Mean ( 11 / 28 )[/C][C]1.55714285714286[/C][C]0.51098176939917[/C][C]3.04735501419904[/C][/ROW]
[ROW][C]Winsorized Mean ( 12 / 28 )[/C][C]1.55714285714286[/C][C]0.506617951751578[/C][C]3.07360379109978[/C][/ROW]
[ROW][C]Winsorized Mean ( 13 / 28 )[/C][C]1.4797619047619[/C][C]0.490590695516693[/C][C]3.01628611851966[/C][/ROW]
[ROW][C]Winsorized Mean ( 14 / 28 )[/C][C]1.49642857142857[/C][C]0.488030707431189[/C][C]3.06625904608587[/C][/ROW]
[ROW][C]Winsorized Mean ( 15 / 28 )[/C][C]1.51428571428571[/C][C]0.464469490085968[/C][C]3.26024797453421[/C][/ROW]
[ROW][C]Winsorized Mean ( 16 / 28 )[/C][C]1.4952380952381[/C][C]0.45637231268467[/C][C]3.27635584736103[/C][/ROW]
[ROW][C]Winsorized Mean ( 17 / 28 )[/C][C]1.55595238095238[/C][C]0.441806750505192[/C][C]3.52179404043329[/C][/ROW]
[ROW][C]Winsorized Mean ( 18 / 28 )[/C][C]1.59880952380952[/C][C]0.400517787530802[/C][C]3.99185647575407[/C][/ROW]
[ROW][C]Winsorized Mean ( 19 / 28 )[/C][C]1.59880952380952[/C][C]0.394484689130955[/C][C]4.05290640641004[/C][/ROW]
[ROW][C]Winsorized Mean ( 20 / 28 )[/C][C]1.575[/C][C]0.391372370238225[/C][C]4.02430043551953[/C][/ROW]
[ROW][C]Winsorized Mean ( 21 / 28 )[/C][C]1.625[/C][C]0.378142313546527[/C][C]4.29732389575613[/C][/ROW]
[ROW][C]Winsorized Mean ( 22 / 28 )[/C][C]1.625[/C][C]0.378142313546527[/C][C]4.29732389575613[/C][/ROW]
[ROW][C]Winsorized Mean ( 23 / 28 )[/C][C]1.59761904761905[/C][C]0.367489725290568[/C][C]4.34738426048738[/C][/ROW]
[ROW][C]Winsorized Mean ( 24 / 28 )[/C][C]1.62619047619048[/C][C]0.363759608696677[/C][C]4.4705086472272[/C][/ROW]
[ROW][C]Winsorized Mean ( 25 / 28 )[/C][C]1.56666666666667[/C][C]0.348549709483276[/C][C]4.4948155859583[/C][/ROW]
[ROW][C]Winsorized Mean ( 26 / 28 )[/C][C]1.62857142857143[/C][C]0.332679672179735[/C][C]4.89531391533766[/C][/ROW]
[ROW][C]Winsorized Mean ( 27 / 28 )[/C][C]1.62857142857143[/C][C]0.316452526390447[/C][C]5.14633726311938[/C][/ROW]
[ROW][C]Winsorized Mean ( 28 / 28 )[/C][C]1.62857142857143[/C][C]0.275034924129692[/C][C]5.92132593242406[/C][/ROW]
[ROW][C]Trimmed Mean ( 1 / 28 )[/C][C]1.67926829268293[/C][C]0.668567159669462[/C][C]2.5117421165484[/C][/ROW]
[ROW][C]Trimmed Mean ( 2 / 28 )[/C][C]1.6825[/C][C]0.632427448683326[/C][C]2.6603842124545[/C][/ROW]
[ROW][C]Trimmed Mean ( 3 / 28 )[/C][C]1.66153846153846[/C][C]0.609165839114898[/C][C]2.72756342337357[/C][/ROW]
[ROW][C]Trimmed Mean ( 4 / 28 )[/C][C]1.62763157894737[/C][C]0.586172834473266[/C][C]2.77670933080677[/C][/ROW]
[ROW][C]Trimmed Mean ( 5 / 28 )[/C][C]1.60675675675676[/C][C]0.566327540330019[/C][C]2.83715101656621[/C][/ROW]
[ROW][C]Trimmed Mean ( 6 / 28 )[/C][C]1.60416666666667[/C][C]0.54894776818102[/C][C]2.92225737975435[/C][/ROW]
[ROW][C]Trimmed Mean ( 7 / 28 )[/C][C]1.59714285714286[/C][C]0.530974226402577[/C][C]3.00794799017594[/C][/ROW]
[ROW][C]Trimmed Mean ( 8 / 28 )[/C][C]1.60735294117647[/C][C]0.517194753857135[/C][C]3.10782916723179[/C][/ROW]
[ROW][C]Trimmed Mean ( 9 / 28 )[/C][C]1.59848484848485[/C][C]0.507057384118414[/C][C]3.15247326742717[/C][/ROW]
[ROW][C]Trimmed Mean ( 10 / 28 )[/C][C]1.5875[/C][C]0.496687938981972[/C][C]3.19617183226513[/C][/ROW]
[ROW][C]Trimmed Mean ( 11 / 28 )[/C][C]1.57741935483871[/C][C]0.485323573171588[/C][C]3.25024260521755[/C][/ROW]
[ROW][C]Trimmed Mean ( 12 / 28 )[/C][C]1.58[/C][C]0.477249653366472[/C][C]3.31063624426929[/C][/ROW]
[ROW][C]Trimmed Mean ( 13 / 28 )[/C][C]1.58275862068966[/C][C]0.46808705667401[/C][C]3.38133387395058[/C][/ROW]
[ROW][C]Trimmed Mean ( 14 / 28 )[/C][C]1.59464285714286[/C][C]0.45971772566574[/C][C]3.4687434660771[/C][/ROW]
[ROW][C]Trimmed Mean ( 15 / 28 )[/C][C]1.60555555555556[/C][C]0.449686719637988[/C][C]3.57038686143117[/C][/ROW]
[ROW][C]Trimmed Mean ( 16 / 28 )[/C][C]1.61538461538462[/C][C]0.441531550652503[/C][C]3.65859384906327[/C][/ROW]
[ROW][C]Trimmed Mean ( 17 / 28 )[/C][C]1.628[/C][C]0.432591054470805[/C][C]3.76336954538174[/C][/ROW]
[ROW][C]Trimmed Mean ( 18 / 28 )[/C][C]1.63541666666667[/C][C]0.423892900791707[/C][C]3.85808930419026[/C][/ROW]
[ROW][C]Trimmed Mean ( 19 / 28 )[/C][C]1.63913043478261[/C][C]0.420345823359922[/C][C]3.89948072204133[/C][/ROW]
[ROW][C]Trimmed Mean ( 20 / 28 )[/C][C]1.64318181818182[/C][C]0.416295930266913[/C][C]3.94714840745206[/C][/ROW]
[ROW][C]Trimmed Mean ( 21 / 28 )[/C][C]1.65[/C][C]0.410988016644992[/C][C]4.01471559552856[/C][/ROW]
[ROW][C]Trimmed Mean ( 22 / 28 )[/C][C]1.6525[/C][C]0.406075455600342[/C][C]4.06944073375955[/C][/ROW]
[ROW][C]Trimmed Mean ( 23 / 28 )[/C][C]1.65526315789474[/C][C]0.398801500523312[/C][C]4.1505941068995[/C][/ROW]
[ROW][C]Trimmed Mean ( 24 / 28 )[/C][C]1.66111111111111[/C][C]0.390751773960932[/C][C]4.25106479817847[/C][/ROW]
[ROW][C]Trimmed Mean ( 25 / 28 )[/C][C]1.66470588235294[/C][C]0.379930623954636[/C][C]4.38160489677112[/C][/ROW]
[ROW][C]Trimmed Mean ( 26 / 28 )[/C][C]1.675[/C][C]0.368245622797715[/C][C]4.54859446060574[/C][/ROW]
[ROW][C]Trimmed Mean ( 27 / 28 )[/C][C]1.68[/C][C]0.355592431037971[/C][C]4.72451001022743[/C][/ROW]
[ROW][C]Trimmed Mean ( 28 / 28 )[/C][C]1.68571428571429[/C][C]0.341592685978688[/C][C]4.93486645032985[/C][/ROW]
[ROW][C]Median[/C][C]1.5[/C][C][/C][C][/C][/ROW]
[ROW][C]Midrange[/C][C]-0.450000000000001[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at Xnp[/C][C]1.44772727272727[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at X(n+1)p[/C][C]1.65[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function[/C][C]1.44772727272727[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Averaging[/C][C]1.65[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Interpolation[/C][C]1.65[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Closest Observation[/C][C]1.44772727272727[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - True Basic - Statistics Graphics Toolkit[/C][C]1.65[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - MS Excel (old versions)[/C][C]1.54444444444444[/C][C][/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]84[/C][C][/C][C][/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=233923&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=233923&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	1.62857142857143	0.713120966590338	2.28372394708594
Geometric Mean	NaN
Harmonic Mean	19.0177090985583
Quadratic Mean	6.69784969047458
Winsorized Mean ( 1 / 28 )	1.67619047619048	0.69934938013908	2.39678553208574
Winsorized Mean ( 2 / 28 )	1.72142857142857	0.669566423253092	2.57096011933365
Winsorized Mean ( 3 / 28 )	1.75357142857143	0.660150555744285	2.65632046101116
Winsorized Mean ( 4 / 28 )	1.70119047619048	0.640669592995068	2.65533200699846
Winsorized Mean ( 5 / 28 )	1.61785714285714	0.621502631747243	2.60313804031502
Winsorized Mean ( 6 / 28 )	1.63928571428571	0.612163984797583	2.67785390025478
Winsorized Mean ( 7 / 28 )	1.53928571428571	0.582147432833493	2.64415099589726
Winsorized Mean ( 8 / 28 )	1.66309523809524	0.554535308507787	2.99907907139493
Winsorized Mean ( 9 / 28 )	1.67380952380952	0.545826282964681	3.06656087485958
Winsorized Mean ( 10 / 28 )	1.66190476190476	0.539992416071308	3.07764463433742
Winsorized Mean ( 11 / 28 )	1.55714285714286	0.51098176939917	3.04735501419904
Winsorized Mean ( 12 / 28 )	1.55714285714286	0.506617951751578	3.07360379109978
Winsorized Mean ( 13 / 28 )	1.4797619047619	0.490590695516693	3.01628611851966
Winsorized Mean ( 14 / 28 )	1.49642857142857	0.488030707431189	3.06625904608587
Winsorized Mean ( 15 / 28 )	1.51428571428571	0.464469490085968	3.26024797453421
Winsorized Mean ( 16 / 28 )	1.4952380952381	0.45637231268467	3.27635584736103
Winsorized Mean ( 17 / 28 )	1.55595238095238	0.441806750505192	3.52179404043329
Winsorized Mean ( 18 / 28 )	1.59880952380952	0.400517787530802	3.99185647575407
Winsorized Mean ( 19 / 28 )	1.59880952380952	0.394484689130955	4.05290640641004
Winsorized Mean ( 20 / 28 )	1.575	0.391372370238225	4.02430043551953
Winsorized Mean ( 21 / 28 )	1.625	0.378142313546527	4.29732389575613
Winsorized Mean ( 22 / 28 )	1.625	0.378142313546527	4.29732389575613
Winsorized Mean ( 23 / 28 )	1.59761904761905	0.367489725290568	4.34738426048738
Winsorized Mean ( 24 / 28 )	1.62619047619048	0.363759608696677	4.4705086472272
Winsorized Mean ( 25 / 28 )	1.56666666666667	0.348549709483276	4.4948155859583
Winsorized Mean ( 26 / 28 )	1.62857142857143	0.332679672179735	4.89531391533766
Winsorized Mean ( 27 / 28 )	1.62857142857143	0.316452526390447	5.14633726311938
Winsorized Mean ( 28 / 28 )	1.62857142857143	0.275034924129692	5.92132593242406
Trimmed Mean ( 1 / 28 )	1.67926829268293	0.668567159669462	2.5117421165484
Trimmed Mean ( 2 / 28 )	1.6825	0.632427448683326	2.6603842124545
Trimmed Mean ( 3 / 28 )	1.66153846153846	0.609165839114898	2.72756342337357
Trimmed Mean ( 4 / 28 )	1.62763157894737	0.586172834473266	2.77670933080677
Trimmed Mean ( 5 / 28 )	1.60675675675676	0.566327540330019	2.83715101656621
Trimmed Mean ( 6 / 28 )	1.60416666666667	0.54894776818102	2.92225737975435
Trimmed Mean ( 7 / 28 )	1.59714285714286	0.530974226402577	3.00794799017594
Trimmed Mean ( 8 / 28 )	1.60735294117647	0.517194753857135	3.10782916723179
Trimmed Mean ( 9 / 28 )	1.59848484848485	0.507057384118414	3.15247326742717
Trimmed Mean ( 10 / 28 )	1.5875	0.496687938981972	3.19617183226513
Trimmed Mean ( 11 / 28 )	1.57741935483871	0.485323573171588	3.25024260521755
Trimmed Mean ( 12 / 28 )	1.58	0.477249653366472	3.31063624426929
Trimmed Mean ( 13 / 28 )	1.58275862068966	0.46808705667401	3.38133387395058
Trimmed Mean ( 14 / 28 )	1.59464285714286	0.45971772566574	3.4687434660771
Trimmed Mean ( 15 / 28 )	1.60555555555556	0.449686719637988	3.57038686143117
Trimmed Mean ( 16 / 28 )	1.61538461538462	0.441531550652503	3.65859384906327
Trimmed Mean ( 17 / 28 )	1.628	0.432591054470805	3.76336954538174
Trimmed Mean ( 18 / 28 )	1.63541666666667	0.423892900791707	3.85808930419026
Trimmed Mean ( 19 / 28 )	1.63913043478261	0.420345823359922	3.89948072204133
Trimmed Mean ( 20 / 28 )	1.64318181818182	0.416295930266913	3.94714840745206
Trimmed Mean ( 21 / 28 )	1.65	0.410988016644992	4.01471559552856
Trimmed Mean ( 22 / 28 )	1.6525	0.406075455600342	4.06944073375955
Trimmed Mean ( 23 / 28 )	1.65526315789474	0.398801500523312	4.1505941068995
Trimmed Mean ( 24 / 28 )	1.66111111111111	0.390751773960932	4.25106479817847
Trimmed Mean ( 25 / 28 )	1.66470588235294	0.379930623954636	4.38160489677112
Trimmed Mean ( 26 / 28 )	1.675	0.368245622797715	4.54859446060574
Trimmed Mean ( 27 / 28 )	1.68	0.355592431037971	4.72451001022743
Trimmed Mean ( 28 / 28 )	1.68571428571429	0.341592685978688	4.93486645032985
Median	1.5
Midrange	-0.450000000000001
Midmean - Weighted Average at Xnp	1.44772727272727
Midmean - Weighted Average at X(n+1)p	1.65
Midmean - Empirical Distribution Function	1.44772727272727
Midmean - Empirical Distribution Function - Averaging	1.65
Midmean - Empirical Distribution Function - Interpolation	1.65
Midmean - Closest Observation	1.44772727272727
Midmean - True Basic - Statistics Graphics Toolkit	1.65
Midmean - MS Excel (old versions)	1.54444444444444
Number of observations	84

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