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 computationWed, 14 Aug 2013 09:20:36 -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/Aug/14/t1376486463ots0yfjh9yx1n1u.htm/, Retrieved Sat, 04 May 2024 20:22:12 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=211093, Retrieved Sat, 04 May 2024 20:22:12 +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)
-     [Histogram] [Stap 2/2] [2013-08-14 13:02:24] [1cfd0014ba435dd2b8f9632cac0a7144]
- RMP     [Harrell-Davis Quantiles] [Stap 6 / 2] [2013-08-14 13:20:36] [38a0db91cd47487c7649642dcb33e029] [Current]
- R P       [Harrell-Davis Quantiles] [Stap 7/2] [2013-08-14 13:28:37] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [Central Tendency] [Stap 9/2] [2013-08-14 13:38:59] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [Mean versus Median] [Stap 12/2] [2013-08-14 13:52:17] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [Mean Plot] [Stap 14/2] [2013-08-14 14:02:31] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [(Partial) Autocorrelation Function] [Stap 17 / 2] [2013-08-14 14:22:04] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [Variability] [Stap 20 / 2] [2013-08-14 14:34:04] [9b490dd2ab715f1b5bf65aa31d98df3d]
- RMP       [Standard Deviation-Mean Plot] [Stap 21/2] [2013-08-14 14:38:00] [9b490dd2ab715f1b5bf65aa31d98df3d]
Feedback Forum

Post a new message
Dataseries X:
10320
11400
9360
10080
10080
10800
10320
9720
10440
11160
9480
11160
9840
11160
8760
10320
9600
10680
10200
10680
10200
12480
8880
11280
9480
11040
9240
9360
9240
10680
10680
10320
9960
12240
8880
11280
9360
10320
9840
9120
9360
10800
9840
11760
9960
11160
9240
11520
9000
10200
10200
9840
8760
11520
9120
11280
10560
10680
9960
10200
10200
10320
9600
10080
9120
10920
7800
11880
9360
10920
9840
9360
10680
9720
9960
10680
9120
10320
8040
11280
8880
11040
9600
9600
11040
9720
9480
10200
9360
10800
8520
11520
9120
11040
8880
9600
10440
8880
8520
10800
8880
10560
8400
12480
10560
10800
9840
8880




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=211093&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 time2 seconds
R Server'Herman Ole Andreas Wold' @ wold.wessa.net







Harrell-Davis Quantiles
quantilesvaluestandard error
0.18895.4795066309272.0644177505178
0.29234.31581395539110.329842102682
0.39511.89478091656125.54895234955
0.49815.49964855632127.820950580952
0.510105.9625738221124.811731145574
0.610346.7021483535116.393948343796
0.710648.152040308111.7824715996
0.810941.5605264704130.973653268876
0.911310.1056120906116.734486491147

\begin{tabular}{lllllllll}
\hline
Harrell-Davis Quantiles \tabularnewline
quantiles & value & standard error \tabularnewline
0.1 & 8895.47950663092 & 72.0644177505178 \tabularnewline
0.2 & 9234.31581395539 & 110.329842102682 \tabularnewline
0.3 & 9511.89478091656 & 125.54895234955 \tabularnewline
0.4 & 9815.49964855632 & 127.820950580952 \tabularnewline
0.5 & 10105.9625738221 & 124.811731145574 \tabularnewline
0.6 & 10346.7021483535 & 116.393948343796 \tabularnewline
0.7 & 10648.152040308 & 111.7824715996 \tabularnewline
0.8 & 10941.5605264704 & 130.973653268876 \tabularnewline
0.9 & 11310.1056120906 & 116.734486491147 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=211093&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]8895.47950663092[/C][C]72.0644177505178[/C][/ROW]
[ROW][C]0.2[/C][C]9234.31581395539[/C][C]110.329842102682[/C][/ROW]
[ROW][C]0.3[/C][C]9511.89478091656[/C][C]125.54895234955[/C][/ROW]
[ROW][C]0.4[/C][C]9815.49964855632[/C][C]127.820950580952[/C][/ROW]
[ROW][C]0.5[/C][C]10105.9625738221[/C][C]124.811731145574[/C][/ROW]
[ROW][C]0.6[/C][C]10346.7021483535[/C][C]116.393948343796[/C][/ROW]
[ROW][C]0.7[/C][C]10648.152040308[/C][C]111.7824715996[/C][/ROW]
[ROW][C]0.8[/C][C]10941.5605264704[/C][C]130.973653268876[/C][/ROW]
[ROW][C]0.9[/C][C]11310.1056120906[/C][C]116.734486491147[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=211093&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=211093&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.18895.4795066309272.0644177505178
0.29234.31581395539110.329842102682
0.39511.89478091656125.54895234955
0.49815.49964855632127.820950580952
0.510105.9625738221124.811731145574
0.610346.7021483535116.393948343796
0.710648.152040308111.7824715996
0.810941.5605264704130.973653268876
0.911310.1056120906116.734486491147



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):
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')