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 Aug 2016 15:10:41 +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/2016/Aug/12/t1471011090ys546nkuhersukg.htm/, Retrieved Sun, 05 May 2024 09:17:37 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=296435, Retrieved Sun, 05 May 2024 09:17:37 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact118
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [Omzet Mentos Aardbei] [2016-07-17 11:11:37] [74be16979710d4c4e7c6647856088456]
-   P   [Univariate Data Series] [Omzet Mentos Aardbei] [2016-08-02 12:13:56] [74be16979710d4c4e7c6647856088456]
-   P     [Univariate Data Series] [] [2016-08-12 10:07:18] [74be16979710d4c4e7c6647856088456]
- R  D      [Univariate Data Series] [] [2016-08-12 10:23:50] [74be16979710d4c4e7c6647856088456]
- RMP           [Harrell-Davis Quantiles] [] [2016-08-12 14:10:41] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
425.25
417.75
410.25
395.25
546.75
539.25
425.25
349.50
357.00
357.00
364.50
380.25
334.50
288.75
251.25
251.25
395.25
410.25
296.25
167.25
235.50
235.50
288.75
319.50
312.00
235.50
273.75
258.75
387.75
357.00
235.50
144.75
228.00
251.25
273.75
303.75
243.00
190.50
213.00
220.50
417.75
417.75
303.75
288.75
334.50
312.00
372.75
448.50
463.50
357.00
327.00
296.25
501.75
516.75
478.50
516.75
509.25
448.50
516.75
592.50
623.25
531.75
471.00
516.75
714.00
774.75
759.75
789.75
782.25
706.50
835.50
866.25
911.25
774.75
721.50
782.25
927.00
1056.00
1025.25
1025.25
1040.25
987.75
1124.25
1124.25
1101.00
972.00
995.25
1010.25
1109.25
1238.25
1146.75
1192.50
1154.25
1131.75
1306.50
1268.25
1215.00
1139.25
1215.00
1253.25
1299.00
1359.75
1299.00
1336.50
1290.75
1283.25
1473.00
1488.75
1428.00
1321.50
1412.25
1450.50
1496.25
1564.50
1496.25
1549.50
1526.25
1443.00
1617.75
1617.75




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296435&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.1251.35109817764914.4972616758896
0.2310.37773275118719.6551114346208
0.3372.83029415499725.6703477325138
0.4446.35937633837738.4518173488992
0.5578.75494585084288.1483176933137
0.6822.967663494849107.037216162804
0.71054.9048761019574.477430568681
0.81225.1078373141357.5127196953369
0.91405.1024994323858.5015245568146

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.1 & 251.351098177649 & 14.4972616758896 \tabularnewline
0.2 & 310.377732751187 & 19.6551114346208 \tabularnewline
0.3 & 372.830294154997 & 25.6703477325138 \tabularnewline
0.4 & 446.359376338377 & 38.4518173488992 \tabularnewline
0.5 & 578.754945850842 & 88.1483176933137 \tabularnewline
0.6 & 822.967663494849 & 107.037216162804 \tabularnewline
0.7 & 1054.90487610195 & 74.477430568681 \tabularnewline
0.8 & 1225.10783731413 & 57.5127196953369 \tabularnewline
0.9 & 1405.10249943238 & 58.5015245568146 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296435&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]251.351098177649[/C][C]14.4972616758896[/C][/ROW]
[ROW][C]0.2[/C][C]310.377732751187[/C][C]19.6551114346208[/C][/ROW]
[ROW][C]0.3[/C][C]372.830294154997[/C][C]25.6703477325138[/C][/ROW]
[ROW][C]0.4[/C][C]446.359376338377[/C][C]38.4518173488992[/C][/ROW]
[ROW][C]0.5[/C][C]578.754945850842[/C][C]88.1483176933137[/C][/ROW]
[ROW][C]0.6[/C][C]822.967663494849[/C][C]107.037216162804[/C][/ROW]
[ROW][C]0.7[/C][C]1054.90487610195[/C][C]74.477430568681[/C][/ROW]
[ROW][C]0.8[/C][C]1225.10783731413[/C][C]57.5127196953369[/C][/ROW]
[ROW][C]0.9[/C][C]1405.10249943238[/C][C]58.5015245568146[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296435&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296435&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.1251.35109817764914.4972616758896
0.2310.37773275118719.6551114346208
0.3372.83029415499725.6703477325138
0.4446.35937633837738.4518173488992
0.5578.75494585084288.1483176933137
0.6822.967663494849107.037216162804
0.71054.9048761019574.477430568681
0.81225.1078373141357.5127196953369
0.91405.1024994323858.5015245568146



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