Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
2006januari 3167956 2006februari 3001753 2006maart 3571343 2006april 3990145 2006mei 4472259 2006juni 4487988 2006juli 5021544 2006augustus 4877589 2006september 4563348 2006oktober 4452338 2006november 3535989 2006december 3454304 2007januari 3331523 2007februari 3213977 2007maart 3896807 2007april 4121803 2007mei 4566599 2007juni 4529566 2007juli 5172312 2007augustus 5121598 2007september 4713449 2007oktober 4656638 2007november 3647578 2007december 3545823 2008januari 3388686 2008februari 3348700 2008maart 3973721 2008april 4156519 2008mei 4713826 2008juni 4704148 2008juli 5175950 2008augustus 5025767 2008september 4600637 2008oktober 4560314 2008november 3443549 2008december 3333873 2009januari 3072606 2009februari 2891262 2009maart 3390581 2009april 3888685 2009mei 4173577 2009juni 4130139 2009juli 4851476 2009augustus 4811406 2009september 4322719 2009oktober 4274814 2009november 3355439 2009december 3293039 2010januari 3114971 2010februari 3049444 2010maart 3697355 2010april 3213665 2010mei 4447089 2010juni 4442139 2010juli 5119203 2010augustus 5058056 2010september 4623783 2010oktober 4666071 2010november 3719403 2010december 3440349 2011januari 3466587 2011februari 3251624 2011maart 3921482 2011april 4466794 2011mei 4916693 2011juni 4939490 2011juli 5627276 2011augustus 5540569 2011september 5128892 2011oktober 5024163 2011november 3807138 2011december 3777434 2012januari 3675761 2012februari 3552136 2012maart 4177498 2012april 4568847 2012mei 5027940 2012juni 5078079 2012juli 5759003 2012augustus 5671424 2012september 5239374 2012oktober 5100023 2012november 3944666 2012december 3858569 2013januari 3670053 2013februari 3563751 2013maart 4341934 2013april 4779391 2013mei 5440427 2013juni 5404974 2013juli 5934128 2013augustus 5942981 2013september 5477811 2013oktober 5288928 2013november 4099344 2013december 4103791
Sample Range:
(leave blank to include all observations)
From:
To:
lowest quantile
highest quantile
step size
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
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')
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation