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

Mon, 20 Oct 2008 12:32:19 -0600

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/2008/Oct/20/t1224527586p6ghcps5xrn6gb1.htm/, Retrieved Sat, 08 Nov 2025 16:15:44 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=17866, Retrieved Sat, 08 Nov 2025 16:15:44 +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

353

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

-     [Univariate Data Series] [Werkloosheid VLAA...] [2008-10-19 10:39:43] [46c5a5fbda57fdfa1d4ef48658f82a0c]
- RMP   [Histogram] [Histogram - Werkl...] [2008-10-19 11:26:30] [46c5a5fbda57fdfa1d4ef48658f82a0c]
- RM      [Percentiles] [Percentiles - Vla...] [2008-10-19 11:49:12] [46c5a5fbda57fdfa1d4ef48658f82a0c]
-   PD        [Percentiles] [Economische situa...] [2008-10-20 18:32:19] [dbfa7caa6871c163dec68ca05d48bb00] [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	'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=17866&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=17866&T=0

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

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	5.38	5.44	7	7	10.08	4	5.56	4
0.04	13.44	13.72	14	14	14.88	14	7.28	14
0.06	16.52	16.76	19	19	19.32	15	17.24	15
0.08	19.84	19.92	20	20	22.28	20	19.08	20
0.1	23.3	23.4	24	24	24	23	23.6	23
0.12	24	24	24	24	24.64	24	24	24
0.14	25.44	25.72	27	27	27	25	26.28	25
0.16	27	27	27	27	27	27	27	27
0.18	27	27	27	27	27	27	27	27
0.2	27.6	27.8	28	28	28.8	28	27.2	28
0.22	30.06	30.28	31	31	30.84	30	30.72	30
0.24	31.52	31.76	32	32	32	32	31.24	32
0.26	32	32	32	32	32	32	32	32
0.28	32	32	32	32	32	32	32	32
0.3	32	32	32	32	32	32	32	32
0.32	33.8	35.4	37	37	37	32	33.6	37
0.34	37	37.16	37	37	37.48	37	37.84	37
0.36	38	38	38	38	38	38	38	38
0.38	38	38.12	38	38	38.36	38	38.88	38
0.4	39	39	39	39	39	39	39	39
0.42	39.66	40	40	40	40	40	40	40
0.44	40.24	41.12	42	42	41.36	40	40.88	42
0.46	42	42.04	42	42	42.12	42	42.96	42
0.48	43.04	43.52	44	44	43.56	43	43.48	44
0.5	44	44	44	44	44	44	44	44
0.52	44.96	45	45	45	45	45	45	45
0.54	45.42	45.96	46	46	45.88	45	45.04	46
0.56	46.88	47	47	47	47	47	47	47
0.58	47.34	47.92	48	48	47.76	47	47.08	48
0.6	48.8	49	49	49	49	49	49	49
0.62	49	49	49	49	49	49	49	49
0.64	49	49.36	49	49	49.08	49	49.64	49
0.66	50.18	50.84	51	51	50.52	50	50.16	51
0.68	51	51	51	51	51	51	51	51
0.7	51.1	51.8	52	52	51.4	51	51.2	52
0.72	52.56	53	53	53	52.84	53	53	53
0.74	53.02	53.76	54	54	53.28	53	53.24	54
0.76	54	54	54	54	54	54	54	54
0.78	54	54	54	54	54	54	54	54
0.8	54.4	55.2	55	55	54.6	54	55.8	55
0.82	55.86	57.36	56	56	56.08	56	56.64	58
0.84	58.64	60	60	60	58.96	58	60	60
0.86	60	60	60	60	60	60	60	60
0.88	60.48	62	62	62	60.72	60	62	62
0.9	62	62.6	62	62	62	62	62.4	63
0.92	63	63.08	63	63	63	63	63.92	63
0.94	63.62	64	64	64	63.68	64	64	64
0.96	64.16	66	66	66	64.24	64	66	66
0.98	66	69.12	66	66	66	66	68.88	72

\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 & 5.38 & 5.44 & 7 & 7 & 10.08 & 4 & 5.56 & 4 \tabularnewline
0.04 & 13.44 & 13.72 & 14 & 14 & 14.88 & 14 & 7.28 & 14 \tabularnewline
0.06 & 16.52 & 16.76 & 19 & 19 & 19.32 & 15 & 17.24 & 15 \tabularnewline
0.08 & 19.84 & 19.92 & 20 & 20 & 22.28 & 20 & 19.08 & 20 \tabularnewline
0.1 & 23.3 & 23.4 & 24 & 24 & 24 & 23 & 23.6 & 23 \tabularnewline
0.12 & 24 & 24 & 24 & 24 & 24.64 & 24 & 24 & 24 \tabularnewline
0.14 & 25.44 & 25.72 & 27 & 27 & 27 & 25 & 26.28 & 25 \tabularnewline
0.16 & 27 & 27 & 27 & 27 & 27 & 27 & 27 & 27 \tabularnewline
0.18 & 27 & 27 & 27 & 27 & 27 & 27 & 27 & 27 \tabularnewline
0.2 & 27.6 & 27.8 & 28 & 28 & 28.8 & 28 & 27.2 & 28 \tabularnewline
0.22 & 30.06 & 30.28 & 31 & 31 & 30.84 & 30 & 30.72 & 30 \tabularnewline
0.24 & 31.52 & 31.76 & 32 & 32 & 32 & 32 & 31.24 & 32 \tabularnewline
0.26 & 32 & 32 & 32 & 32 & 32 & 32 & 32 & 32 \tabularnewline
0.28 & 32 & 32 & 32 & 32 & 32 & 32 & 32 & 32 \tabularnewline
0.3 & 32 & 32 & 32 & 32 & 32 & 32 & 32 & 32 \tabularnewline
0.32 & 33.8 & 35.4 & 37 & 37 & 37 & 32 & 33.6 & 37 \tabularnewline
0.34 & 37 & 37.16 & 37 & 37 & 37.48 & 37 & 37.84 & 37 \tabularnewline
0.36 & 38 & 38 & 38 & 38 & 38 & 38 & 38 & 38 \tabularnewline
0.38 & 38 & 38.12 & 38 & 38 & 38.36 & 38 & 38.88 & 38 \tabularnewline
0.4 & 39 & 39 & 39 & 39 & 39 & 39 & 39 & 39 \tabularnewline
0.42 & 39.66 & 40 & 40 & 40 & 40 & 40 & 40 & 40 \tabularnewline
0.44 & 40.24 & 41.12 & 42 & 42 & 41.36 & 40 & 40.88 & 42 \tabularnewline
0.46 & 42 & 42.04 & 42 & 42 & 42.12 & 42 & 42.96 & 42 \tabularnewline
0.48 & 43.04 & 43.52 & 44 & 44 & 43.56 & 43 & 43.48 & 44 \tabularnewline
0.5 & 44 & 44 & 44 & 44 & 44 & 44 & 44 & 44 \tabularnewline
0.52 & 44.96 & 45 & 45 & 45 & 45 & 45 & 45 & 45 \tabularnewline
0.54 & 45.42 & 45.96 & 46 & 46 & 45.88 & 45 & 45.04 & 46 \tabularnewline
0.56 & 46.88 & 47 & 47 & 47 & 47 & 47 & 47 & 47 \tabularnewline
0.58 & 47.34 & 47.92 & 48 & 48 & 47.76 & 47 & 47.08 & 48 \tabularnewline
0.6 & 48.8 & 49 & 49 & 49 & 49 & 49 & 49 & 49 \tabularnewline
0.62 & 49 & 49 & 49 & 49 & 49 & 49 & 49 & 49 \tabularnewline
0.64 & 49 & 49.36 & 49 & 49 & 49.08 & 49 & 49.64 & 49 \tabularnewline
0.66 & 50.18 & 50.84 & 51 & 51 & 50.52 & 50 & 50.16 & 51 \tabularnewline
0.68 & 51 & 51 & 51 & 51 & 51 & 51 & 51 & 51 \tabularnewline
0.7 & 51.1 & 51.8 & 52 & 52 & 51.4 & 51 & 51.2 & 52 \tabularnewline
0.72 & 52.56 & 53 & 53 & 53 & 52.84 & 53 & 53 & 53 \tabularnewline
0.74 & 53.02 & 53.76 & 54 & 54 & 53.28 & 53 & 53.24 & 54 \tabularnewline
0.76 & 54 & 54 & 54 & 54 & 54 & 54 & 54 & 54 \tabularnewline
0.78 & 54 & 54 & 54 & 54 & 54 & 54 & 54 & 54 \tabularnewline
0.8 & 54.4 & 55.2 & 55 & 55 & 54.6 & 54 & 55.8 & 55 \tabularnewline
0.82 & 55.86 & 57.36 & 56 & 56 & 56.08 & 56 & 56.64 & 58 \tabularnewline
0.84 & 58.64 & 60 & 60 & 60 & 58.96 & 58 & 60 & 60 \tabularnewline
0.86 & 60 & 60 & 60 & 60 & 60 & 60 & 60 & 60 \tabularnewline
0.88 & 60.48 & 62 & 62 & 62 & 60.72 & 60 & 62 & 62 \tabularnewline
0.9 & 62 & 62.6 & 62 & 62 & 62 & 62 & 62.4 & 63 \tabularnewline
0.92 & 63 & 63.08 & 63 & 63 & 63 & 63 & 63.92 & 63 \tabularnewline
0.94 & 63.62 & 64 & 64 & 64 & 63.68 & 64 & 64 & 64 \tabularnewline
0.96 & 64.16 & 66 & 66 & 66 & 64.24 & 64 & 66 & 66 \tabularnewline
0.98 & 66 & 69.12 & 66 & 66 & 66 & 66 & 68.88 & 72 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=17866&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]5.38[/C][C]5.44[/C][C]7[/C][C]7[/C][C]10.08[/C][C]4[/C][C]5.56[/C][C]4[/C][/ROW]
[ROW][C]0.04[/C][C]13.44[/C][C]13.72[/C][C]14[/C][C]14[/C][C]14.88[/C][C]14[/C][C]7.28[/C][C]14[/C][/ROW]
[ROW][C]0.06[/C][C]16.52[/C][C]16.76[/C][C]19[/C][C]19[/C][C]19.32[/C][C]15[/C][C]17.24[/C][C]15[/C][/ROW]
[ROW][C]0.08[/C][C]19.84[/C][C]19.92[/C][C]20[/C][C]20[/C][C]22.28[/C][C]20[/C][C]19.08[/C][C]20[/C][/ROW]
[ROW][C]0.1[/C][C]23.3[/C][C]23.4[/C][C]24[/C][C]24[/C][C]24[/C][C]23[/C][C]23.6[/C][C]23[/C][/ROW]
[ROW][C]0.12[/C][C]24[/C][C]24[/C][C]24[/C][C]24[/C][C]24.64[/C][C]24[/C][C]24[/C][C]24[/C][/ROW]
[ROW][C]0.14[/C][C]25.44[/C][C]25.72[/C][C]27[/C][C]27[/C][C]27[/C][C]25[/C][C]26.28[/C][C]25[/C][/ROW]
[ROW][C]0.16[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][/ROW]
[ROW][C]0.18[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][C]27[/C][/ROW]
[ROW][C]0.2[/C][C]27.6[/C][C]27.8[/C][C]28[/C][C]28[/C][C]28.8[/C][C]28[/C][C]27.2[/C][C]28[/C][/ROW]
[ROW][C]0.22[/C][C]30.06[/C][C]30.28[/C][C]31[/C][C]31[/C][C]30.84[/C][C]30[/C][C]30.72[/C][C]30[/C][/ROW]
[ROW][C]0.24[/C][C]31.52[/C][C]31.76[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]31.24[/C][C]32[/C][/ROW]
[ROW][C]0.26[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][/ROW]
[ROW][C]0.28[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][/ROW]
[ROW][C]0.3[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][C]32[/C][/ROW]
[ROW][C]0.32[/C][C]33.8[/C][C]35.4[/C][C]37[/C][C]37[/C][C]37[/C][C]32[/C][C]33.6[/C][C]37[/C][/ROW]
[ROW][C]0.34[/C][C]37[/C][C]37.16[/C][C]37[/C][C]37[/C][C]37.48[/C][C]37[/C][C]37.84[/C][C]37[/C][/ROW]
[ROW][C]0.36[/C][C]38[/C][C]38[/C][C]38[/C][C]38[/C][C]38[/C][C]38[/C][C]38[/C][C]38[/C][/ROW]
[ROW][C]0.38[/C][C]38[/C][C]38.12[/C][C]38[/C][C]38[/C][C]38.36[/C][C]38[/C][C]38.88[/C][C]38[/C][/ROW]
[ROW][C]0.4[/C][C]39[/C][C]39[/C][C]39[/C][C]39[/C][C]39[/C][C]39[/C][C]39[/C][C]39[/C][/ROW]
[ROW][C]0.42[/C][C]39.66[/C][C]40[/C][C]40[/C][C]40[/C][C]40[/C][C]40[/C][C]40[/C][C]40[/C][/ROW]
[ROW][C]0.44[/C][C]40.24[/C][C]41.12[/C][C]42[/C][C]42[/C][C]41.36[/C][C]40[/C][C]40.88[/C][C]42[/C][/ROW]
[ROW][C]0.46[/C][C]42[/C][C]42.04[/C][C]42[/C][C]42[/C][C]42.12[/C][C]42[/C][C]42.96[/C][C]42[/C][/ROW]
[ROW][C]0.48[/C][C]43.04[/C][C]43.52[/C][C]44[/C][C]44[/C][C]43.56[/C][C]43[/C][C]43.48[/C][C]44[/C][/ROW]
[ROW][C]0.5[/C][C]44[/C][C]44[/C][C]44[/C][C]44[/C][C]44[/C][C]44[/C][C]44[/C][C]44[/C][/ROW]
[ROW][C]0.52[/C][C]44.96[/C][C]45[/C][C]45[/C][C]45[/C][C]45[/C][C]45[/C][C]45[/C][C]45[/C][/ROW]
[ROW][C]0.54[/C][C]45.42[/C][C]45.96[/C][C]46[/C][C]46[/C][C]45.88[/C][C]45[/C][C]45.04[/C][C]46[/C][/ROW]
[ROW][C]0.56[/C][C]46.88[/C][C]47[/C][C]47[/C][C]47[/C][C]47[/C][C]47[/C][C]47[/C][C]47[/C][/ROW]
[ROW][C]0.58[/C][C]47.34[/C][C]47.92[/C][C]48[/C][C]48[/C][C]47.76[/C][C]47[/C][C]47.08[/C][C]48[/C][/ROW]
[ROW][C]0.6[/C][C]48.8[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][/ROW]
[ROW][C]0.62[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][C]49[/C][/ROW]
[ROW][C]0.64[/C][C]49[/C][C]49.36[/C][C]49[/C][C]49[/C][C]49.08[/C][C]49[/C][C]49.64[/C][C]49[/C][/ROW]
[ROW][C]0.66[/C][C]50.18[/C][C]50.84[/C][C]51[/C][C]51[/C][C]50.52[/C][C]50[/C][C]50.16[/C][C]51[/C][/ROW]
[ROW][C]0.68[/C][C]51[/C][C]51[/C][C]51[/C][C]51[/C][C]51[/C][C]51[/C][C]51[/C][C]51[/C][/ROW]
[ROW][C]0.7[/C][C]51.1[/C][C]51.8[/C][C]52[/C][C]52[/C][C]51.4[/C][C]51[/C][C]51.2[/C][C]52[/C][/ROW]
[ROW][C]0.72[/C][C]52.56[/C][C]53[/C][C]53[/C][C]53[/C][C]52.84[/C][C]53[/C][C]53[/C][C]53[/C][/ROW]
[ROW][C]0.74[/C][C]53.02[/C][C]53.76[/C][C]54[/C][C]54[/C][C]53.28[/C][C]53[/C][C]53.24[/C][C]54[/C][/ROW]
[ROW][C]0.76[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][/ROW]
[ROW][C]0.78[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][C]54[/C][/ROW]
[ROW][C]0.8[/C][C]54.4[/C][C]55.2[/C][C]55[/C][C]55[/C][C]54.6[/C][C]54[/C][C]55.8[/C][C]55[/C][/ROW]
[ROW][C]0.82[/C][C]55.86[/C][C]57.36[/C][C]56[/C][C]56[/C][C]56.08[/C][C]56[/C][C]56.64[/C][C]58[/C][/ROW]
[ROW][C]0.84[/C][C]58.64[/C][C]60[/C][C]60[/C][C]60[/C][C]58.96[/C][C]58[/C][C]60[/C][C]60[/C][/ROW]
[ROW][C]0.86[/C][C]60[/C][C]60[/C][C]60[/C][C]60[/C][C]60[/C][C]60[/C][C]60[/C][C]60[/C][/ROW]
[ROW][C]0.88[/C][C]60.48[/C][C]62[/C][C]62[/C][C]62[/C][C]60.72[/C][C]60[/C][C]62[/C][C]62[/C][/ROW]
[ROW][C]0.9[/C][C]62[/C][C]62.6[/C][C]62[/C][C]62[/C][C]62[/C][C]62[/C][C]62.4[/C][C]63[/C][/ROW]
[ROW][C]0.92[/C][C]63[/C][C]63.08[/C][C]63[/C][C]63[/C][C]63[/C][C]63[/C][C]63.92[/C][C]63[/C][/ROW]
[ROW][C]0.94[/C][C]63.62[/C][C]64[/C][C]64[/C][C]64[/C][C]63.68[/C][C]64[/C][C]64[/C][C]64[/C][/ROW]
[ROW][C]0.96[/C][C]64.16[/C][C]66[/C][C]66[/C][C]66[/C][C]64.24[/C][C]64[/C][C]66[/C][C]66[/C][/ROW]
[ROW][C]0.98[/C][C]66[/C][C]69.12[/C][C]66[/C][C]66[/C][C]66[/C][C]66[/C][C]68.88[/C][C]72[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=17866&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=17866&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	5.38	5.44	7	7	10.08	4	5.56	4
0.04	13.44	13.72	14	14	14.88	14	7.28	14
0.06	16.52	16.76	19	19	19.32	15	17.24	15
0.08	19.84	19.92	20	20	22.28	20	19.08	20
0.1	23.3	23.4	24	24	24	23	23.6	23
0.12	24	24	24	24	24.64	24	24	24
0.14	25.44	25.72	27	27	27	25	26.28	25
0.16	27	27	27	27	27	27	27	27
0.18	27	27	27	27	27	27	27	27
0.2	27.6	27.8	28	28	28.8	28	27.2	28
0.22	30.06	30.28	31	31	30.84	30	30.72	30
0.24	31.52	31.76	32	32	32	32	31.24	32
0.26	32	32	32	32	32	32	32	32
0.28	32	32	32	32	32	32	32	32
0.3	32	32	32	32	32	32	32	32
0.32	33.8	35.4	37	37	37	32	33.6	37
0.34	37	37.16	37	37	37.48	37	37.84	37
0.36	38	38	38	38	38	38	38	38
0.38	38	38.12	38	38	38.36	38	38.88	38
0.4	39	39	39	39	39	39	39	39
0.42	39.66	40	40	40	40	40	40	40
0.44	40.24	41.12	42	42	41.36	40	40.88	42
0.46	42	42.04	42	42	42.12	42	42.96	42
0.48	43.04	43.52	44	44	43.56	43	43.48	44
0.5	44	44	44	44	44	44	44	44
0.52	44.96	45	45	45	45	45	45	45
0.54	45.42	45.96	46	46	45.88	45	45.04	46
0.56	46.88	47	47	47	47	47	47	47
0.58	47.34	47.92	48	48	47.76	47	47.08	48
0.6	48.8	49	49	49	49	49	49	49
0.62	49	49	49	49	49	49	49	49
0.64	49	49.36	49	49	49.08	49	49.64	49
0.66	50.18	50.84	51	51	50.52	50	50.16	51
0.68	51	51	51	51	51	51	51	51
0.7	51.1	51.8	52	52	51.4	51	51.2	52
0.72	52.56	53	53	53	52.84	53	53	53
0.74	53.02	53.76	54	54	53.28	53	53.24	54
0.76	54	54	54	54	54	54	54	54
0.78	54	54	54	54	54	54	54	54
0.8	54.4	55.2	55	55	54.6	54	55.8	55
0.82	55.86	57.36	56	56	56.08	56	56.64	58
0.84	58.64	60	60	60	58.96	58	60	60
0.86	60	60	60	60	60	60	60	60
0.88	60.48	62	62	62	60.72	60	62	62
0.9	62	62.6	62	62	62	62	62.4	63
0.92	63	63.08	63	63	63	63	63.92	63
0.94	63.62	64	64	64	63.68	64	64	64
0.96	64.16	66	66	66	64.24	64	66	66
0.98	66	69.12	66	66	66	66	68.88	72

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = Investeringen ; par3 = Investeringen ;

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