FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_harrell_davis.wasp
Title produced by softwareHarrell-Davis Quantiles
Date of computationFri, 04 Dec 2009 06:53:13 -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/2009/Dec/04/t1259934835nke1g58wcbts2xx.htm/, Retrieved Sat, 27 Apr 2024 23:03:39 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=63522, Retrieved Sat, 27 Apr 2024 23:03:39 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact102

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [data set] [2008-12-01 19:54:57] [b98453cac15ba1066b407e146608df68]
- RMP   [ARIMA Backward Selection] [] [2009-11-27 14:53:14] [b98453cac15ba1066b407e146608df68]
-   PD    [ARIMA Backward Selection] [WS9 Estimation of...] [2009-12-04 13:09:16] [8733f8ed033058987ec00f5e71b74854]
- RMPD      [Mean Plot] [WS9 Residu's] [2009-12-04 13:51:03] [8733f8ed033058987ec00f5e71b74854]
- RMP           [Harrell-Davis Quantiles] [WS9 Betrouwbaarhe...] [2009-12-04 13:53:13] [c6e373ff11c42d4585d53e9e88ed5606] [Current]
-   P             [Harrell-Davis Quantiles] [WS9 Betrouwbaarhe...] [2009-12-04 13:55:49] [8733f8ed033058987ec00f5e71b74854]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
0.0180678527088341
0.0562901166564763
-0.0383920228971653
0.0197362615228291
-0.0349783616211472
0.0068518670200992
0.0280842746777466
0.0446752709325745
0.0346027844881839
-0.04235896700803
-0.0704530877146328
-0.141169759207391
0.190464885503065
0.0160178050891860
0.136736106377406
0.00968031609540383
-0.0209143775407505
-0.0925769658093795
0.0384619588840446
0.0682195700863305
-0.134498105554547
0.0218255727200960
0.0776457687368569
0.0689225629397706
0.0740965027033676
-0.103338356927779
-0.0429672132927176
0.0365409556880891
-0.0414354395090189
-0.012330339132303
0.0286531468201482
-0.0263319233764757
0.0785732307259898
0.0237994722126526
0.0377483003142014
0.0507363385159117
-0.0223289969571086
-0.0483741687167987
-0.138702439764697
0.0658943416950095
-0.015257998756574
-0.0966648642708767
-0.021423000325382
-0.00651105347738536
0.00512035105957504
0.073029300952841
0.0573348071614868
0.172161649472528
-0.0969619108653857
-0.0984926589389618
0.0508824323815179
-0.0623193761665625
-0.137439210181595
0.13754570197851
-0.0237979817564337
0.00561691044717635
0.0328043530195327
0.00654130655901269
0.0601321062076455
-0.0639295914075303
0.0224173380303157
0.317941659607052
0.0225647602888595
-0.0206822092677761
0.00654057567239308
-0.0190310812241401
0.0506293024636681
0.0309034012148992
0.161159786003573
-0.0350860450190002
0.0766629141540984
0.104018416656661
-0.0253219589883051
0.0607550354735824
-0.115326979930159
0.0242361757084084
-0.0348254913157667

Tables (Output of Computation)





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=63522&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=63522&T=0

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

As an alternative you can also use a QR Code:  
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






Harrell-Davis Quantiles
quantilesvaluestandard error
0.01-0.1400768976357440.00281695590176371
0.06-0.1180231787854920.0160830161097627
0.11-0.08991811003656550.0168637165084181
0.16-0.0639251818806330.0187083123526575
0.21-0.04443067653910020.0117088374329401
0.26-0.03310436859910060.00833880619776539
0.31-0.02462572089626390.00783522769038077
0.36-0.01592520489301630.00998068275178022
0.41-0.005181432796994080.0121640856166338
0.460.005852539776704690.0108549044940165
0.510.01498191173033940.00853690122067828
0.560.02220865148900760.0068801096302625
0.610.02874883334180120.00689158442288855
0.660.03619364430499410.00821446128412737
0.710.04521910001379910.00926469297117434
0.760.05496483152121560.00875059114704798
0.810.06458159907881770.0078545717638832
0.860.0764180126052290.0106205431596233
0.910.1074550507422110.0276099807404838
0.960.1723527963090420.0300373062809738

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.01 & -0.140076897635744 & 0.00281695590176371 \tabularnewline
0.06 & -0.118023178785492 & 0.0160830161097627 \tabularnewline
0.11 & -0.0899181100365655 & 0.0168637165084181 \tabularnewline
0.16 & -0.063925181880633 & 0.0187083123526575 \tabularnewline
0.21 & -0.0444306765391002 & 0.0117088374329401 \tabularnewline
0.26 & -0.0331043685991006 & 0.00833880619776539 \tabularnewline
0.31 & -0.0246257208962639 & 0.00783522769038077 \tabularnewline
0.36 & -0.0159252048930163 & 0.00998068275178022 \tabularnewline
0.41 & -0.00518143279699408 & 0.0121640856166338 \tabularnewline
0.46 & 0.00585253977670469 & 0.0108549044940165 \tabularnewline
0.51 & 0.0149819117303394 & 0.00853690122067828 \tabularnewline
0.56 & 0.0222086514890076 & 0.0068801096302625 \tabularnewline
0.61 & 0.0287488333418012 & 0.00689158442288855 \tabularnewline
0.66 & 0.0361936443049941 & 0.00821446128412737 \tabularnewline
0.71 & 0.0452191000137991 & 0.00926469297117434 \tabularnewline
0.76 & 0.0549648315212156 & 0.00875059114704798 \tabularnewline
0.81 & 0.0645815990788177 & 0.0078545717638832 \tabularnewline
0.86 & 0.076418012605229 & 0.0106205431596233 \tabularnewline
0.91 & 0.107455050742211 & 0.0276099807404838 \tabularnewline
0.96 & 0.172352796309042 & 0.0300373062809738 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=63522&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]-0.140076897635744[/C][C]0.00281695590176371[/C][/ROW]
[ROW][C]0.06[/C][C]-0.118023178785492[/C][C]0.0160830161097627[/C][/ROW]
[ROW][C]0.11[/C][C]-0.0899181100365655[/C][C]0.0168637165084181[/C][/ROW]
[ROW][C]0.16[/C][C]-0.063925181880633[/C][C]0.0187083123526575[/C][/ROW]
[ROW][C]0.21[/C][C]-0.0444306765391002[/C][C]0.0117088374329401[/C][/ROW]
[ROW][C]0.26[/C][C]-0.0331043685991006[/C][C]0.00833880619776539[/C][/ROW]
[ROW][C]0.31[/C][C]-0.0246257208962639[/C][C]0.00783522769038077[/C][/ROW]
[ROW][C]0.36[/C][C]-0.0159252048930163[/C][C]0.00998068275178022[/C][/ROW]
[ROW][C]0.41[/C][C]-0.00518143279699408[/C][C]0.0121640856166338[/C][/ROW]
[ROW][C]0.46[/C][C]0.00585253977670469[/C][C]0.0108549044940165[/C][/ROW]
[ROW][C]0.51[/C][C]0.0149819117303394[/C][C]0.00853690122067828[/C][/ROW]
[ROW][C]0.56[/C][C]0.0222086514890076[/C][C]0.0068801096302625[/C][/ROW]
[ROW][C]0.61[/C][C]0.0287488333418012[/C][C]0.00689158442288855[/C][/ROW]
[ROW][C]0.66[/C][C]0.0361936443049941[/C][C]0.00821446128412737[/C][/ROW]
[ROW][C]0.71[/C][C]0.0452191000137991[/C][C]0.00926469297117434[/C][/ROW]
[ROW][C]0.76[/C][C]0.0549648315212156[/C][C]0.00875059114704798[/C][/ROW]
[ROW][C]0.81[/C][C]0.0645815990788177[/C][C]0.0078545717638832[/C][/ROW]
[ROW][C]0.86[/C][C]0.076418012605229[/C][C]0.0106205431596233[/C][/ROW]
[ROW][C]0.91[/C][C]0.107455050742211[/C][C]0.0276099807404838[/C][/ROW]
[ROW][C]0.96[/C][C]0.172352796309042[/C][C]0.0300373062809738[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=63522&T=1

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

As an alternative you can also use a QR Code:  
QR Code


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

Harrell-Davis Quantiles
quantilesvaluestandard error
0.01-0.1400768976357440.00281695590176371
0.06-0.1180231787854920.0160830161097627
0.11-0.08991811003656550.0168637165084181
0.16-0.0639251818806330.0187083123526575
0.21-0.04443067653910020.0117088374329401
0.26-0.03310436859910060.00833880619776539
0.31-0.02462572089626390.00783522769038077
0.36-0.01592520489301630.00998068275178022
0.41-0.005181432796994080.0121640856166338
0.460.005852539776704690.0108549044940165
0.510.01498191173033940.00853690122067828
0.560.02220865148900760.0068801096302625
0.610.02874883334180120.00689158442288855
0.660.03619364430499410.00821446128412737
0.710.04521910001379910.00926469297117434
0.760.05496483152121560.00875059114704798
0.810.06458159907881770.0078545717638832
0.860.0764180126052290.0106205431596233
0.910.1074550507422110.0276099807404838
0.960.1723527963090420.0300373062809738


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.05 ;
Parameters (R input):
par1 = 0.01 ; par2 = 0.99 ; par3 = 0.05 ;
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)
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')