Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_centraltendency.wasp
Title produced by softwareCentral Tendency
Date of computationWed, 21 Oct 2009 10:06:13 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Oct/21/t1256141242rqboo8zwy2d9enf.htm/, Retrieved Thu, 02 May 2024 00:22:47 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=49469, Retrieved Thu, 02 May 2024 00:22:47 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsSHW WS 3 - Vraag 2 (1)
Estimated Impact156
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Bivariate Data Series] [Bivariate dataset] [2008-01-05 23:51:08] [74be16979710d4c4e7c6647856088456]
F RMPD  [Univariate Explorative Data Analysis] [Colombia Coffee] [2008-01-07 14:21:11] [74be16979710d4c4e7c6647856088456]
F RMPD    [Univariate Data Series] [] [2009-10-14 08:30:28] [74be16979710d4c4e7c6647856088456]
- RMPD      [Univariate Explorative Data Analysis] [WS 3 - Vraag 1 (1)] [2009-10-21 15:37:29] [b103a1dc147def8132c7f643ad8c8f84]
- RMP         [Central Tendency] [WS 3 - Vraag 1 (2)] [2009-10-21 15:45:10] [b103a1dc147def8132c7f643ad8c8f84]
- RMPD          [Univariate Explorative Data Analysis] [WS 3 - Vraag 2 (1)] [2009-10-21 16:02:49] [b103a1dc147def8132c7f643ad8c8f84]
- RMP               [Central Tendency] [WS 3 - Vraag 2 (1)] [2009-10-21 16:06:13] [a45cc820faa25ce30779915639528ec2] [Current]
Feedback Forum

Post a new message
Dataseries X:
-3.8
-4.5
-6.1
-3.4
-2.4
-3.9
-3.1
-3.8
-3.4
-0.8
-2.6
-3.7
-0.5
-3.5
-3.6
-1.4
-1.3
-1.4
-1.1
-2.3
-1.6
0.4
-1.1
-1.5
0.3
-2.9
-2.3
0.1
-1.2
0.9
1
0.1
-0.2
3.5
-0.9
0.7
1
-1.6
-1.1
0.6
1.3
1.4
-0.4
0.6
0.1
2.4
0.1
1.6
1.9
1.2
-0.2
1.2
4
3.1
1.5
4.2
2.9
4.2
5.5
3.5
6.3
4.8
2.3
5.7
5.3
1.6
0
-0.7
-1.2
0.2
-1.5
-2
0.4




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time4 seconds
R Server'George Udny Yule' @ 72.249.76.132

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=49469&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 time4 seconds
R Server'George Udny Yule' @ 72.249.76.132







Central Tendency - Ungrouped Data
MeasureValueS.E.Value/S.E.
Arithmetic Mean-0.01506849315068490.312497617847095-0.0482195456544501
Geometric MeanNaN
Harmonic Mean0
Quadratic Mean2.65167303093984
Winsorized Mean ( 1 / 24 )-0.001369863013698630.305059399552399-0.00449047961055641
Winsorized Mean ( 2 / 24 )0.00958904109589040.3004826431112410.0319121297543315
Winsorized Mean ( 3 / 24 )0.005479452054794530.2976882672456270.0184066779167798
Winsorized Mean ( 4 / 24 )-0.02191780821917810.291150858808654-0.0752799023463727
Winsorized Mean ( 5 / 24 )-0.05616438356164390.280858018246101-0.199974292748979
Winsorized Mean ( 6 / 24 )-0.0479452054794520.279391799693687-0.171605628840994
Winsorized Mean ( 7 / 24 )-0.05753424657534250.27370782486997-0.210203148567913
Winsorized Mean ( 8 / 24 )-0.1013698630136990.260885486862090-0.388560759868121
Winsorized Mean ( 9 / 24 )-0.1013698630136990.260885486862090-0.388560759868121
Winsorized Mean ( 10 / 24 )-0.1150684931506850.24348959166961-0.472580747134443
Winsorized Mean ( 11 / 24 )-0.1150684931506850.232947097430307-0.493968349123177
Winsorized Mean ( 12 / 24 )-0.1479452054794520.210539547410334-0.70269556147146
Winsorized Mean ( 13 / 24 )-0.130136986301370.201890653862047-0.644591435076004
Winsorized Mean ( 14 / 24 )-0.1876712328767120.186491531563906-1.00632576344306
Winsorized Mean ( 15 / 24 )-0.2493150684931510.177224106416842-1.40677853331502
Winsorized Mean ( 16 / 24 )-0.1835616438356160.166963362611241-1.09941271524953
Winsorized Mean ( 17 / 24 )-0.1136986301369860.150016679292016-0.757906591944125
Winsorized Mean ( 18 / 24 )-0.1383561643835620.146374633204535-0.945219546273643
Winsorized Mean ( 19 / 24 )-0.1383561643835620.139028348906961-0.995165126186968
Winsorized Mean ( 20 / 24 )-0.1657534246575340.135136482929583-1.22656310911913
Winsorized Mean ( 21 / 24 )-0.1369863013698630.131240812526378-1.04377821755965
Winsorized Mean ( 22 / 24 )-0.1972602739726030.12289278040087-1.60514127297917
Winsorized Mean ( 23 / 24 )-0.1657534246575340.118659098478620-1.39688761150836
Winsorized Mean ( 24 / 24 )-0.1657534246575340.109867416605959-1.50866771767294
Trimmed Mean ( 1 / 24 )-0.01830985915492960.296310714748333-0.0617927676711954
Trimmed Mean ( 2 / 24 )-0.0362318840579710.285915253232642-0.126722459359277
Trimmed Mean ( 3 / 24 )-0.06119402985074630.276445710353526-0.221360026793289
Trimmed Mean ( 4 / 24 )-0.08615384615384620.266375935574621-0.323429539413900
Trimmed Mean ( 5 / 24 )-0.1047619047619050.256751423070023-0.408028526226837
Trimmed Mean ( 6 / 24 )-0.1163934426229510.248505701662650-0.468373328435564
Trimmed Mean ( 7 / 24 )-0.1305084745762710.238863643273025-0.546372284990637
Trimmed Mean ( 8 / 24 )-0.1438596491228070.228608868344685-0.629282888999314
Trimmed Mean ( 9 / 24 )-0.1509090909090910.219378871071358-0.687892549415135
Trimmed Mean ( 10 / 24 )-0.1584905660377360.207836913467952-0.762571784738204
Trimmed Mean ( 11 / 24 )-0.1647058823529410.197808057676276-0.832655071223093
Trimmed Mean ( 12 / 24 )-0.1714285714285710.187740775111471-0.9131131547038
Trimmed Mean ( 13 / 24 )-0.1744680851063830.180437029462786-0.966919515499818
Trimmed Mean ( 14 / 24 )-0.180.173076733143296-1.04000114129132
Trimmed Mean ( 15 / 24 )-0.1790697674418600.167204827920425-1.07096050795305
Trimmed Mean ( 16 / 24 )-0.1707317073170730.161594339373473-1.05654509916020
Trimmed Mean ( 17 / 24 )-0.1692307692307690.156598192439187-1.08066872672549
Trimmed Mean ( 18 / 24 )-0.1756756756756760.153800961690420-1.14222742006833
Trimmed Mean ( 19 / 24 )-0.180.150617775463968-1.19507806728337
Trimmed Mean ( 20 / 24 )-0.1848484848484850.147781652772714-1.25082160999227
Trimmed Mean ( 21 / 24 )-0.1870967741935480.144485883931847-1.29491386357024
Trimmed Mean ( 22 / 24 )-0.1931034482758620.140454139780032-1.37485052828123
Trimmed Mean ( 23 / 24 )-0.1925925925925930.136805841781219-1.40778047256628
Trimmed Mean ( 24 / 24 )-0.1960.132222035480727-1.4823550347519
Median0
Midrange0.1
Midmean - Weighted Average at Xnp-0.256756756756757
Midmean - Weighted Average at X(n+1)p-0.213157894736842
Midmean - Empirical Distribution Function-0.213157894736842
Midmean - Empirical Distribution Function - Averaging-0.213157894736842
Midmean - Empirical Distribution Function - Interpolation-0.213157894736842
Midmean - Closest Observation-0.213157894736842
Midmean - True Basic - Statistics Graphics Toolkit-0.213157894736842
Midmean - MS Excel (old versions)-0.213157894736842
Number of observations73

\begin{tabular}{lllllllll}
\hline
Central Tendency - Ungrouped Data \tabularnewline
Measure & Value & S.E. & Value/S.E. \tabularnewline
Arithmetic Mean & -0.0150684931506849 & 0.312497617847095 & -0.0482195456544501 \tabularnewline
Geometric Mean & NaN &  &  \tabularnewline
Harmonic Mean & 0 &  &  \tabularnewline
Quadratic Mean & 2.65167303093984 &  &  \tabularnewline
Winsorized Mean ( 1 / 24 ) & -0.00136986301369863 & 0.305059399552399 & -0.00449047961055641 \tabularnewline
Winsorized Mean ( 2 / 24 ) & 0.0095890410958904 & 0.300482643111241 & 0.0319121297543315 \tabularnewline
Winsorized Mean ( 3 / 24 ) & 0.00547945205479453 & 0.297688267245627 & 0.0184066779167798 \tabularnewline
Winsorized Mean ( 4 / 24 ) & -0.0219178082191781 & 0.291150858808654 & -0.0752799023463727 \tabularnewline
Winsorized Mean ( 5 / 24 ) & -0.0561643835616439 & 0.280858018246101 & -0.199974292748979 \tabularnewline
Winsorized Mean ( 6 / 24 ) & -0.047945205479452 & 0.279391799693687 & -0.171605628840994 \tabularnewline
Winsorized Mean ( 7 / 24 ) & -0.0575342465753425 & 0.27370782486997 & -0.210203148567913 \tabularnewline
Winsorized Mean ( 8 / 24 ) & -0.101369863013699 & 0.260885486862090 & -0.388560759868121 \tabularnewline
Winsorized Mean ( 9 / 24 ) & -0.101369863013699 & 0.260885486862090 & -0.388560759868121 \tabularnewline
Winsorized Mean ( 10 / 24 ) & -0.115068493150685 & 0.24348959166961 & -0.472580747134443 \tabularnewline
Winsorized Mean ( 11 / 24 ) & -0.115068493150685 & 0.232947097430307 & -0.493968349123177 \tabularnewline
Winsorized Mean ( 12 / 24 ) & -0.147945205479452 & 0.210539547410334 & -0.70269556147146 \tabularnewline
Winsorized Mean ( 13 / 24 ) & -0.13013698630137 & 0.201890653862047 & -0.644591435076004 \tabularnewline
Winsorized Mean ( 14 / 24 ) & -0.187671232876712 & 0.186491531563906 & -1.00632576344306 \tabularnewline
Winsorized Mean ( 15 / 24 ) & -0.249315068493151 & 0.177224106416842 & -1.40677853331502 \tabularnewline
Winsorized Mean ( 16 / 24 ) & -0.183561643835616 & 0.166963362611241 & -1.09941271524953 \tabularnewline
Winsorized Mean ( 17 / 24 ) & -0.113698630136986 & 0.150016679292016 & -0.757906591944125 \tabularnewline
Winsorized Mean ( 18 / 24 ) & -0.138356164383562 & 0.146374633204535 & -0.945219546273643 \tabularnewline
Winsorized Mean ( 19 / 24 ) & -0.138356164383562 & 0.139028348906961 & -0.995165126186968 \tabularnewline
Winsorized Mean ( 20 / 24 ) & -0.165753424657534 & 0.135136482929583 & -1.22656310911913 \tabularnewline
Winsorized Mean ( 21 / 24 ) & -0.136986301369863 & 0.131240812526378 & -1.04377821755965 \tabularnewline
Winsorized Mean ( 22 / 24 ) & -0.197260273972603 & 0.12289278040087 & -1.60514127297917 \tabularnewline
Winsorized Mean ( 23 / 24 ) & -0.165753424657534 & 0.118659098478620 & -1.39688761150836 \tabularnewline
Winsorized Mean ( 24 / 24 ) & -0.165753424657534 & 0.109867416605959 & -1.50866771767294 \tabularnewline
Trimmed Mean ( 1 / 24 ) & -0.0183098591549296 & 0.296310714748333 & -0.0617927676711954 \tabularnewline
Trimmed Mean ( 2 / 24 ) & -0.036231884057971 & 0.285915253232642 & -0.126722459359277 \tabularnewline
Trimmed Mean ( 3 / 24 ) & -0.0611940298507463 & 0.276445710353526 & -0.221360026793289 \tabularnewline
Trimmed Mean ( 4 / 24 ) & -0.0861538461538462 & 0.266375935574621 & -0.323429539413900 \tabularnewline
Trimmed Mean ( 5 / 24 ) & -0.104761904761905 & 0.256751423070023 & -0.408028526226837 \tabularnewline
Trimmed Mean ( 6 / 24 ) & -0.116393442622951 & 0.248505701662650 & -0.468373328435564 \tabularnewline
Trimmed Mean ( 7 / 24 ) & -0.130508474576271 & 0.238863643273025 & -0.546372284990637 \tabularnewline
Trimmed Mean ( 8 / 24 ) & -0.143859649122807 & 0.228608868344685 & -0.629282888999314 \tabularnewline
Trimmed Mean ( 9 / 24 ) & -0.150909090909091 & 0.219378871071358 & -0.687892549415135 \tabularnewline
Trimmed Mean ( 10 / 24 ) & -0.158490566037736 & 0.207836913467952 & -0.762571784738204 \tabularnewline
Trimmed Mean ( 11 / 24 ) & -0.164705882352941 & 0.197808057676276 & -0.832655071223093 \tabularnewline
Trimmed Mean ( 12 / 24 ) & -0.171428571428571 & 0.187740775111471 & -0.9131131547038 \tabularnewline
Trimmed Mean ( 13 / 24 ) & -0.174468085106383 & 0.180437029462786 & -0.966919515499818 \tabularnewline
Trimmed Mean ( 14 / 24 ) & -0.18 & 0.173076733143296 & -1.04000114129132 \tabularnewline
Trimmed Mean ( 15 / 24 ) & -0.179069767441860 & 0.167204827920425 & -1.07096050795305 \tabularnewline
Trimmed Mean ( 16 / 24 ) & -0.170731707317073 & 0.161594339373473 & -1.05654509916020 \tabularnewline
Trimmed Mean ( 17 / 24 ) & -0.169230769230769 & 0.156598192439187 & -1.08066872672549 \tabularnewline
Trimmed Mean ( 18 / 24 ) & -0.175675675675676 & 0.153800961690420 & -1.14222742006833 \tabularnewline
Trimmed Mean ( 19 / 24 ) & -0.18 & 0.150617775463968 & -1.19507806728337 \tabularnewline
Trimmed Mean ( 20 / 24 ) & -0.184848484848485 & 0.147781652772714 & -1.25082160999227 \tabularnewline
Trimmed Mean ( 21 / 24 ) & -0.187096774193548 & 0.144485883931847 & -1.29491386357024 \tabularnewline
Trimmed Mean ( 22 / 24 ) & -0.193103448275862 & 0.140454139780032 & -1.37485052828123 \tabularnewline
Trimmed Mean ( 23 / 24 ) & -0.192592592592593 & 0.136805841781219 & -1.40778047256628 \tabularnewline
Trimmed Mean ( 24 / 24 ) & -0.196 & 0.132222035480727 & -1.4823550347519 \tabularnewline
Median & 0 &  &  \tabularnewline
Midrange & 0.1 &  &  \tabularnewline
Midmean - Weighted Average at Xnp & -0.256756756756757 &  &  \tabularnewline
Midmean - Weighted Average at X(n+1)p & -0.213157894736842 &  &  \tabularnewline
Midmean - Empirical Distribution Function & -0.213157894736842 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Averaging & -0.213157894736842 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Interpolation & -0.213157894736842 &  &  \tabularnewline
Midmean - Closest Observation & -0.213157894736842 &  &  \tabularnewline
Midmean - True Basic - Statistics Graphics Toolkit & -0.213157894736842 &  &  \tabularnewline
Midmean - MS Excel (old versions) & -0.213157894736842 &  &  \tabularnewline
Number of observations & 73 &  &  \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=49469&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]-0.0150684931506849[/C][C]0.312497617847095[/C][C]-0.0482195456544501[/C][/ROW]
[ROW][C]Geometric Mean[/C][C]NaN[/C][C][/C][C][/C][/ROW]
[ROW][C]Harmonic Mean[/C][C]0[/C][C][/C][C][/C][/ROW]
[ROW][C]Quadratic Mean[/C][C]2.65167303093984[/C][C][/C][C][/C][/ROW]
[ROW][C]Winsorized Mean ( 1 / 24 )[/C][C]-0.00136986301369863[/C][C]0.305059399552399[/C][C]-0.00449047961055641[/C][/ROW]
[ROW][C]Winsorized Mean ( 2 / 24 )[/C][C]0.0095890410958904[/C][C]0.300482643111241[/C][C]0.0319121297543315[/C][/ROW]
[ROW][C]Winsorized Mean ( 3 / 24 )[/C][C]0.00547945205479453[/C][C]0.297688267245627[/C][C]0.0184066779167798[/C][/ROW]
[ROW][C]Winsorized Mean ( 4 / 24 )[/C][C]-0.0219178082191781[/C][C]0.291150858808654[/C][C]-0.0752799023463727[/C][/ROW]
[ROW][C]Winsorized Mean ( 5 / 24 )[/C][C]-0.0561643835616439[/C][C]0.280858018246101[/C][C]-0.199974292748979[/C][/ROW]
[ROW][C]Winsorized Mean ( 6 / 24 )[/C][C]-0.047945205479452[/C][C]0.279391799693687[/C][C]-0.171605628840994[/C][/ROW]
[ROW][C]Winsorized Mean ( 7 / 24 )[/C][C]-0.0575342465753425[/C][C]0.27370782486997[/C][C]-0.210203148567913[/C][/ROW]
[ROW][C]Winsorized Mean ( 8 / 24 )[/C][C]-0.101369863013699[/C][C]0.260885486862090[/C][C]-0.388560759868121[/C][/ROW]
[ROW][C]Winsorized Mean ( 9 / 24 )[/C][C]-0.101369863013699[/C][C]0.260885486862090[/C][C]-0.388560759868121[/C][/ROW]
[ROW][C]Winsorized Mean ( 10 / 24 )[/C][C]-0.115068493150685[/C][C]0.24348959166961[/C][C]-0.472580747134443[/C][/ROW]
[ROW][C]Winsorized Mean ( 11 / 24 )[/C][C]-0.115068493150685[/C][C]0.232947097430307[/C][C]-0.493968349123177[/C][/ROW]
[ROW][C]Winsorized Mean ( 12 / 24 )[/C][C]-0.147945205479452[/C][C]0.210539547410334[/C][C]-0.70269556147146[/C][/ROW]
[ROW][C]Winsorized Mean ( 13 / 24 )[/C][C]-0.13013698630137[/C][C]0.201890653862047[/C][C]-0.644591435076004[/C][/ROW]
[ROW][C]Winsorized Mean ( 14 / 24 )[/C][C]-0.187671232876712[/C][C]0.186491531563906[/C][C]-1.00632576344306[/C][/ROW]
[ROW][C]Winsorized Mean ( 15 / 24 )[/C][C]-0.249315068493151[/C][C]0.177224106416842[/C][C]-1.40677853331502[/C][/ROW]
[ROW][C]Winsorized Mean ( 16 / 24 )[/C][C]-0.183561643835616[/C][C]0.166963362611241[/C][C]-1.09941271524953[/C][/ROW]
[ROW][C]Winsorized Mean ( 17 / 24 )[/C][C]-0.113698630136986[/C][C]0.150016679292016[/C][C]-0.757906591944125[/C][/ROW]
[ROW][C]Winsorized Mean ( 18 / 24 )[/C][C]-0.138356164383562[/C][C]0.146374633204535[/C][C]-0.945219546273643[/C][/ROW]
[ROW][C]Winsorized Mean ( 19 / 24 )[/C][C]-0.138356164383562[/C][C]0.139028348906961[/C][C]-0.995165126186968[/C][/ROW]
[ROW][C]Winsorized Mean ( 20 / 24 )[/C][C]-0.165753424657534[/C][C]0.135136482929583[/C][C]-1.22656310911913[/C][/ROW]
[ROW][C]Winsorized Mean ( 21 / 24 )[/C][C]-0.136986301369863[/C][C]0.131240812526378[/C][C]-1.04377821755965[/C][/ROW]
[ROW][C]Winsorized Mean ( 22 / 24 )[/C][C]-0.197260273972603[/C][C]0.12289278040087[/C][C]-1.60514127297917[/C][/ROW]
[ROW][C]Winsorized Mean ( 23 / 24 )[/C][C]-0.165753424657534[/C][C]0.118659098478620[/C][C]-1.39688761150836[/C][/ROW]
[ROW][C]Winsorized Mean ( 24 / 24 )[/C][C]-0.165753424657534[/C][C]0.109867416605959[/C][C]-1.50866771767294[/C][/ROW]
[ROW][C]Trimmed Mean ( 1 / 24 )[/C][C]-0.0183098591549296[/C][C]0.296310714748333[/C][C]-0.0617927676711954[/C][/ROW]
[ROW][C]Trimmed Mean ( 2 / 24 )[/C][C]-0.036231884057971[/C][C]0.285915253232642[/C][C]-0.126722459359277[/C][/ROW]
[ROW][C]Trimmed Mean ( 3 / 24 )[/C][C]-0.0611940298507463[/C][C]0.276445710353526[/C][C]-0.221360026793289[/C][/ROW]
[ROW][C]Trimmed Mean ( 4 / 24 )[/C][C]-0.0861538461538462[/C][C]0.266375935574621[/C][C]-0.323429539413900[/C][/ROW]
[ROW][C]Trimmed Mean ( 5 / 24 )[/C][C]-0.104761904761905[/C][C]0.256751423070023[/C][C]-0.408028526226837[/C][/ROW]
[ROW][C]Trimmed Mean ( 6 / 24 )[/C][C]-0.116393442622951[/C][C]0.248505701662650[/C][C]-0.468373328435564[/C][/ROW]
[ROW][C]Trimmed Mean ( 7 / 24 )[/C][C]-0.130508474576271[/C][C]0.238863643273025[/C][C]-0.546372284990637[/C][/ROW]
[ROW][C]Trimmed Mean ( 8 / 24 )[/C][C]-0.143859649122807[/C][C]0.228608868344685[/C][C]-0.629282888999314[/C][/ROW]
[ROW][C]Trimmed Mean ( 9 / 24 )[/C][C]-0.150909090909091[/C][C]0.219378871071358[/C][C]-0.687892549415135[/C][/ROW]
[ROW][C]Trimmed Mean ( 10 / 24 )[/C][C]-0.158490566037736[/C][C]0.207836913467952[/C][C]-0.762571784738204[/C][/ROW]
[ROW][C]Trimmed Mean ( 11 / 24 )[/C][C]-0.164705882352941[/C][C]0.197808057676276[/C][C]-0.832655071223093[/C][/ROW]
[ROW][C]Trimmed Mean ( 12 / 24 )[/C][C]-0.171428571428571[/C][C]0.187740775111471[/C][C]-0.9131131547038[/C][/ROW]
[ROW][C]Trimmed Mean ( 13 / 24 )[/C][C]-0.174468085106383[/C][C]0.180437029462786[/C][C]-0.966919515499818[/C][/ROW]
[ROW][C]Trimmed Mean ( 14 / 24 )[/C][C]-0.18[/C][C]0.173076733143296[/C][C]-1.04000114129132[/C][/ROW]
[ROW][C]Trimmed Mean ( 15 / 24 )[/C][C]-0.179069767441860[/C][C]0.167204827920425[/C][C]-1.07096050795305[/C][/ROW]
[ROW][C]Trimmed Mean ( 16 / 24 )[/C][C]-0.170731707317073[/C][C]0.161594339373473[/C][C]-1.05654509916020[/C][/ROW]
[ROW][C]Trimmed Mean ( 17 / 24 )[/C][C]-0.169230769230769[/C][C]0.156598192439187[/C][C]-1.08066872672549[/C][/ROW]
[ROW][C]Trimmed Mean ( 18 / 24 )[/C][C]-0.175675675675676[/C][C]0.153800961690420[/C][C]-1.14222742006833[/C][/ROW]
[ROW][C]Trimmed Mean ( 19 / 24 )[/C][C]-0.18[/C][C]0.150617775463968[/C][C]-1.19507806728337[/C][/ROW]
[ROW][C]Trimmed Mean ( 20 / 24 )[/C][C]-0.184848484848485[/C][C]0.147781652772714[/C][C]-1.25082160999227[/C][/ROW]
[ROW][C]Trimmed Mean ( 21 / 24 )[/C][C]-0.187096774193548[/C][C]0.144485883931847[/C][C]-1.29491386357024[/C][/ROW]
[ROW][C]Trimmed Mean ( 22 / 24 )[/C][C]-0.193103448275862[/C][C]0.140454139780032[/C][C]-1.37485052828123[/C][/ROW]
[ROW][C]Trimmed Mean ( 23 / 24 )[/C][C]-0.192592592592593[/C][C]0.136805841781219[/C][C]-1.40778047256628[/C][/ROW]
[ROW][C]Trimmed Mean ( 24 / 24 )[/C][C]-0.196[/C][C]0.132222035480727[/C][C]-1.4823550347519[/C][/ROW]
[ROW][C]Median[/C][C]0[/C][C][/C][C][/C][/ROW]
[ROW][C]Midrange[/C][C]0.1[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at Xnp[/C][C]-0.256756756756757[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at X(n+1)p[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Averaging[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Interpolation[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Closest Observation[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - True Basic - Statistics Graphics Toolkit[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - MS Excel (old versions)[/C][C]-0.213157894736842[/C][C][/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]73[/C][C][/C][C][/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=49469&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=49469&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
MeasureValueS.E.Value/S.E.
Arithmetic Mean-0.01506849315068490.312497617847095-0.0482195456544501
Geometric MeanNaN
Harmonic Mean0
Quadratic Mean2.65167303093984
Winsorized Mean ( 1 / 24 )-0.001369863013698630.305059399552399-0.00449047961055641
Winsorized Mean ( 2 / 24 )0.00958904109589040.3004826431112410.0319121297543315
Winsorized Mean ( 3 / 24 )0.005479452054794530.2976882672456270.0184066779167798
Winsorized Mean ( 4 / 24 )-0.02191780821917810.291150858808654-0.0752799023463727
Winsorized Mean ( 5 / 24 )-0.05616438356164390.280858018246101-0.199974292748979
Winsorized Mean ( 6 / 24 )-0.0479452054794520.279391799693687-0.171605628840994
Winsorized Mean ( 7 / 24 )-0.05753424657534250.27370782486997-0.210203148567913
Winsorized Mean ( 8 / 24 )-0.1013698630136990.260885486862090-0.388560759868121
Winsorized Mean ( 9 / 24 )-0.1013698630136990.260885486862090-0.388560759868121
Winsorized Mean ( 10 / 24 )-0.1150684931506850.24348959166961-0.472580747134443
Winsorized Mean ( 11 / 24 )-0.1150684931506850.232947097430307-0.493968349123177
Winsorized Mean ( 12 / 24 )-0.1479452054794520.210539547410334-0.70269556147146
Winsorized Mean ( 13 / 24 )-0.130136986301370.201890653862047-0.644591435076004
Winsorized Mean ( 14 / 24 )-0.1876712328767120.186491531563906-1.00632576344306
Winsorized Mean ( 15 / 24 )-0.2493150684931510.177224106416842-1.40677853331502
Winsorized Mean ( 16 / 24 )-0.1835616438356160.166963362611241-1.09941271524953
Winsorized Mean ( 17 / 24 )-0.1136986301369860.150016679292016-0.757906591944125
Winsorized Mean ( 18 / 24 )-0.1383561643835620.146374633204535-0.945219546273643
Winsorized Mean ( 19 / 24 )-0.1383561643835620.139028348906961-0.995165126186968
Winsorized Mean ( 20 / 24 )-0.1657534246575340.135136482929583-1.22656310911913
Winsorized Mean ( 21 / 24 )-0.1369863013698630.131240812526378-1.04377821755965
Winsorized Mean ( 22 / 24 )-0.1972602739726030.12289278040087-1.60514127297917
Winsorized Mean ( 23 / 24 )-0.1657534246575340.118659098478620-1.39688761150836
Winsorized Mean ( 24 / 24 )-0.1657534246575340.109867416605959-1.50866771767294
Trimmed Mean ( 1 / 24 )-0.01830985915492960.296310714748333-0.0617927676711954
Trimmed Mean ( 2 / 24 )-0.0362318840579710.285915253232642-0.126722459359277
Trimmed Mean ( 3 / 24 )-0.06119402985074630.276445710353526-0.221360026793289
Trimmed Mean ( 4 / 24 )-0.08615384615384620.266375935574621-0.323429539413900
Trimmed Mean ( 5 / 24 )-0.1047619047619050.256751423070023-0.408028526226837
Trimmed Mean ( 6 / 24 )-0.1163934426229510.248505701662650-0.468373328435564
Trimmed Mean ( 7 / 24 )-0.1305084745762710.238863643273025-0.546372284990637
Trimmed Mean ( 8 / 24 )-0.1438596491228070.228608868344685-0.629282888999314
Trimmed Mean ( 9 / 24 )-0.1509090909090910.219378871071358-0.687892549415135
Trimmed Mean ( 10 / 24 )-0.1584905660377360.207836913467952-0.762571784738204
Trimmed Mean ( 11 / 24 )-0.1647058823529410.197808057676276-0.832655071223093
Trimmed Mean ( 12 / 24 )-0.1714285714285710.187740775111471-0.9131131547038
Trimmed Mean ( 13 / 24 )-0.1744680851063830.180437029462786-0.966919515499818
Trimmed Mean ( 14 / 24 )-0.180.173076733143296-1.04000114129132
Trimmed Mean ( 15 / 24 )-0.1790697674418600.167204827920425-1.07096050795305
Trimmed Mean ( 16 / 24 )-0.1707317073170730.161594339373473-1.05654509916020
Trimmed Mean ( 17 / 24 )-0.1692307692307690.156598192439187-1.08066872672549
Trimmed Mean ( 18 / 24 )-0.1756756756756760.153800961690420-1.14222742006833
Trimmed Mean ( 19 / 24 )-0.180.150617775463968-1.19507806728337
Trimmed Mean ( 20 / 24 )-0.1848484848484850.147781652772714-1.25082160999227
Trimmed Mean ( 21 / 24 )-0.1870967741935480.144485883931847-1.29491386357024
Trimmed Mean ( 22 / 24 )-0.1931034482758620.140454139780032-1.37485052828123
Trimmed Mean ( 23 / 24 )-0.1925925925925930.136805841781219-1.40778047256628
Trimmed Mean ( 24 / 24 )-0.1960.132222035480727-1.4823550347519
Median0
Midrange0.1
Midmean - Weighted Average at Xnp-0.256756756756757
Midmean - Weighted Average at X(n+1)p-0.213157894736842
Midmean - Empirical Distribution Function-0.213157894736842
Midmean - Empirical Distribution Function - Averaging-0.213157894736842
Midmean - Empirical Distribution Function - Interpolation-0.213157894736842
Midmean - Closest Observation-0.213157894736842
Midmean - True Basic - Statistics Graphics Toolkit-0.213157894736842
Midmean - MS Excel (old versions)-0.213157894736842
Number of observations73



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')