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 computationFri, 12 Apr 2013 07:26:00 -0400
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Apr/12/t13657662842k4v732evfkak56.htm/, Retrieved Sat, 04 May 2024 12:01:57 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=208018, Retrieved Sat, 04 May 2024 12:01:57 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact176
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Harrell-Davis Quantiles] [] [2013-02-27 17:18:27] [0a0b9be5aba9ab40348e88c5d8957fc2]
- R PD  [Harrell-Davis Quantiles] [Deciel Buitenland...] [2013-03-03 16:38:13] [0a0b9be5aba9ab40348e88c5d8957fc2]
- R P       [Harrell-Davis Quantiles] [DECIELEN buitenla...] [2013-04-12 11:26:00] [aebd7ed62a520371cf0fbdf4b97f0dea] [Current]
Feedback Forum

Post a new message
Dataseries X:
122.27
124.69
147.56
120.03
136.01
138.16
122.87
112.22
137.35
139.08
139.64
121.12
132.37
130.69
149.41
130.72
139.14
146.55
137.35
122.73
138.97
154.73
143.4
123.88
140.25
142.39
143.81
153.58
144.71
153.84
151.3
121.92
153.05
149.29
118.81
109.19
103.68
106.94
114.43
107.87
103.14
117.02
112.44
95.85
123.86
121.83
121.95
120.34
113.32
117.31
141.69
130.35
127.28
148.1
131.21
120.37
146.91
144.04
141.77
132.15
142.04
149.77
172.31
150.24
163.23
155.92
146.96
134.51
152.83
150.54
150.98
138.82




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gertrude Mary Cox' @ cox.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 & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=208018&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]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=208018&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=208018&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'Gertrude Mary Cox' @ cox.wessa.net







Harrell-Davis Quantiles
quantilesvaluestandard error
0.0197.80462194711575.7157741624117
0.11112.8439523602823.07770188023721
0.21119.9913938204211.91071501146001
0.31123.9098990148742.55439324902026
0.41130.4680309073333.8775032448888
0.51136.7867333439672.78617007980253
0.61140.8629684242841.97121905012419
0.71144.9586337797592.20425637011753
0.81149.1331516861131.57274275662814
0.91153.0398751156261.33723754440519

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.01 & 97.8046219471157 & 5.7157741624117 \tabularnewline
0.11 & 112.843952360282 & 3.07770188023721 \tabularnewline
0.21 & 119.991393820421 & 1.91071501146001 \tabularnewline
0.31 & 123.909899014874 & 2.55439324902026 \tabularnewline
0.41 & 130.468030907333 & 3.8775032448888 \tabularnewline
0.51 & 136.786733343967 & 2.78617007980253 \tabularnewline
0.61 & 140.862968424284 & 1.97121905012419 \tabularnewline
0.71 & 144.958633779759 & 2.20425637011753 \tabularnewline
0.81 & 149.133151686113 & 1.57274275662814 \tabularnewline
0.91 & 153.039875115626 & 1.33723754440519 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=208018&T=1

[TABLE]
[ROW][C]Harrell-Davis Quantiles[/C][/ROW]
[ROW][C]quantiles[/C][C]value[/C][C]standard error[/C][/ROW]
[ROW][C]0.01[/C][C]97.8046219471157[/C][C]5.7157741624117[/C][/ROW]
[ROW][C]0.11[/C][C]112.843952360282[/C][C]3.07770188023721[/C][/ROW]
[ROW][C]0.21[/C][C]119.991393820421[/C][C]1.91071501146001[/C][/ROW]
[ROW][C]0.31[/C][C]123.909899014874[/C][C]2.55439324902026[/C][/ROW]
[ROW][C]0.41[/C][C]130.468030907333[/C][C]3.8775032448888[/C][/ROW]
[ROW][C]0.51[/C][C]136.786733343967[/C][C]2.78617007980253[/C][/ROW]
[ROW][C]0.61[/C][C]140.862968424284[/C][C]1.97121905012419[/C][/ROW]
[ROW][C]0.71[/C][C]144.958633779759[/C][C]2.20425637011753[/C][/ROW]
[ROW][C]0.81[/C][C]149.133151686113[/C][C]1.57274275662814[/C][/ROW]
[ROW][C]0.91[/C][C]153.039875115626[/C][C]1.33723754440519[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=208018&T=1

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

As an alternative you can also use a QR Code:  

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

Harrell-Davis Quantiles
quantilesvaluestandard error
0.0197.80462194711575.7157741624117
0.11112.8439523602823.07770188023721
0.21119.9913938204211.91071501146001
0.31123.9098990148742.55439324902026
0.41130.4680309073333.8775032448888
0.51136.7867333439672.78617007980253
0.61140.8629684242841.97121905012419
0.71144.9586337797592.20425637011753
0.81149.1331516861131.57274275662814
0.91153.0398751156261.33723754440519



Parameters (Session):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.10 ;
Parameters (R input):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.10 ;
R code (references can be found in the software module):
par3 <- '0.10'
par2 <- '0.99'
par1 <- '0.01'
par1 <- as(par1,'numeric')
par2 <- as(par2,'numeric')
par3 <- as(par3,'numeric')
library(Hmisc)
myseq <- seq(par1, par2, par3)
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,as.matrix(hd[i])[1,1])
a<-table.element(a,as.matrix(attr(hd,'se')[i])[1,1])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')