Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_percentiles.wasp

Title produced by software

Percentiles

Date of computation

Tue, 20 Dec 2011 13:07:47 -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/2011/Dec/20/t1324404486pswh030hg1i58of.htm/, Retrieved Thu, 02 May 2024 02:34:07 +0000

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

143

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

-     [Univariate Data Series] [] [2009-11-05 08:15:26] [74be16979710d4c4e7c6647856088456]
-   PD  [Univariate Data Series] [] [2009-11-11 08:16:12] [74be16979710d4c4e7c6647856088456]
-   PD    [Univariate Data Series] [] [2009-12-19 10:32:23] [5d885a68c2332cc44f6191ec94766bfa]
- R PD      [Univariate Data Series] [paper20] [2011-12-20 16:22:23] [74be16979710d4c4e7c6647856088456]
- RMPD          [Percentiles] [paper22] [2011-12-20 18:07:47] [47995d3a8fac585eeb070a274b466f8c] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Herman Ole Andreas Wold' @ wold.wessa.net

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

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

Percentiles - Ungrouped Data
p	Weighted Average at Xnp	Weighted Average at X(n+1)p	Empirical Distribution Function	Empirical Distribution Function - Averaging	Empirical Distribution Function - Interpolation	Closest Observation	True Basic - Statistics Graphics Toolkit	MS Excel (old versions)
0.02	773	773	773	773	773	773	773	773
0.04	773	773	773	773	775.88	773	773	773
0.06	777.8	778.28	781	781	782.08	781	775.72	781
0.08	782.6	782.76	783	783	789.48	783	781.24	783
0.1	792	792.5	792	794.5	796.5	792	796.5	792
0.12	799	800.2	807	807	807.24	797	803.8	797
0.14	808.2	808.62	810	810	810.52	807	808.38	810
0.16	811.2	811.52	812	812	815.08	812	810.48	812
0.18	817.6	818.86	819	819	819.62	819	812.14	819
0.2	820	820.4	820	821	821.6	820	821.6	820
0.22	822.2	822.42	823	823	822.98	822	822.58	822
0.24	823	823	823	823	823.16	823	823	823
0.26	823.6	823.86	824	824	824.34	824	823.14	824
0.28	824.8	825.08	825	825	825.52	825	825.92	825
0.3	826	826.3	826	826.5	826.7	826	826.7	826
0.32	827.4	828.04	829	829	828.76	827	827.96	829
0.34	829.4	829.74	830	830	830	829	829.26	830
0.36	830	830	830	830	830.24	830	830	830
0.38	830.8	831.18	831	831	831.42	831	831.82	831
0.4	832	833.6	832	834	834.4	832	834.4	832
0.42	836.4	837.24	838	838	837.56	836	836.76	838
0.44	838.8	839.68	840	840	839.92	838	838.32	840
0.46	840.6	841	841	841	841	841	841	841
0.48	841	842.12	841	841	842.28	841	843.88	841
0.5	845	845.5	845	845.5	845.5	845	845.5	845.5
0.52	846.2	846.72	847	847	846.68	846	846.28	847
0.54	850.6	855.46	856	856	854.74	847	847.54	856
0.56	857.2	858.48	858	858	858.12	858	860.52	858
0.58	860.4	861.38	861	861	861.22	861	861.62	861
0.6	862	862	862	862	862	862	862	862
0.62	862	862	862	862	862	862	862	862
0.64	862.8	864.36	864	864	863.52	862	872.64	864
0.66	869.4	874.3	873	873	872.46	873	876.7	873
0.68	877	879.44	878	878	878.36	878	879.56	878
0.7	881	884.5	881	883.5	882.5	881	882.5	886
0.72	886.6	888.76	889	889	887.44	886	886.24	889
0.74	889.8	891.7	891	891	890.32	889	895.3	891
0.76	894	901.4	896	896	895.2	896	905.6	896
0.78	908	911	911	911	911	911	911	911
0.8	911	915	911	913.5	912	911	912	916
0.82	916.2	917.56	917	917	916.38	916	944.44	917
0.84	928.2	945	945	945	932.68	917	945	945
0.86	945	945.92	945	945	945	945	946.08	945
0.88	946.6	961.96	947	947	946.84	947	954.04	969
0.9	969	988.8	969	980	971.2	969	971.2	991
0.92	994.8	1013	1010	1010	996.32	991	1032	1010
0.94	1020	1038.06	1035	1035	1021.5	1010	1040.94	1035
0.96	1040.4	1080.96	1044	1044	1040.76	1044	1073.04	1110
0.98	1096.8	1180.2	1110	1110	1098.12	1110	1129.8	1200

\begin{tabular}{lllllllll}
\hline
Percentiles - Ungrouped Data \tabularnewline
p & Weighted Average at Xnp & Weighted Average at X(n+1)p & Empirical Distribution Function & Empirical Distribution Function - Averaging & Empirical Distribution Function - Interpolation & Closest Observation & True Basic - Statistics Graphics Toolkit & MS Excel (old versions) \tabularnewline
0.02 & 773 & 773 & 773 & 773 & 773 & 773 & 773 & 773 \tabularnewline
0.04 & 773 & 773 & 773 & 773 & 775.88 & 773 & 773 & 773 \tabularnewline
0.06 & 777.8 & 778.28 & 781 & 781 & 782.08 & 781 & 775.72 & 781 \tabularnewline
0.08 & 782.6 & 782.76 & 783 & 783 & 789.48 & 783 & 781.24 & 783 \tabularnewline
0.1 & 792 & 792.5 & 792 & 794.5 & 796.5 & 792 & 796.5 & 792 \tabularnewline
0.12 & 799 & 800.2 & 807 & 807 & 807.24 & 797 & 803.8 & 797 \tabularnewline
0.14 & 808.2 & 808.62 & 810 & 810 & 810.52 & 807 & 808.38 & 810 \tabularnewline
0.16 & 811.2 & 811.52 & 812 & 812 & 815.08 & 812 & 810.48 & 812 \tabularnewline
0.18 & 817.6 & 818.86 & 819 & 819 & 819.62 & 819 & 812.14 & 819 \tabularnewline
0.2 & 820 & 820.4 & 820 & 821 & 821.6 & 820 & 821.6 & 820 \tabularnewline
0.22 & 822.2 & 822.42 & 823 & 823 & 822.98 & 822 & 822.58 & 822 \tabularnewline
0.24 & 823 & 823 & 823 & 823 & 823.16 & 823 & 823 & 823 \tabularnewline
0.26 & 823.6 & 823.86 & 824 & 824 & 824.34 & 824 & 823.14 & 824 \tabularnewline
0.28 & 824.8 & 825.08 & 825 & 825 & 825.52 & 825 & 825.92 & 825 \tabularnewline
0.3 & 826 & 826.3 & 826 & 826.5 & 826.7 & 826 & 826.7 & 826 \tabularnewline
0.32 & 827.4 & 828.04 & 829 & 829 & 828.76 & 827 & 827.96 & 829 \tabularnewline
0.34 & 829.4 & 829.74 & 830 & 830 & 830 & 829 & 829.26 & 830 \tabularnewline
0.36 & 830 & 830 & 830 & 830 & 830.24 & 830 & 830 & 830 \tabularnewline
0.38 & 830.8 & 831.18 & 831 & 831 & 831.42 & 831 & 831.82 & 831 \tabularnewline
0.4 & 832 & 833.6 & 832 & 834 & 834.4 & 832 & 834.4 & 832 \tabularnewline
0.42 & 836.4 & 837.24 & 838 & 838 & 837.56 & 836 & 836.76 & 838 \tabularnewline
0.44 & 838.8 & 839.68 & 840 & 840 & 839.92 & 838 & 838.32 & 840 \tabularnewline
0.46 & 840.6 & 841 & 841 & 841 & 841 & 841 & 841 & 841 \tabularnewline
0.48 & 841 & 842.12 & 841 & 841 & 842.28 & 841 & 843.88 & 841 \tabularnewline
0.5 & 845 & 845.5 & 845 & 845.5 & 845.5 & 845 & 845.5 & 845.5 \tabularnewline
0.52 & 846.2 & 846.72 & 847 & 847 & 846.68 & 846 & 846.28 & 847 \tabularnewline
0.54 & 850.6 & 855.46 & 856 & 856 & 854.74 & 847 & 847.54 & 856 \tabularnewline
0.56 & 857.2 & 858.48 & 858 & 858 & 858.12 & 858 & 860.52 & 858 \tabularnewline
0.58 & 860.4 & 861.38 & 861 & 861 & 861.22 & 861 & 861.62 & 861 \tabularnewline
0.6 & 862 & 862 & 862 & 862 & 862 & 862 & 862 & 862 \tabularnewline
0.62 & 862 & 862 & 862 & 862 & 862 & 862 & 862 & 862 \tabularnewline
0.64 & 862.8 & 864.36 & 864 & 864 & 863.52 & 862 & 872.64 & 864 \tabularnewline
0.66 & 869.4 & 874.3 & 873 & 873 & 872.46 & 873 & 876.7 & 873 \tabularnewline
0.68 & 877 & 879.44 & 878 & 878 & 878.36 & 878 & 879.56 & 878 \tabularnewline
0.7 & 881 & 884.5 & 881 & 883.5 & 882.5 & 881 & 882.5 & 886 \tabularnewline
0.72 & 886.6 & 888.76 & 889 & 889 & 887.44 & 886 & 886.24 & 889 \tabularnewline
0.74 & 889.8 & 891.7 & 891 & 891 & 890.32 & 889 & 895.3 & 891 \tabularnewline
0.76 & 894 & 901.4 & 896 & 896 & 895.2 & 896 & 905.6 & 896 \tabularnewline
0.78 & 908 & 911 & 911 & 911 & 911 & 911 & 911 & 911 \tabularnewline
0.8 & 911 & 915 & 911 & 913.5 & 912 & 911 & 912 & 916 \tabularnewline
0.82 & 916.2 & 917.56 & 917 & 917 & 916.38 & 916 & 944.44 & 917 \tabularnewline
0.84 & 928.2 & 945 & 945 & 945 & 932.68 & 917 & 945 & 945 \tabularnewline
0.86 & 945 & 945.92 & 945 & 945 & 945 & 945 & 946.08 & 945 \tabularnewline
0.88 & 946.6 & 961.96 & 947 & 947 & 946.84 & 947 & 954.04 & 969 \tabularnewline
0.9 & 969 & 988.8 & 969 & 980 & 971.2 & 969 & 971.2 & 991 \tabularnewline
0.92 & 994.8 & 1013 & 1010 & 1010 & 996.32 & 991 & 1032 & 1010 \tabularnewline
0.94 & 1020 & 1038.06 & 1035 & 1035 & 1021.5 & 1010 & 1040.94 & 1035 \tabularnewline
0.96 & 1040.4 & 1080.96 & 1044 & 1044 & 1040.76 & 1044 & 1073.04 & 1110 \tabularnewline
0.98 & 1096.8 & 1180.2 & 1110 & 1110 & 1098.12 & 1110 & 1129.8 & 1200 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=158109&T=1

[TABLE]
[ROW][C]Percentiles - Ungrouped Data[/C][/ROW]
[ROW][C]p[/C][C]Weighted Average at Xnp[/C][C]Weighted Average at X(n+1)p[/C][C]Empirical Distribution Function[/C][C]Empirical Distribution Function - Averaging[/C][C]Empirical Distribution Function - Interpolation[/C][C]Closest Observation[/C][C]True Basic - Statistics Graphics Toolkit[/C][C]MS Excel (old versions)[/C][/ROW]
[ROW][C]0.02[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][/ROW]
[ROW][C]0.04[/C][C]773[/C][C]773[/C][C]773[/C][C]773[/C][C]775.88[/C][C]773[/C][C]773[/C][C]773[/C][/ROW]
[ROW][C]0.06[/C][C]777.8[/C][C]778.28[/C][C]781[/C][C]781[/C][C]782.08[/C][C]781[/C][C]775.72[/C][C]781[/C][/ROW]
[ROW][C]0.08[/C][C]782.6[/C][C]782.76[/C][C]783[/C][C]783[/C][C]789.48[/C][C]783[/C][C]781.24[/C][C]783[/C][/ROW]
[ROW][C]0.1[/C][C]792[/C][C]792.5[/C][C]792[/C][C]794.5[/C][C]796.5[/C][C]792[/C][C]796.5[/C][C]792[/C][/ROW]
[ROW][C]0.12[/C][C]799[/C][C]800.2[/C][C]807[/C][C]807[/C][C]807.24[/C][C]797[/C][C]803.8[/C][C]797[/C][/ROW]
[ROW][C]0.14[/C][C]808.2[/C][C]808.62[/C][C]810[/C][C]810[/C][C]810.52[/C][C]807[/C][C]808.38[/C][C]810[/C][/ROW]
[ROW][C]0.16[/C][C]811.2[/C][C]811.52[/C][C]812[/C][C]812[/C][C]815.08[/C][C]812[/C][C]810.48[/C][C]812[/C][/ROW]
[ROW][C]0.18[/C][C]817.6[/C][C]818.86[/C][C]819[/C][C]819[/C][C]819.62[/C][C]819[/C][C]812.14[/C][C]819[/C][/ROW]
[ROW][C]0.2[/C][C]820[/C][C]820.4[/C][C]820[/C][C]821[/C][C]821.6[/C][C]820[/C][C]821.6[/C][C]820[/C][/ROW]
[ROW][C]0.22[/C][C]822.2[/C][C]822.42[/C][C]823[/C][C]823[/C][C]822.98[/C][C]822[/C][C]822.58[/C][C]822[/C][/ROW]
[ROW][C]0.24[/C][C]823[/C][C]823[/C][C]823[/C][C]823[/C][C]823.16[/C][C]823[/C][C]823[/C][C]823[/C][/ROW]
[ROW][C]0.26[/C][C]823.6[/C][C]823.86[/C][C]824[/C][C]824[/C][C]824.34[/C][C]824[/C][C]823.14[/C][C]824[/C][/ROW]
[ROW][C]0.28[/C][C]824.8[/C][C]825.08[/C][C]825[/C][C]825[/C][C]825.52[/C][C]825[/C][C]825.92[/C][C]825[/C][/ROW]
[ROW][C]0.3[/C][C]826[/C][C]826.3[/C][C]826[/C][C]826.5[/C][C]826.7[/C][C]826[/C][C]826.7[/C][C]826[/C][/ROW]
[ROW][C]0.32[/C][C]827.4[/C][C]828.04[/C][C]829[/C][C]829[/C][C]828.76[/C][C]827[/C][C]827.96[/C][C]829[/C][/ROW]
[ROW][C]0.34[/C][C]829.4[/C][C]829.74[/C][C]830[/C][C]830[/C][C]830[/C][C]829[/C][C]829.26[/C][C]830[/C][/ROW]
[ROW][C]0.36[/C][C]830[/C][C]830[/C][C]830[/C][C]830[/C][C]830.24[/C][C]830[/C][C]830[/C][C]830[/C][/ROW]
[ROW][C]0.38[/C][C]830.8[/C][C]831.18[/C][C]831[/C][C]831[/C][C]831.42[/C][C]831[/C][C]831.82[/C][C]831[/C][/ROW]
[ROW][C]0.4[/C][C]832[/C][C]833.6[/C][C]832[/C][C]834[/C][C]834.4[/C][C]832[/C][C]834.4[/C][C]832[/C][/ROW]
[ROW][C]0.42[/C][C]836.4[/C][C]837.24[/C][C]838[/C][C]838[/C][C]837.56[/C][C]836[/C][C]836.76[/C][C]838[/C][/ROW]
[ROW][C]0.44[/C][C]838.8[/C][C]839.68[/C][C]840[/C][C]840[/C][C]839.92[/C][C]838[/C][C]838.32[/C][C]840[/C][/ROW]
[ROW][C]0.46[/C][C]840.6[/C][C]841[/C][C]841[/C][C]841[/C][C]841[/C][C]841[/C][C]841[/C][C]841[/C][/ROW]
[ROW][C]0.48[/C][C]841[/C][C]842.12[/C][C]841[/C][C]841[/C][C]842.28[/C][C]841[/C][C]843.88[/C][C]841[/C][/ROW]
[ROW][C]0.5[/C][C]845[/C][C]845.5[/C][C]845[/C][C]845.5[/C][C]845.5[/C][C]845[/C][C]845.5[/C][C]845.5[/C][/ROW]
[ROW][C]0.52[/C][C]846.2[/C][C]846.72[/C][C]847[/C][C]847[/C][C]846.68[/C][C]846[/C][C]846.28[/C][C]847[/C][/ROW]
[ROW][C]0.54[/C][C]850.6[/C][C]855.46[/C][C]856[/C][C]856[/C][C]854.74[/C][C]847[/C][C]847.54[/C][C]856[/C][/ROW]
[ROW][C]0.56[/C][C]857.2[/C][C]858.48[/C][C]858[/C][C]858[/C][C]858.12[/C][C]858[/C][C]860.52[/C][C]858[/C][/ROW]
[ROW][C]0.58[/C][C]860.4[/C][C]861.38[/C][C]861[/C][C]861[/C][C]861.22[/C][C]861[/C][C]861.62[/C][C]861[/C][/ROW]
[ROW][C]0.6[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][/ROW]
[ROW][C]0.62[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][C]862[/C][/ROW]
[ROW][C]0.64[/C][C]862.8[/C][C]864.36[/C][C]864[/C][C]864[/C][C]863.52[/C][C]862[/C][C]872.64[/C][C]864[/C][/ROW]
[ROW][C]0.66[/C][C]869.4[/C][C]874.3[/C][C]873[/C][C]873[/C][C]872.46[/C][C]873[/C][C]876.7[/C][C]873[/C][/ROW]
[ROW][C]0.68[/C][C]877[/C][C]879.44[/C][C]878[/C][C]878[/C][C]878.36[/C][C]878[/C][C]879.56[/C][C]878[/C][/ROW]
[ROW][C]0.7[/C][C]881[/C][C]884.5[/C][C]881[/C][C]883.5[/C][C]882.5[/C][C]881[/C][C]882.5[/C][C]886[/C][/ROW]
[ROW][C]0.72[/C][C]886.6[/C][C]888.76[/C][C]889[/C][C]889[/C][C]887.44[/C][C]886[/C][C]886.24[/C][C]889[/C][/ROW]
[ROW][C]0.74[/C][C]889.8[/C][C]891.7[/C][C]891[/C][C]891[/C][C]890.32[/C][C]889[/C][C]895.3[/C][C]891[/C][/ROW]
[ROW][C]0.76[/C][C]894[/C][C]901.4[/C][C]896[/C][C]896[/C][C]895.2[/C][C]896[/C][C]905.6[/C][C]896[/C][/ROW]
[ROW][C]0.78[/C][C]908[/C][C]911[/C][C]911[/C][C]911[/C][C]911[/C][C]911[/C][C]911[/C][C]911[/C][/ROW]
[ROW][C]0.8[/C][C]911[/C][C]915[/C][C]911[/C][C]913.5[/C][C]912[/C][C]911[/C][C]912[/C][C]916[/C][/ROW]
[ROW][C]0.82[/C][C]916.2[/C][C]917.56[/C][C]917[/C][C]917[/C][C]916.38[/C][C]916[/C][C]944.44[/C][C]917[/C][/ROW]
[ROW][C]0.84[/C][C]928.2[/C][C]945[/C][C]945[/C][C]945[/C][C]932.68[/C][C]917[/C][C]945[/C][C]945[/C][/ROW]
[ROW][C]0.86[/C][C]945[/C][C]945.92[/C][C]945[/C][C]945[/C][C]945[/C][C]945[/C][C]946.08[/C][C]945[/C][/ROW]
[ROW][C]0.88[/C][C]946.6[/C][C]961.96[/C][C]947[/C][C]947[/C][C]946.84[/C][C]947[/C][C]954.04[/C][C]969[/C][/ROW]
[ROW][C]0.9[/C][C]969[/C][C]988.8[/C][C]969[/C][C]980[/C][C]971.2[/C][C]969[/C][C]971.2[/C][C]991[/C][/ROW]
[ROW][C]0.92[/C][C]994.8[/C][C]1013[/C][C]1010[/C][C]1010[/C][C]996.32[/C][C]991[/C][C]1032[/C][C]1010[/C][/ROW]
[ROW][C]0.94[/C][C]1020[/C][C]1038.06[/C][C]1035[/C][C]1035[/C][C]1021.5[/C][C]1010[/C][C]1040.94[/C][C]1035[/C][/ROW]
[ROW][C]0.96[/C][C]1040.4[/C][C]1080.96[/C][C]1044[/C][C]1044[/C][C]1040.76[/C][C]1044[/C][C]1073.04[/C][C]1110[/C][/ROW]
[ROW][C]0.98[/C][C]1096.8[/C][C]1180.2[/C][C]1110[/C][C]1110[/C][C]1098.12[/C][C]1110[/C][C]1129.8[/C][C]1200[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=158109&T=1

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

As an alternative you can also use a QR Code:

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

Percentiles - Ungrouped Data
p	Weighted Average at Xnp	Weighted Average at X(n+1)p	Empirical Distribution Function	Empirical Distribution Function - Averaging	Empirical Distribution Function - Interpolation	Closest Observation	True Basic - Statistics Graphics Toolkit	MS Excel (old versions)
0.02	773	773	773	773	773	773	773	773
0.04	773	773	773	773	775.88	773	773	773
0.06	777.8	778.28	781	781	782.08	781	775.72	781
0.08	782.6	782.76	783	783	789.48	783	781.24	783
0.1	792	792.5	792	794.5	796.5	792	796.5	792
0.12	799	800.2	807	807	807.24	797	803.8	797
0.14	808.2	808.62	810	810	810.52	807	808.38	810
0.16	811.2	811.52	812	812	815.08	812	810.48	812
0.18	817.6	818.86	819	819	819.62	819	812.14	819
0.2	820	820.4	820	821	821.6	820	821.6	820
0.22	822.2	822.42	823	823	822.98	822	822.58	822
0.24	823	823	823	823	823.16	823	823	823
0.26	823.6	823.86	824	824	824.34	824	823.14	824
0.28	824.8	825.08	825	825	825.52	825	825.92	825
0.3	826	826.3	826	826.5	826.7	826	826.7	826
0.32	827.4	828.04	829	829	828.76	827	827.96	829
0.34	829.4	829.74	830	830	830	829	829.26	830
0.36	830	830	830	830	830.24	830	830	830
0.38	830.8	831.18	831	831	831.42	831	831.82	831
0.4	832	833.6	832	834	834.4	832	834.4	832
0.42	836.4	837.24	838	838	837.56	836	836.76	838
0.44	838.8	839.68	840	840	839.92	838	838.32	840
0.46	840.6	841	841	841	841	841	841	841
0.48	841	842.12	841	841	842.28	841	843.88	841
0.5	845	845.5	845	845.5	845.5	845	845.5	845.5
0.52	846.2	846.72	847	847	846.68	846	846.28	847
0.54	850.6	855.46	856	856	854.74	847	847.54	856
0.56	857.2	858.48	858	858	858.12	858	860.52	858
0.58	860.4	861.38	861	861	861.22	861	861.62	861
0.6	862	862	862	862	862	862	862	862
0.62	862	862	862	862	862	862	862	862
0.64	862.8	864.36	864	864	863.52	862	872.64	864
0.66	869.4	874.3	873	873	872.46	873	876.7	873
0.68	877	879.44	878	878	878.36	878	879.56	878
0.7	881	884.5	881	883.5	882.5	881	882.5	886
0.72	886.6	888.76	889	889	887.44	886	886.24	889
0.74	889.8	891.7	891	891	890.32	889	895.3	891
0.76	894	901.4	896	896	895.2	896	905.6	896
0.78	908	911	911	911	911	911	911	911
0.8	911	915	911	913.5	912	911	912	916
0.82	916.2	917.56	917	917	916.38	916	944.44	917
0.84	928.2	945	945	945	932.68	917	945	945
0.86	945	945.92	945	945	945	945	946.08	945
0.88	946.6	961.96	947	947	946.84	947	954.04	969
0.9	969	988.8	969	980	971.2	969	971.2	991
0.92	994.8	1013	1010	1010	996.32	991	1032	1010
0.94	1020	1038.06	1035	1035	1021.5	1010	1040.94	1035
0.96	1040.4	1080.96	1044	1044	1040.76	1044	1073.04	1110
0.98	1096.8	1180.2	1110	1110	1098.12	1110	1129.8	1200

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

Parameters (R input):

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

x <-sort(x[!is.na(x)])
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]
}
}
}
}
lx <- length(x)
qval <- array(NA,dim=c(99,8))
mystep <- 25
mystart <- 25
if (lx>10){
mystep=10
mystart=10
}
if (lx>20){
mystep=5
mystart=5
}
if (lx>50){
mystep=2
mystart=2
}
if (lx>=100){
mystep=1
mystart=1
}
for (perc in seq(mystart,99,mystep)) {
qval[perc,1] <- q1(x,lx,perc/100,i,f)
qval[perc,2] <- q2(x,lx,perc/100,i,f)
qval[perc,3] <- q3(x,lx,perc/100,i,f)
qval[perc,4] <- q4(x,lx,perc/100,i,f)
qval[perc,5] <- q5(x,lx,perc/100,i,f)
qval[perc,6] <- q6(x,lx,perc/100,i,f)
qval[perc,7] <- q7(x,lx,perc/100,i,f)
qval[perc,8] <- q8(x,lx,perc/100,i,f)
}
bitmap(file='test1.png')
myqqnorm <- qqnorm(x,col=2)
qqline(x)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Percentiles - Ungrouped Data',9,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'p',1,TRUE)
a<-table.element(a,hyperlink('method_1.htm', 'Weighted Average at Xnp',''),1,TRUE)
a<-table.element(a,hyperlink('method_2.htm','Weighted Average at X(n+1)p',''),1,TRUE)
a<-table.element(a,hyperlink('method_3.htm','Empirical Distribution Function',''),1,TRUE)
a<-table.element(a,hyperlink('method_4.htm','Empirical Distribution Function - Averaging',''),1,TRUE)
a<-table.element(a,hyperlink('method_5.htm','Empirical Distribution Function - Interpolation',''),1,TRUE)
a<-table.element(a,hyperlink('method_6.htm','Closest Observation',''),1,TRUE)
a<-table.element(a,hyperlink('method_7.htm','True Basic - Statistics Graphics Toolkit',''),1,TRUE)
a<-table.element(a,hyperlink('method_8.htm','MS Excel (old versions)',''),1,TRUE)
a<-table.row.end(a)
for (perc in seq(mystart,99,mystep)) {
a<-table.row.start(a)
a<-table.element(a,round(perc/100,2),1,TRUE)
for (j in 1:8) {
a<-table.element(a,round(qval[perc,j],6))
}
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