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 computationMon, 07 Jul 2014 18:21:31 +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/07/t14047537727c1wsh3c2rqjddh.htm/, Retrieved Tue, 14 May 2024 16:35:05 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=235270, Retrieved Tue, 14 May 2024 16:35:05 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact156
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Harrell-Davis Quantiles] [] [2014-07-07 17:21:31] [bdb7c0ed7ba273e65f9ee772c5dda4f0] [Current]
Feedback Forum

Post a new message
Dataseries X:
1069108
1059362
1049495
1029082
1231089
1220388
1069108
968521
978233
978233
989056
1008514
1069108
1049495
1079775
1129547
1412683
1412683
1352244
1291650
1341422
1401983
1412683
1442964
1533833
1473244
1473244
1564114
1816014
1836427
1785734
1664578
1755420
1755420
1765165
1816014
1856040
1876453
1876453
1937014
2169452
2229890
2239603
2088322
2169452
2139171
2078582
2209478
2239603
2188909
2199610
2269916
2532640
2663352
2663352
2602913
2693660
2602913
2552092
2744509
2774634
2703378
2884967
2956228
3168103
3308711
3289258
3278430
3359559
3349692
3228692
3410253
3470847
3410253
3662154
3783309
4065362
4176650
4146492
4085897
4136624
4197185
3995056
4156204
4257779
4216798
4479366
4570080
4953837
5024138
4933418
4984117
5014398
5044678
4852261
5033856
5134437
5033856
5326854
5417607
5811037
5871631
5891089
5992631
5992631
6032657
5851063
5941938
6002377
5891089
6214246
6274812
6678021
6749283
6849864
6940739
6950451
6961152
6779563
6961152




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

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







Harrell-Davis Quantiles
quantilesvaluestandard error
0.11126131.8897794584362.8974873255
0.21489676.49711503125003.2421866
0.31874954.95354755145586.493250637
0.42269899.30653602184449.567810872
0.52813091.36605713278844.568397036
0.63533599.2400837339080.391254515
0.74348930.71517459334883.581673891
0.85205724.79321397311016.509948914
0.96084225.49614079202052.337437136

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.1 & 1126131.88977945 & 84362.8974873255 \tabularnewline
0.2 & 1489676.49711503 & 125003.2421866 \tabularnewline
0.3 & 1874954.95354755 & 145586.493250637 \tabularnewline
0.4 & 2269899.30653602 & 184449.567810872 \tabularnewline
0.5 & 2813091.36605713 & 278844.568397036 \tabularnewline
0.6 & 3533599.2400837 & 339080.391254515 \tabularnewline
0.7 & 4348930.71517459 & 334883.581673891 \tabularnewline
0.8 & 5205724.79321397 & 311016.509948914 \tabularnewline
0.9 & 6084225.49614079 & 202052.337437136 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=235270&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]1126131.88977945[/C][C]84362.8974873255[/C][/ROW]
[ROW][C]0.2[/C][C]1489676.49711503[/C][C]125003.2421866[/C][/ROW]
[ROW][C]0.3[/C][C]1874954.95354755[/C][C]145586.493250637[/C][/ROW]
[ROW][C]0.4[/C][C]2269899.30653602[/C][C]184449.567810872[/C][/ROW]
[ROW][C]0.5[/C][C]2813091.36605713[/C][C]278844.568397036[/C][/ROW]
[ROW][C]0.6[/C][C]3533599.2400837[/C][C]339080.391254515[/C][/ROW]
[ROW][C]0.7[/C][C]4348930.71517459[/C][C]334883.581673891[/C][/ROW]
[ROW][C]0.8[/C][C]5205724.79321397[/C][C]311016.509948914[/C][/ROW]
[ROW][C]0.9[/C][C]6084225.49614079[/C][C]202052.337437136[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=235270&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=235270&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.11126131.8897794584362.8974873255
0.21489676.49711503125003.2421866
0.31874954.95354755145586.493250637
0.42269899.30653602184449.567810872
0.52813091.36605713278844.568397036
0.63533599.2400837339080.391254515
0.74348930.71517459334883.581673891
0.85205724.79321397311016.509948914
0.96084225.49614079202052.337437136



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