Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
192528 190773 188996 185320 221698 219771 192528 174414 176163 176163 178112 181616 192528 188996 194449 203412 254400 254400 243516 232604 241567 252473 254400 259853 276217 265306 265306 281670 327033 330709 321580 299762 316121 316121 317876 327033 334241 337917 337917 348823 390681 401565 403314 376071 390681 385228 374317 397889 403314 394185 396112 408773 456085 479624 479624 468740 485082 468740 459588 494239 499664 486832 519533 532366 570521 595842 592339 590389 604999 603222 581432 614128 625040 614128 659491 681309 732102 752143 746712 735800 744935 755841 719441 748461 766753 759373 806657 822993 892101 904761 888424 897554 903007 908460 873809 906511 924624 906511 959275 975618 1046468 1057380 1060884 1079170 1079170 1086378 1053676 1070041 1080925 1060884 1119079 1129986 1202597 1215430 1233543 1249908 1251657 1253584 1220883 1253584
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
par3 <- '0.1' par2 <- '0.9' 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')
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