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 computationThu, 12 Feb 2015 18:15:54 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2015/Feb/12/t1423765023njx3yqndyzravst.htm/, Retrieved Sat, 18 May 2024 01:00:33 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=277226, Retrieved Sat, 18 May 2024 01:00:33 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact56
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Harrell-Davis Quantiles] [luchtvaart Harrel...] [2015-02-12 18:15:54] [e6344a6a1a33122c0bdf1792ef294740] [Current]
Feedback Forum

Post a new message
Dataseries X:
2006 januari	3167956
2006 februari	3001753
2006 maart	3571343
2006 april	3990145
2006 mei	4472259
2006 juni	4487988
2006 juli	5021544
2006 augustus	4877589
2006 september	4563348
2006 oktober	4452338
2006 november	3535989
2006 december	3454304
2007 januari	3331523
2007 februari	3213977
2007 maart	3896807
2007 april	4121803
2007 mei	4566599
2007 juni	4529566
2007 juli	5172312
2007 augustus	5121598
2007 september	4713449
2007 oktober	4656638
2007 november	3647578
2007 december	3545823
2008 januari	3388686
2008 februari	3348700
2008 maart	3973721
2008 april	4156519
2008 mei	4713826
2008 juni	4704148
2008 juli	5175950
2008 augustus	5025767
2008 september	4600637
2008 oktober	4560314
2008 november	3443549
2008 december	3333873
2009 januari	3072606
2009 februari	2891262
2009 maart	3390581
2009 april	3888685
2009 mei	4173577
2009 juni	4130139
2009 juli	4851476
2009 augustus	4811406
2009 september	4322719
2009 oktober	4274814
2009 november	3355439
2009 december	3293039
2010 januari	3114971
2010 februari	3049444
2010 maart	3697355
2010 april	3213665
2010 mei	4447089
2010 juni	4442139
2010 juli	5119203
2010 augustus	5058056
2010 september	4623783
2010 oktober	4666071
2010 november	3719403
2010 december	3440349
2011 januari	3466587
2011 februari	3251624
2011 maart	3921482
2011 april	4466794
2011 mei	4916693
2011 juni	4939490
2011 juli	5627276
2011 augustus	5540569
2011 september	5128892
2011 oktober	5024163
2011 november	3807138
2011 december	3777434
2012 januari	3675761
2012 februari	3552136
2012 maart	4177498
2012 april	4568847
2012 mei	5027940
2012 juni	5078079
2012 juli	5759003
2012 augustus	5671424
2012 september	5239374
2012 oktober	5100023
2012 november	3944666
2012 december	3858569
2013 januari	3670053
2013 februari	3563751
2013 maart	4341934
2013 april	4779391
2013 mei	5440427
2013 juni	5404974
2013 juli	5934128
2013 augustus	5942981
2013 september	5477811
2013 oktober	5288928
2013 november	4099344
2013 december	4103791




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=277226&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 time0 seconds
R Server'Gertrude Mary Cox' @ cox.wessa.net



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