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 computationTue, 16 Dec 2008 14:19:25 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Dec/16/t12294624931cvqmkdmf8gprqn.htm/, Retrieved Fri, 29 Mar 2024 02:18:08 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=34215, Retrieved Fri, 29 Mar 2024 02:18:08 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact211
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  [Mean Plot] [Colombia Coffee] [2008-01-07 13:38:24] [74be16979710d4c4e7c6647856088456]
-   PD    [Mean Plot] [Notched boxplot -...] [2008-12-07 09:49:05] [c45c87b96bbf32ffc2144fc37d767b2e]
- RMPD      [Central Tendency] [central tendency] [2008-12-14 12:46:40] [c45c87b96bbf32ffc2144fc37d767b2e]
-    D          [Central Tendency] [trimmed mean] [2008-12-16 21:19:25] [3dc594a6c62226e1e98766c4d385bfaa] [Current]
Feedback Forum

Post a new message
Dataseries X:
524
552
532
511
492
492
493
481
462
457
442
439
488
521
501
485
464
460
467
460
448
443
436
431
484
510
513
503
471
471
476
475
470
461
455
456
517
525
523
519
509
512
519
517
510
509
501
507
569
580
578
565
547
555
562
561
555
544
537
543
594
611
613
611
594
595
591
589
584
573
567
569
621
629
628
612
595
597
593
590
580
574
573
573
620
626
620
588
566
557
561
549
532
526
511
499
555
565
542
527
510
514
517
508
493
490
469
478




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

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

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







Central Tendency - Ungrouped Data
MeasureValueS.E.Value/S.E.
Arithmetic Mean530.2685185185185.03177178780895105.384055732269
Geometric Mean527.706947384403
Harmonic Mean525.144228198586
Quadratic Mean532.816859301163
Winsorized Mean ( 1 / 36 )530.3055555555565.02175017194515105.601739910957
Winsorized Mean ( 2 / 36 )530.3240740740745.00546307127795105.949053368738
Winsorized Mean ( 3 / 36 )530.2685185185184.96717516199165106.754543825247
Winsorized Mean ( 4 / 36 )530.2685185185184.95475560044476107.022134143391
Winsorized Mean ( 5 / 36 )530.54.91755320518116107.878853133925
Winsorized Mean ( 6 / 36 )530.54.79405387733043110.657913651861
Winsorized Mean ( 7 / 36 )530.54.77417514926217111.118671480242
Winsorized Mean ( 8 / 36 )530.54.75164615952593111.645518666509
Winsorized Mean ( 9 / 36 )530.754.71604797633115112.541263927704
Winsorized Mean ( 10 / 36 )529.4537037037044.52223046821205117.078001093791
Winsorized Mean ( 11 / 36 )529.3518518518524.47948894254296118.172376054877
Winsorized Mean ( 12 / 36 )529.4629629629634.46371909389175118.614758640949
Winsorized Mean ( 13 / 36 )529.5833333333334.41353069569023119.990857625725
Winsorized Mean ( 14 / 36 )529.9722222222224.36027764852912121.545521854784
Winsorized Mean ( 15 / 36 )530.1111111111114.30408560309102123.164630073901
Winsorized Mean ( 16 / 36 )529.9629629629634.24433175094762124.863699178237
Winsorized Mean ( 17 / 36 )529.9629629629634.20253360110119126.105586121690
Winsorized Mean ( 18 / 36 )529.7962962962964.180377426424126.734082178196
Winsorized Mean ( 19 / 36 )530.3240740740744.06606120272982130.426977763648
Winsorized Mean ( 20 / 36 )529.7685185185183.94579942096946134.261390911847
Winsorized Mean ( 21 / 36 )529.379629629633.79802734301216139.382785277629
Winsorized Mean ( 22 / 36 )529.9907407407413.72179587235347142.401883101021
Winsorized Mean ( 23 / 36 )530.2037037037043.59082710970893147.655035317666
Winsorized Mean ( 24 / 36 )529.5370370370373.45530794304872153.253210933730
Winsorized Mean ( 25 / 36 )5303.34489169480608158.450571306383
Winsorized Mean ( 26 / 36 )530.4814814814823.28894330422524161.292376429835
Winsorized Mean ( 27 / 36 )530.9814814814823.23200027870849164.288810548514
Winsorized Mean ( 28 / 36 )529.9444444444443.10806389115381170.506290412104
Winsorized Mean ( 29 / 36 )530.2129629629633.07757245565176172.282852996446
Winsorized Mean ( 30 / 36 )529.6574074074073.01266973979319175.809980234928
Winsorized Mean ( 31 / 36 )531.0925925925932.78851105067249190.457410044874
Winsorized Mean ( 32 / 36 )531.3888888888892.69072845427223197.48885772742
Winsorized Mean ( 33 / 36 )531.3888888888892.69072845427223197.48885772742
Winsorized Mean ( 34 / 36 )531.0740740740742.51522548543729211.143723355580
Winsorized Mean ( 35 / 36 )532.0462962962962.34551722781664226.83538197311
Winsorized Mean ( 36 / 36 )532.379629629632.31246107402122230.222093513495
Trimmed Mean ( 1 / 36 )530.273584905664.95243381805033107.073330888936
Trimmed Mean ( 2 / 36 )530.2403846153854.8746707667748108.774604477792
Trimmed Mean ( 3 / 36 )530.1960784313734.79686445538302110.529718603241
Trimmed Mean ( 4 / 36 )530.174.72500451605791112.205183761882
Trimmed Mean ( 5 / 36 )530.1428571428574.64787878427908114.061248528254
Trimmed Mean ( 6 / 36 )530.06254.57075976687588115.968138129101
Trimmed Mean ( 7 / 36 )529.9787234042554.51262188593083117.443636271984
Trimmed Mean ( 8 / 36 )529.8913043478264.45043458749993119.065069698170
Trimmed Mean ( 9 / 36 )529.84.38369467757704120.856957194116
Trimmed Mean ( 10 / 36 )529.6704545454554.3136475603058122.789459996566
Trimmed Mean ( 11 / 36 )529.6976744186054.26662900372034124.148988336396
Trimmed Mean ( 12 / 36 )529.7380952380954.21877748766444125.566730358980
Trimmed Mean ( 13 / 36 )529.7682926829274.1653674137108127.184048864245
Trimmed Mean ( 14 / 36 )529.78754.11060275193033128.883166769451
Trimmed Mean ( 15 / 36 )529.7692307692314.05432322615652130.66773446957
Trimmed Mean ( 16 / 36 )529.7368421052633.99633026492234132.555821713488
Trimmed Mean ( 17 / 36 )529.7162162162163.93653466544606134.564092846923
Trimmed Mean ( 18 / 36 )529.6944444444443.87170218541591136.811774014985
Trimmed Mean ( 19 / 36 )529.6857142857143.79787141304685139.469101683138
Trimmed Mean ( 20 / 36 )529.6323529411763.72672198072011142.117484395452
Trimmed Mean ( 21 / 36 )529.6212121212123.65924859824209144.734963450049
Trimmed Mean ( 22 / 36 )529.6406253.59951820984503147.142087947043
Trimmed Mean ( 23 / 36 )529.6129032258063.53791541717057149.696315704845
Trimmed Mean ( 24 / 36 )529.5666666666673.48186315040048152.092900780939
Trimmed Mean ( 25 / 36 )529.5689655172413.43270911595379154.27143624143
Trimmed Mean ( 26 / 36 )529.5357142857143.3874255908552156.323939842477
Trimmed Mean ( 27 / 36 )529.4629629629633.33801693630516158.616020549322
Trimmed Mean ( 28 / 36 )529.3461538461543.28336046899666161.220846399455
Trimmed Mean ( 29 / 36 )529.33.23390835759242163.671923094955
Trimmed Mean ( 30 / 36 )529.2291666666673.17406371733122166.735520707079
Trimmed Mean ( 31 / 36 )529.1956521739133.10751303474010170.295553472449
Trimmed Mean ( 32 / 36 )529.0454545454553.06051622472276172.861509529615
Trimmed Mean ( 33 / 36 )528.8571428571433.01382247873032175.477204310966
Trimmed Mean ( 34 / 36 )528.652.94795670218352179.327599896035
Trimmed Mean ( 35 / 36 )528.4473684210532.89520557436098182.524989969906
Trimmed Mean ( 36 / 36 )528.1388888888892.85388979269586185.059314567994
Median523.5
Midrange530
Midmean - Weighted Average at Xnp530.298245614035
Midmean - Weighted Average at X(n+1)p531.017857142857
Midmean - Empirical Distribution Function530.298245614035
Midmean - Empirical Distribution Function - Averaging531.017857142857
Midmean - Empirical Distribution Function - Interpolation531.017857142857
Midmean - Closest Observation530.298245614035
Midmean - True Basic - Statistics Graphics Toolkit531.017857142857
Midmean - MS Excel (old versions)530.298245614035
Number of observations108

\begin{tabular}{lllllllll}
\hline
Central Tendency - Ungrouped Data \tabularnewline
Measure & Value & S.E. & Value/S.E. \tabularnewline
Arithmetic Mean & 530.268518518518 & 5.03177178780895 & 105.384055732269 \tabularnewline
Geometric Mean & 527.706947384403 &  &  \tabularnewline
Harmonic Mean & 525.144228198586 &  &  \tabularnewline
Quadratic Mean & 532.816859301163 &  &  \tabularnewline
Winsorized Mean ( 1 / 36 ) & 530.305555555556 & 5.02175017194515 & 105.601739910957 \tabularnewline
Winsorized Mean ( 2 / 36 ) & 530.324074074074 & 5.00546307127795 & 105.949053368738 \tabularnewline
Winsorized Mean ( 3 / 36 ) & 530.268518518518 & 4.96717516199165 & 106.754543825247 \tabularnewline
Winsorized Mean ( 4 / 36 ) & 530.268518518518 & 4.95475560044476 & 107.022134143391 \tabularnewline
Winsorized Mean ( 5 / 36 ) & 530.5 & 4.91755320518116 & 107.878853133925 \tabularnewline
Winsorized Mean ( 6 / 36 ) & 530.5 & 4.79405387733043 & 110.657913651861 \tabularnewline
Winsorized Mean ( 7 / 36 ) & 530.5 & 4.77417514926217 & 111.118671480242 \tabularnewline
Winsorized Mean ( 8 / 36 ) & 530.5 & 4.75164615952593 & 111.645518666509 \tabularnewline
Winsorized Mean ( 9 / 36 ) & 530.75 & 4.71604797633115 & 112.541263927704 \tabularnewline
Winsorized Mean ( 10 / 36 ) & 529.453703703704 & 4.52223046821205 & 117.078001093791 \tabularnewline
Winsorized Mean ( 11 / 36 ) & 529.351851851852 & 4.47948894254296 & 118.172376054877 \tabularnewline
Winsorized Mean ( 12 / 36 ) & 529.462962962963 & 4.46371909389175 & 118.614758640949 \tabularnewline
Winsorized Mean ( 13 / 36 ) & 529.583333333333 & 4.41353069569023 & 119.990857625725 \tabularnewline
Winsorized Mean ( 14 / 36 ) & 529.972222222222 & 4.36027764852912 & 121.545521854784 \tabularnewline
Winsorized Mean ( 15 / 36 ) & 530.111111111111 & 4.30408560309102 & 123.164630073901 \tabularnewline
Winsorized Mean ( 16 / 36 ) & 529.962962962963 & 4.24433175094762 & 124.863699178237 \tabularnewline
Winsorized Mean ( 17 / 36 ) & 529.962962962963 & 4.20253360110119 & 126.105586121690 \tabularnewline
Winsorized Mean ( 18 / 36 ) & 529.796296296296 & 4.180377426424 & 126.734082178196 \tabularnewline
Winsorized Mean ( 19 / 36 ) & 530.324074074074 & 4.06606120272982 & 130.426977763648 \tabularnewline
Winsorized Mean ( 20 / 36 ) & 529.768518518518 & 3.94579942096946 & 134.261390911847 \tabularnewline
Winsorized Mean ( 21 / 36 ) & 529.37962962963 & 3.79802734301216 & 139.382785277629 \tabularnewline
Winsorized Mean ( 22 / 36 ) & 529.990740740741 & 3.72179587235347 & 142.401883101021 \tabularnewline
Winsorized Mean ( 23 / 36 ) & 530.203703703704 & 3.59082710970893 & 147.655035317666 \tabularnewline
Winsorized Mean ( 24 / 36 ) & 529.537037037037 & 3.45530794304872 & 153.253210933730 \tabularnewline
Winsorized Mean ( 25 / 36 ) & 530 & 3.34489169480608 & 158.450571306383 \tabularnewline
Winsorized Mean ( 26 / 36 ) & 530.481481481482 & 3.28894330422524 & 161.292376429835 \tabularnewline
Winsorized Mean ( 27 / 36 ) & 530.981481481482 & 3.23200027870849 & 164.288810548514 \tabularnewline
Winsorized Mean ( 28 / 36 ) & 529.944444444444 & 3.10806389115381 & 170.506290412104 \tabularnewline
Winsorized Mean ( 29 / 36 ) & 530.212962962963 & 3.07757245565176 & 172.282852996446 \tabularnewline
Winsorized Mean ( 30 / 36 ) & 529.657407407407 & 3.01266973979319 & 175.809980234928 \tabularnewline
Winsorized Mean ( 31 / 36 ) & 531.092592592593 & 2.78851105067249 & 190.457410044874 \tabularnewline
Winsorized Mean ( 32 / 36 ) & 531.388888888889 & 2.69072845427223 & 197.48885772742 \tabularnewline
Winsorized Mean ( 33 / 36 ) & 531.388888888889 & 2.69072845427223 & 197.48885772742 \tabularnewline
Winsorized Mean ( 34 / 36 ) & 531.074074074074 & 2.51522548543729 & 211.143723355580 \tabularnewline
Winsorized Mean ( 35 / 36 ) & 532.046296296296 & 2.34551722781664 & 226.83538197311 \tabularnewline
Winsorized Mean ( 36 / 36 ) & 532.37962962963 & 2.31246107402122 & 230.222093513495 \tabularnewline
Trimmed Mean ( 1 / 36 ) & 530.27358490566 & 4.95243381805033 & 107.073330888936 \tabularnewline
Trimmed Mean ( 2 / 36 ) & 530.240384615385 & 4.8746707667748 & 108.774604477792 \tabularnewline
Trimmed Mean ( 3 / 36 ) & 530.196078431373 & 4.79686445538302 & 110.529718603241 \tabularnewline
Trimmed Mean ( 4 / 36 ) & 530.17 & 4.72500451605791 & 112.205183761882 \tabularnewline
Trimmed Mean ( 5 / 36 ) & 530.142857142857 & 4.64787878427908 & 114.061248528254 \tabularnewline
Trimmed Mean ( 6 / 36 ) & 530.0625 & 4.57075976687588 & 115.968138129101 \tabularnewline
Trimmed Mean ( 7 / 36 ) & 529.978723404255 & 4.51262188593083 & 117.443636271984 \tabularnewline
Trimmed Mean ( 8 / 36 ) & 529.891304347826 & 4.45043458749993 & 119.065069698170 \tabularnewline
Trimmed Mean ( 9 / 36 ) & 529.8 & 4.38369467757704 & 120.856957194116 \tabularnewline
Trimmed Mean ( 10 / 36 ) & 529.670454545455 & 4.3136475603058 & 122.789459996566 \tabularnewline
Trimmed Mean ( 11 / 36 ) & 529.697674418605 & 4.26662900372034 & 124.148988336396 \tabularnewline
Trimmed Mean ( 12 / 36 ) & 529.738095238095 & 4.21877748766444 & 125.566730358980 \tabularnewline
Trimmed Mean ( 13 / 36 ) & 529.768292682927 & 4.1653674137108 & 127.184048864245 \tabularnewline
Trimmed Mean ( 14 / 36 ) & 529.7875 & 4.11060275193033 & 128.883166769451 \tabularnewline
Trimmed Mean ( 15 / 36 ) & 529.769230769231 & 4.05432322615652 & 130.66773446957 \tabularnewline
Trimmed Mean ( 16 / 36 ) & 529.736842105263 & 3.99633026492234 & 132.555821713488 \tabularnewline
Trimmed Mean ( 17 / 36 ) & 529.716216216216 & 3.93653466544606 & 134.564092846923 \tabularnewline
Trimmed Mean ( 18 / 36 ) & 529.694444444444 & 3.87170218541591 & 136.811774014985 \tabularnewline
Trimmed Mean ( 19 / 36 ) & 529.685714285714 & 3.79787141304685 & 139.469101683138 \tabularnewline
Trimmed Mean ( 20 / 36 ) & 529.632352941176 & 3.72672198072011 & 142.117484395452 \tabularnewline
Trimmed Mean ( 21 / 36 ) & 529.621212121212 & 3.65924859824209 & 144.734963450049 \tabularnewline
Trimmed Mean ( 22 / 36 ) & 529.640625 & 3.59951820984503 & 147.142087947043 \tabularnewline
Trimmed Mean ( 23 / 36 ) & 529.612903225806 & 3.53791541717057 & 149.696315704845 \tabularnewline
Trimmed Mean ( 24 / 36 ) & 529.566666666667 & 3.48186315040048 & 152.092900780939 \tabularnewline
Trimmed Mean ( 25 / 36 ) & 529.568965517241 & 3.43270911595379 & 154.27143624143 \tabularnewline
Trimmed Mean ( 26 / 36 ) & 529.535714285714 & 3.3874255908552 & 156.323939842477 \tabularnewline
Trimmed Mean ( 27 / 36 ) & 529.462962962963 & 3.33801693630516 & 158.616020549322 \tabularnewline
Trimmed Mean ( 28 / 36 ) & 529.346153846154 & 3.28336046899666 & 161.220846399455 \tabularnewline
Trimmed Mean ( 29 / 36 ) & 529.3 & 3.23390835759242 & 163.671923094955 \tabularnewline
Trimmed Mean ( 30 / 36 ) & 529.229166666667 & 3.17406371733122 & 166.735520707079 \tabularnewline
Trimmed Mean ( 31 / 36 ) & 529.195652173913 & 3.10751303474010 & 170.295553472449 \tabularnewline
Trimmed Mean ( 32 / 36 ) & 529.045454545455 & 3.06051622472276 & 172.861509529615 \tabularnewline
Trimmed Mean ( 33 / 36 ) & 528.857142857143 & 3.01382247873032 & 175.477204310966 \tabularnewline
Trimmed Mean ( 34 / 36 ) & 528.65 & 2.94795670218352 & 179.327599896035 \tabularnewline
Trimmed Mean ( 35 / 36 ) & 528.447368421053 & 2.89520557436098 & 182.524989969906 \tabularnewline
Trimmed Mean ( 36 / 36 ) & 528.138888888889 & 2.85388979269586 & 185.059314567994 \tabularnewline
Median & 523.5 &  &  \tabularnewline
Midrange & 530 &  &  \tabularnewline
Midmean - Weighted Average at Xnp & 530.298245614035 &  &  \tabularnewline
Midmean - Weighted Average at X(n+1)p & 531.017857142857 &  &  \tabularnewline
Midmean - Empirical Distribution Function & 530.298245614035 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Averaging & 531.017857142857 &  &  \tabularnewline
Midmean - Empirical Distribution Function - Interpolation & 531.017857142857 &  &  \tabularnewline
Midmean - Closest Observation & 530.298245614035 &  &  \tabularnewline
Midmean - True Basic - Statistics Graphics Toolkit & 531.017857142857 &  &  \tabularnewline
Midmean - MS Excel (old versions) & 530.298245614035 &  &  \tabularnewline
Number of observations & 108 &  &  \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=34215&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]530.268518518518[/C][C]5.03177178780895[/C][C]105.384055732269[/C][/ROW]
[ROW][C]Geometric Mean[/C][C]527.706947384403[/C][C][/C][C][/C][/ROW]
[ROW][C]Harmonic Mean[/C][C]525.144228198586[/C][C][/C][C][/C][/ROW]
[ROW][C]Quadratic Mean[/C][C]532.816859301163[/C][C][/C][C][/C][/ROW]
[ROW][C]Winsorized Mean ( 1 / 36 )[/C][C]530.305555555556[/C][C]5.02175017194515[/C][C]105.601739910957[/C][/ROW]
[ROW][C]Winsorized Mean ( 2 / 36 )[/C][C]530.324074074074[/C][C]5.00546307127795[/C][C]105.949053368738[/C][/ROW]
[ROW][C]Winsorized Mean ( 3 / 36 )[/C][C]530.268518518518[/C][C]4.96717516199165[/C][C]106.754543825247[/C][/ROW]
[ROW][C]Winsorized Mean ( 4 / 36 )[/C][C]530.268518518518[/C][C]4.95475560044476[/C][C]107.022134143391[/C][/ROW]
[ROW][C]Winsorized Mean ( 5 / 36 )[/C][C]530.5[/C][C]4.91755320518116[/C][C]107.878853133925[/C][/ROW]
[ROW][C]Winsorized Mean ( 6 / 36 )[/C][C]530.5[/C][C]4.79405387733043[/C][C]110.657913651861[/C][/ROW]
[ROW][C]Winsorized Mean ( 7 / 36 )[/C][C]530.5[/C][C]4.77417514926217[/C][C]111.118671480242[/C][/ROW]
[ROW][C]Winsorized Mean ( 8 / 36 )[/C][C]530.5[/C][C]4.75164615952593[/C][C]111.645518666509[/C][/ROW]
[ROW][C]Winsorized Mean ( 9 / 36 )[/C][C]530.75[/C][C]4.71604797633115[/C][C]112.541263927704[/C][/ROW]
[ROW][C]Winsorized Mean ( 10 / 36 )[/C][C]529.453703703704[/C][C]4.52223046821205[/C][C]117.078001093791[/C][/ROW]
[ROW][C]Winsorized Mean ( 11 / 36 )[/C][C]529.351851851852[/C][C]4.47948894254296[/C][C]118.172376054877[/C][/ROW]
[ROW][C]Winsorized Mean ( 12 / 36 )[/C][C]529.462962962963[/C][C]4.46371909389175[/C][C]118.614758640949[/C][/ROW]
[ROW][C]Winsorized Mean ( 13 / 36 )[/C][C]529.583333333333[/C][C]4.41353069569023[/C][C]119.990857625725[/C][/ROW]
[ROW][C]Winsorized Mean ( 14 / 36 )[/C][C]529.972222222222[/C][C]4.36027764852912[/C][C]121.545521854784[/C][/ROW]
[ROW][C]Winsorized Mean ( 15 / 36 )[/C][C]530.111111111111[/C][C]4.30408560309102[/C][C]123.164630073901[/C][/ROW]
[ROW][C]Winsorized Mean ( 16 / 36 )[/C][C]529.962962962963[/C][C]4.24433175094762[/C][C]124.863699178237[/C][/ROW]
[ROW][C]Winsorized Mean ( 17 / 36 )[/C][C]529.962962962963[/C][C]4.20253360110119[/C][C]126.105586121690[/C][/ROW]
[ROW][C]Winsorized Mean ( 18 / 36 )[/C][C]529.796296296296[/C][C]4.180377426424[/C][C]126.734082178196[/C][/ROW]
[ROW][C]Winsorized Mean ( 19 / 36 )[/C][C]530.324074074074[/C][C]4.06606120272982[/C][C]130.426977763648[/C][/ROW]
[ROW][C]Winsorized Mean ( 20 / 36 )[/C][C]529.768518518518[/C][C]3.94579942096946[/C][C]134.261390911847[/C][/ROW]
[ROW][C]Winsorized Mean ( 21 / 36 )[/C][C]529.37962962963[/C][C]3.79802734301216[/C][C]139.382785277629[/C][/ROW]
[ROW][C]Winsorized Mean ( 22 / 36 )[/C][C]529.990740740741[/C][C]3.72179587235347[/C][C]142.401883101021[/C][/ROW]
[ROW][C]Winsorized Mean ( 23 / 36 )[/C][C]530.203703703704[/C][C]3.59082710970893[/C][C]147.655035317666[/C][/ROW]
[ROW][C]Winsorized Mean ( 24 / 36 )[/C][C]529.537037037037[/C][C]3.45530794304872[/C][C]153.253210933730[/C][/ROW]
[ROW][C]Winsorized Mean ( 25 / 36 )[/C][C]530[/C][C]3.34489169480608[/C][C]158.450571306383[/C][/ROW]
[ROW][C]Winsorized Mean ( 26 / 36 )[/C][C]530.481481481482[/C][C]3.28894330422524[/C][C]161.292376429835[/C][/ROW]
[ROW][C]Winsorized Mean ( 27 / 36 )[/C][C]530.981481481482[/C][C]3.23200027870849[/C][C]164.288810548514[/C][/ROW]
[ROW][C]Winsorized Mean ( 28 / 36 )[/C][C]529.944444444444[/C][C]3.10806389115381[/C][C]170.506290412104[/C][/ROW]
[ROW][C]Winsorized Mean ( 29 / 36 )[/C][C]530.212962962963[/C][C]3.07757245565176[/C][C]172.282852996446[/C][/ROW]
[ROW][C]Winsorized Mean ( 30 / 36 )[/C][C]529.657407407407[/C][C]3.01266973979319[/C][C]175.809980234928[/C][/ROW]
[ROW][C]Winsorized Mean ( 31 / 36 )[/C][C]531.092592592593[/C][C]2.78851105067249[/C][C]190.457410044874[/C][/ROW]
[ROW][C]Winsorized Mean ( 32 / 36 )[/C][C]531.388888888889[/C][C]2.69072845427223[/C][C]197.48885772742[/C][/ROW]
[ROW][C]Winsorized Mean ( 33 / 36 )[/C][C]531.388888888889[/C][C]2.69072845427223[/C][C]197.48885772742[/C][/ROW]
[ROW][C]Winsorized Mean ( 34 / 36 )[/C][C]531.074074074074[/C][C]2.51522548543729[/C][C]211.143723355580[/C][/ROW]
[ROW][C]Winsorized Mean ( 35 / 36 )[/C][C]532.046296296296[/C][C]2.34551722781664[/C][C]226.83538197311[/C][/ROW]
[ROW][C]Winsorized Mean ( 36 / 36 )[/C][C]532.37962962963[/C][C]2.31246107402122[/C][C]230.222093513495[/C][/ROW]
[ROW][C]Trimmed Mean ( 1 / 36 )[/C][C]530.27358490566[/C][C]4.95243381805033[/C][C]107.073330888936[/C][/ROW]
[ROW][C]Trimmed Mean ( 2 / 36 )[/C][C]530.240384615385[/C][C]4.8746707667748[/C][C]108.774604477792[/C][/ROW]
[ROW][C]Trimmed Mean ( 3 / 36 )[/C][C]530.196078431373[/C][C]4.79686445538302[/C][C]110.529718603241[/C][/ROW]
[ROW][C]Trimmed Mean ( 4 / 36 )[/C][C]530.17[/C][C]4.72500451605791[/C][C]112.205183761882[/C][/ROW]
[ROW][C]Trimmed Mean ( 5 / 36 )[/C][C]530.142857142857[/C][C]4.64787878427908[/C][C]114.061248528254[/C][/ROW]
[ROW][C]Trimmed Mean ( 6 / 36 )[/C][C]530.0625[/C][C]4.57075976687588[/C][C]115.968138129101[/C][/ROW]
[ROW][C]Trimmed Mean ( 7 / 36 )[/C][C]529.978723404255[/C][C]4.51262188593083[/C][C]117.443636271984[/C][/ROW]
[ROW][C]Trimmed Mean ( 8 / 36 )[/C][C]529.891304347826[/C][C]4.45043458749993[/C][C]119.065069698170[/C][/ROW]
[ROW][C]Trimmed Mean ( 9 / 36 )[/C][C]529.8[/C][C]4.38369467757704[/C][C]120.856957194116[/C][/ROW]
[ROW][C]Trimmed Mean ( 10 / 36 )[/C][C]529.670454545455[/C][C]4.3136475603058[/C][C]122.789459996566[/C][/ROW]
[ROW][C]Trimmed Mean ( 11 / 36 )[/C][C]529.697674418605[/C][C]4.26662900372034[/C][C]124.148988336396[/C][/ROW]
[ROW][C]Trimmed Mean ( 12 / 36 )[/C][C]529.738095238095[/C][C]4.21877748766444[/C][C]125.566730358980[/C][/ROW]
[ROW][C]Trimmed Mean ( 13 / 36 )[/C][C]529.768292682927[/C][C]4.1653674137108[/C][C]127.184048864245[/C][/ROW]
[ROW][C]Trimmed Mean ( 14 / 36 )[/C][C]529.7875[/C][C]4.11060275193033[/C][C]128.883166769451[/C][/ROW]
[ROW][C]Trimmed Mean ( 15 / 36 )[/C][C]529.769230769231[/C][C]4.05432322615652[/C][C]130.66773446957[/C][/ROW]
[ROW][C]Trimmed Mean ( 16 / 36 )[/C][C]529.736842105263[/C][C]3.99633026492234[/C][C]132.555821713488[/C][/ROW]
[ROW][C]Trimmed Mean ( 17 / 36 )[/C][C]529.716216216216[/C][C]3.93653466544606[/C][C]134.564092846923[/C][/ROW]
[ROW][C]Trimmed Mean ( 18 / 36 )[/C][C]529.694444444444[/C][C]3.87170218541591[/C][C]136.811774014985[/C][/ROW]
[ROW][C]Trimmed Mean ( 19 / 36 )[/C][C]529.685714285714[/C][C]3.79787141304685[/C][C]139.469101683138[/C][/ROW]
[ROW][C]Trimmed Mean ( 20 / 36 )[/C][C]529.632352941176[/C][C]3.72672198072011[/C][C]142.117484395452[/C][/ROW]
[ROW][C]Trimmed Mean ( 21 / 36 )[/C][C]529.621212121212[/C][C]3.65924859824209[/C][C]144.734963450049[/C][/ROW]
[ROW][C]Trimmed Mean ( 22 / 36 )[/C][C]529.640625[/C][C]3.59951820984503[/C][C]147.142087947043[/C][/ROW]
[ROW][C]Trimmed Mean ( 23 / 36 )[/C][C]529.612903225806[/C][C]3.53791541717057[/C][C]149.696315704845[/C][/ROW]
[ROW][C]Trimmed Mean ( 24 / 36 )[/C][C]529.566666666667[/C][C]3.48186315040048[/C][C]152.092900780939[/C][/ROW]
[ROW][C]Trimmed Mean ( 25 / 36 )[/C][C]529.568965517241[/C][C]3.43270911595379[/C][C]154.27143624143[/C][/ROW]
[ROW][C]Trimmed Mean ( 26 / 36 )[/C][C]529.535714285714[/C][C]3.3874255908552[/C][C]156.323939842477[/C][/ROW]
[ROW][C]Trimmed Mean ( 27 / 36 )[/C][C]529.462962962963[/C][C]3.33801693630516[/C][C]158.616020549322[/C][/ROW]
[ROW][C]Trimmed Mean ( 28 / 36 )[/C][C]529.346153846154[/C][C]3.28336046899666[/C][C]161.220846399455[/C][/ROW]
[ROW][C]Trimmed Mean ( 29 / 36 )[/C][C]529.3[/C][C]3.23390835759242[/C][C]163.671923094955[/C][/ROW]
[ROW][C]Trimmed Mean ( 30 / 36 )[/C][C]529.229166666667[/C][C]3.17406371733122[/C][C]166.735520707079[/C][/ROW]
[ROW][C]Trimmed Mean ( 31 / 36 )[/C][C]529.195652173913[/C][C]3.10751303474010[/C][C]170.295553472449[/C][/ROW]
[ROW][C]Trimmed Mean ( 32 / 36 )[/C][C]529.045454545455[/C][C]3.06051622472276[/C][C]172.861509529615[/C][/ROW]
[ROW][C]Trimmed Mean ( 33 / 36 )[/C][C]528.857142857143[/C][C]3.01382247873032[/C][C]175.477204310966[/C][/ROW]
[ROW][C]Trimmed Mean ( 34 / 36 )[/C][C]528.65[/C][C]2.94795670218352[/C][C]179.327599896035[/C][/ROW]
[ROW][C]Trimmed Mean ( 35 / 36 )[/C][C]528.447368421053[/C][C]2.89520557436098[/C][C]182.524989969906[/C][/ROW]
[ROW][C]Trimmed Mean ( 36 / 36 )[/C][C]528.138888888889[/C][C]2.85388979269586[/C][C]185.059314567994[/C][/ROW]
[ROW][C]Median[/C][C]523.5[/C][C][/C][C][/C][/ROW]
[ROW][C]Midrange[/C][C]530[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at Xnp[/C][C]530.298245614035[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Weighted Average at X(n+1)p[/C][C]531.017857142857[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function[/C][C]530.298245614035[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Averaging[/C][C]531.017857142857[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Empirical Distribution Function - Interpolation[/C][C]531.017857142857[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - Closest Observation[/C][C]530.298245614035[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - True Basic - Statistics Graphics Toolkit[/C][C]531.017857142857[/C][C][/C][C][/C][/ROW]
[ROW][C]Midmean - MS Excel (old versions)[/C][C]530.298245614035[/C][C][/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]108[/C][C][/C][C][/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=34215&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=34215&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 Mean530.2685185185185.03177178780895105.384055732269
Geometric Mean527.706947384403
Harmonic Mean525.144228198586
Quadratic Mean532.816859301163
Winsorized Mean ( 1 / 36 )530.3055555555565.02175017194515105.601739910957
Winsorized Mean ( 2 / 36 )530.3240740740745.00546307127795105.949053368738
Winsorized Mean ( 3 / 36 )530.2685185185184.96717516199165106.754543825247
Winsorized Mean ( 4 / 36 )530.2685185185184.95475560044476107.022134143391
Winsorized Mean ( 5 / 36 )530.54.91755320518116107.878853133925
Winsorized Mean ( 6 / 36 )530.54.79405387733043110.657913651861
Winsorized Mean ( 7 / 36 )530.54.77417514926217111.118671480242
Winsorized Mean ( 8 / 36 )530.54.75164615952593111.645518666509
Winsorized Mean ( 9 / 36 )530.754.71604797633115112.541263927704
Winsorized Mean ( 10 / 36 )529.4537037037044.52223046821205117.078001093791
Winsorized Mean ( 11 / 36 )529.3518518518524.47948894254296118.172376054877
Winsorized Mean ( 12 / 36 )529.4629629629634.46371909389175118.614758640949
Winsorized Mean ( 13 / 36 )529.5833333333334.41353069569023119.990857625725
Winsorized Mean ( 14 / 36 )529.9722222222224.36027764852912121.545521854784
Winsorized Mean ( 15 / 36 )530.1111111111114.30408560309102123.164630073901
Winsorized Mean ( 16 / 36 )529.9629629629634.24433175094762124.863699178237
Winsorized Mean ( 17 / 36 )529.9629629629634.20253360110119126.105586121690
Winsorized Mean ( 18 / 36 )529.7962962962964.180377426424126.734082178196
Winsorized Mean ( 19 / 36 )530.3240740740744.06606120272982130.426977763648
Winsorized Mean ( 20 / 36 )529.7685185185183.94579942096946134.261390911847
Winsorized Mean ( 21 / 36 )529.379629629633.79802734301216139.382785277629
Winsorized Mean ( 22 / 36 )529.9907407407413.72179587235347142.401883101021
Winsorized Mean ( 23 / 36 )530.2037037037043.59082710970893147.655035317666
Winsorized Mean ( 24 / 36 )529.5370370370373.45530794304872153.253210933730
Winsorized Mean ( 25 / 36 )5303.34489169480608158.450571306383
Winsorized Mean ( 26 / 36 )530.4814814814823.28894330422524161.292376429835
Winsorized Mean ( 27 / 36 )530.9814814814823.23200027870849164.288810548514
Winsorized Mean ( 28 / 36 )529.9444444444443.10806389115381170.506290412104
Winsorized Mean ( 29 / 36 )530.2129629629633.07757245565176172.282852996446
Winsorized Mean ( 30 / 36 )529.6574074074073.01266973979319175.809980234928
Winsorized Mean ( 31 / 36 )531.0925925925932.78851105067249190.457410044874
Winsorized Mean ( 32 / 36 )531.3888888888892.69072845427223197.48885772742
Winsorized Mean ( 33 / 36 )531.3888888888892.69072845427223197.48885772742
Winsorized Mean ( 34 / 36 )531.0740740740742.51522548543729211.143723355580
Winsorized Mean ( 35 / 36 )532.0462962962962.34551722781664226.83538197311
Winsorized Mean ( 36 / 36 )532.379629629632.31246107402122230.222093513495
Trimmed Mean ( 1 / 36 )530.273584905664.95243381805033107.073330888936
Trimmed Mean ( 2 / 36 )530.2403846153854.8746707667748108.774604477792
Trimmed Mean ( 3 / 36 )530.1960784313734.79686445538302110.529718603241
Trimmed Mean ( 4 / 36 )530.174.72500451605791112.205183761882
Trimmed Mean ( 5 / 36 )530.1428571428574.64787878427908114.061248528254
Trimmed Mean ( 6 / 36 )530.06254.57075976687588115.968138129101
Trimmed Mean ( 7 / 36 )529.9787234042554.51262188593083117.443636271984
Trimmed Mean ( 8 / 36 )529.8913043478264.45043458749993119.065069698170
Trimmed Mean ( 9 / 36 )529.84.38369467757704120.856957194116
Trimmed Mean ( 10 / 36 )529.6704545454554.3136475603058122.789459996566
Trimmed Mean ( 11 / 36 )529.6976744186054.26662900372034124.148988336396
Trimmed Mean ( 12 / 36 )529.7380952380954.21877748766444125.566730358980
Trimmed Mean ( 13 / 36 )529.7682926829274.1653674137108127.184048864245
Trimmed Mean ( 14 / 36 )529.78754.11060275193033128.883166769451
Trimmed Mean ( 15 / 36 )529.7692307692314.05432322615652130.66773446957
Trimmed Mean ( 16 / 36 )529.7368421052633.99633026492234132.555821713488
Trimmed Mean ( 17 / 36 )529.7162162162163.93653466544606134.564092846923
Trimmed Mean ( 18 / 36 )529.6944444444443.87170218541591136.811774014985
Trimmed Mean ( 19 / 36 )529.6857142857143.79787141304685139.469101683138
Trimmed Mean ( 20 / 36 )529.6323529411763.72672198072011142.117484395452
Trimmed Mean ( 21 / 36 )529.6212121212123.65924859824209144.734963450049
Trimmed Mean ( 22 / 36 )529.6406253.59951820984503147.142087947043
Trimmed Mean ( 23 / 36 )529.6129032258063.53791541717057149.696315704845
Trimmed Mean ( 24 / 36 )529.5666666666673.48186315040048152.092900780939
Trimmed Mean ( 25 / 36 )529.5689655172413.43270911595379154.27143624143
Trimmed Mean ( 26 / 36 )529.5357142857143.3874255908552156.323939842477
Trimmed Mean ( 27 / 36 )529.4629629629633.33801693630516158.616020549322
Trimmed Mean ( 28 / 36 )529.3461538461543.28336046899666161.220846399455
Trimmed Mean ( 29 / 36 )529.33.23390835759242163.671923094955
Trimmed Mean ( 30 / 36 )529.2291666666673.17406371733122166.735520707079
Trimmed Mean ( 31 / 36 )529.1956521739133.10751303474010170.295553472449
Trimmed Mean ( 32 / 36 )529.0454545454553.06051622472276172.861509529615
Trimmed Mean ( 33 / 36 )528.8571428571433.01382247873032175.477204310966
Trimmed Mean ( 34 / 36 )528.652.94795670218352179.327599896035
Trimmed Mean ( 35 / 36 )528.4473684210532.89520557436098182.524989969906
Trimmed Mean ( 36 / 36 )528.1388888888892.85388979269586185.059314567994
Median523.5
Midrange530
Midmean - Weighted Average at Xnp530.298245614035
Midmean - Weighted Average at X(n+1)p531.017857142857
Midmean - Empirical Distribution Function530.298245614035
Midmean - Empirical Distribution Function - Averaging531.017857142857
Midmean - Empirical Distribution Function - Interpolation531.017857142857
Midmean - Closest Observation530.298245614035
Midmean - True Basic - Statistics Graphics Toolkit531.017857142857
Midmean - MS Excel (old versions)530.298245614035
Number of observations108



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