FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software Modulerwasp_harrell_davis.wasp
Title produced by softwareHarrell-Davis Quantiles
Date of computationTue, 15 Jul 2014 10:54:30 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Jul/15/t14054181192fwn7p2eyx665qd.htm/, Retrieved Wed, 15 May 2024 01:04:20 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=235318, Retrieved Wed, 15 May 2024 01:04:20 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Harrell-Davis Quantiles] [tijdreeks B stap 6] [2014-07-15 09:54:30] [529eccf7e66da1786c0a491e4074a2d7] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
10700
12400
12000
12800
11800
11900
11900
12300
11700
11900
11900
14000
11300
12600
12600
12600
11300
12200
11800
12800
11400
11600
11700
14100
11000
12800
13300
12600
10700
12600
12700
14100
11600
11300
11600
13000
10800
13800
12600
12500
9900
11800
12400
15000
11500
11100
10800
12700
10500
14900
12800
12300
9600
11000
12700
15300
12900
11200
11000
13100
10200
15100
12600
11600
9700
10200
12100
15300
13500
10700
11400
12500
9300
15100
12300
11800
9600
9600
12400
16400
13500
11000
11200
12900
8900
15600
12500
11700
9000
8600
13100
16100
14400
11300
12200
14000
9300
14900
12500
11600
9100
8800
13000
15500
14600
11200
12700
14100

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'George Udny Yule' @ yule.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 & 'George Udny Yule' @ yule.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=235318&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=235318&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=235318&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'George Udny Yule' @ yule.wessa.net






Harrell-Davis Quantiles
quantilesvaluestandard error
0.19877.42450213003381.845157052511
0.210945.4506171654203.558132763138
0.311397.5059256021164.473298305543
0.411752.3132749908145.947899265745
0.512158.5907309764211.399986928695
0.612521.1147097484110.104908810295
0.712756.4680502869122.25149677053
0.813388.0448421097390.460512618977
0.914678.9918300473380.497841094856

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.1 & 9877.42450213003 & 381.845157052511 \tabularnewline
0.2 & 10945.4506171654 & 203.558132763138 \tabularnewline
0.3 & 11397.5059256021 & 164.473298305543 \tabularnewline
0.4 & 11752.3132749908 & 145.947899265745 \tabularnewline
0.5 & 12158.5907309764 & 211.399986928695 \tabularnewline
0.6 & 12521.1147097484 & 110.104908810295 \tabularnewline
0.7 & 12756.4680502869 & 122.25149677053 \tabularnewline
0.8 & 13388.0448421097 & 390.460512618977 \tabularnewline
0.9 & 14678.9918300473 & 380.497841094856 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=235318&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.1[/C][C]9877.42450213003[/C][C]381.845157052511[/C][/ROW]
[ROW][C]0.2[/C][C]10945.4506171654[/C][C]203.558132763138[/C][/ROW]
[ROW][C]0.3[/C][C]11397.5059256021[/C][C]164.473298305543[/C][/ROW]
[ROW][C]0.4[/C][C]11752.3132749908[/C][C]145.947899265745[/C][/ROW]
[ROW][C]0.5[/C][C]12158.5907309764[/C][C]211.399986928695[/C][/ROW]
[ROW][C]0.6[/C][C]12521.1147097484[/C][C]110.104908810295[/C][/ROW]
[ROW][C]0.7[/C][C]12756.4680502869[/C][C]122.25149677053[/C][/ROW]
[ROW][C]0.8[/C][C]13388.0448421097[/C][C]390.460512618977[/C][/ROW]
[ROW][C]0.9[/C][C]14678.9918300473[/C][C]380.497841094856[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=235318&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=235318&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.19877.42450213003381.845157052511
0.210945.4506171654203.558132763138
0.311397.5059256021164.473298305543
0.411752.3132749908145.947899265745
0.512158.5907309764211.399986928695
0.612521.1147097484110.104908810295
0.712756.4680502869122.25149677053
0.813388.0448421097390.460512618977
0.914678.9918300473380.497841094856


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 0 ; par2 = no ; par3 = 512 ;
Parameters (R input):
par1 = 0.1 ; par2 = 0.9 ; par3 = 0.1 ;
R code (references can be found in the software module):
par3 <- '0.01'
par2 <- '0.9'
par1 <- '0.1'
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')