Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_harrell_davis.wasp
Title produced by softwareHarrell-Davis Quantiles
Date of computationSun, 24 Aug 2025 18:02:46 +0200
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2025/Aug/24/t1756051418142h6dkysyn8fjd.htm/, Retrieved Sun, 31 May 2026 05:01:28 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=320265, Retrieved Sun, 31 May 2026 05:01:28 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact159
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Harrell-Davis Quantiles] [] [2025-08-24 16:02:46] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
55.00
-99.00
55.00
40.00
30.00
-99.00
-99.00
-99.00
59.00
55.00
36.00
65.00
-99.00
48.00
45.00
-99.00
55.00
65.00
50.00
-99.00
54.00
40.00
50.00
55.00
-99.00
-99.00
60.00
55.00
55.00
-99.00
48.00
60.00
-99.00
-99.00
51.00
60.00
-99.00
-99.00
-99.00
55.00
35.00
51.00
55.00
-99.00
57.00
50.00
-99.00
67.00
50.00
-99.00
55.00
62.00
35.00
60.00
55.00
60.00
55.00
63.00
58.00
35.00
48.00
51.00
58.00
-99.00
-99.00
-99.00
-99.00
60.00
-99.00
-99.00
-99.00
51.00
50.00
60.00
50.00
42.00
-99.00
-99.00
-99.00
60.00
50.00
50.00
56.00
-99.00
40.00
50.00
50.00
45.00
48.00
75.00
64.00
-99.00
-99.00
-99.00
-99.00
-99.00
50.00
-99.00
-99.00
50.00
-99.00
-99.00
-99.00
-99.00
-99.00
64.00
-99.00
-99.00
52.00
50.00
50.00
-99.00
-99.00
55.00
62.00
50.00
64.00
-99.00
50.00
25.00
-99.00
65.00
-99.00
-99.00
62.00
60.00
46.00
35.00
-99.00
60.00
57.00
-99.00
35.00
55.00
56.00
50.00
-99.00
35.00
45.00
60.00
55.00
-99.00
60.00
-99.00
51.00
-99.00
-99.00
-99.00
75.00
50.00
60.00
-99.00
-99.00
60.00
75.00
60.00
-99.00
65.00
55.00
-99.00
-99.00
-99.00
-99.00
35.00
35.00
60.00
60.00
-99.00
-99.00
55.00
-99.00
-99.00
-99.00
51.00
50.00
50.00
50.00
-99.00
33.00
60.00
55.00
65.00
58.00
65.00
-99.00
60.00
-99.00
60.00
-99.00
51.00
50.00
50.00
50.00
-99.00
-99.00
-99.00
-99.00
55.00
55.00
55.00
45.00
40.00
-99.00
-99.00
-99.00
60.00
-99.00
-99.00
50.00
-99.00
58.00
62.00
75.00
59.00
-99.00
-99.00
-99.00
40.00
-99.00
53.00
-99.00
-99.00
-99.00
58.00
-99.00
75.00
66.00
55.00
52.00
50.00
51.00
60.00
58.00
-99.00
52.00
50.00
50.00
59.00
-99.00
48.00
61.00
50.00
-99.00
-99.00
45.00
-99.00
-99.00
54.00
65.00
65.00
-99.00
65.00
-99.00
-99.00
60.00
65.00
61.00
65.00
-99.00
55.00
56.00
55.00
50.00
-99.00
-99.00
-99.00
66.00
51.00
54.00
-99.00
50.00
-99.00
37.00
-99.00
-99.00
-99.00
57.00
-99.00
-99.00
65.00
-99.00
55.00
56.00
65.00
-99.00
-99.00
-99.00
-99.00
55.00
64.00
-99.00
-99.00
63.00
-99.00
60.00
51.00
-99.00
60.00
50.00
55.00
-99.00
60.00
60.00
40.00
50.00
-99.00
50.00
-99.00
50.00
-99.00
40.00
45.00
50.00
62.00
75.00
-99.00
-99.00
62.00
28.00
65.00
-99.00
-99.00
61.00
60.00
36.00
-99.00
50.00
56.00
60.00
50.00
55.00
-99.00
55.00
48.00
65.00
60.00
-99.00
-99.00
49.00
55.00
55.00
-99.00
#NULL!
50.00
70.00
-99.00
60.00
52.00
-99.00
55.00
50.00
62.00
65.00
65.00
-99.00
45.00
-99.00
47.00
53.00
-99.00
-99.00
50.00
60.00
-99.00
55.00
58.00
50.00
-99.00
55.00
70.00
-99.00
-99.00
55.00
55.00
-99.00
-99.00
-99.00
58.00
-99.00
57.00
60.00
-99.00
-99.00
-99.00
58.00
-99.00
-99.00
-99.00
-99.00
-99.00
65.00
46.00
-99.00
50.00
60.00
68.00
-99.00
57.00
55.00
55.00
50.00
50.00




Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=320265&T=0

[TABLE]
[ROW]
Summary of computational transaction[/C][/ROW] [ROW]Raw Input[/C] view raw input (R code) [/C][/ROW] [ROW]Raw Output[/C]view raw output of R engine [/C][/ROW] [ROW]Computing time[/C]1 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=320265&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=320265&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 Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center



Parameters (Session):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.01 ;
Parameters (R input):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.01 ;
R code (references can be found in the software module):
par1 <- as(par1,'numeric')
par2 <- as(par2,'numeric')
par3 <- as(par3,'numeric')
library(Hmisc)
myseq <- seq(par1, par2, par3)
x <- as.numeric(na.omit(x))
hd <- hdquantile(x, probs = myseq, se = TRUE, na.rm = FALSE, names = TRUE, weights=FALSE)
bitmap(file='test1.png')
plot(myseq,hd,col=2,main=main,xlab=xlab,ylab=ylab)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Harrell-Davis Quantiles',3,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'quantiles',header=TRUE)
a<-table.element(a,'value',header=TRUE)
a<-table.element(a,'standard error',header=TRUE)
a<-table.row.end(a)
length(hd)
for (i in 1:length(hd))
{
a<-table.row.start(a)
a<-table.element(a,as(labels(hd)[i],'numeric'),header=TRUE)
a<-table.element(a,signif(as.matrix(hd[i])[1,1],6))
a<-table.element(a,signif(as.matrix(attr(hd,'se')[i])[1,1],6))
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')