Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
-0.8 -0.2 0.2 1 0 -0.2 1 0.4 1 1.7 3.1 3.3 3.1 3.5 6 5.7 4.7 4.2 3.6 4.4 2.5 -0.6 -1.9 -1.9 0.7 -0.9 -1.7 -3.1 -2.1 0.2 1.2 3.8 4 6.6 5.3 7.6 4.7 6.6 4.4 4.6 6 4.8 4 2.7 3 4.1 4 2.7 2.6 3.1 4.4 3 2 1.3 1.5 1.3 3.2 1.8 3.3 1 2.4 0.4 -0.1 1.3 -1.1 -4.4 -7.5 -12.2 -14.5 -16 -16.7 -16.3 -16.9
Data Y:
15.5 15.1 11.7 16.3 16.7 15 14.9 14.6 15.3 17.9 16.4 15.4 17.9 15.9 13.9 17.8 17.9 17.4 16.7 16 16.6 19.1 17.8 17.2 18.6 16.3 15.1 19.2 17.7 19.1 18 17.5 17.8 21.1 17.2 19.4 19.8 17.6 16.2 19.5 19.9 20 17.3 18.9 18.6 21.4 18.6 19.8 20.8 19.6 17.7 19.8 22.2 20.7 17.9 20.9 21.2 21.4 23 21.3 23.9 22.4 18.3 22.8 22.3 17.8 16.4 16 16.4 17.7 16.6 16.2 18.3
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
red
grey
white
blue
red
black
brown
yellow
color right
(?)
blue
grey
white
blue
red
black
brown
yellow
print densities
(?)
TRUE
TRUE
FALSE
Name of X series
Name of Y series
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
if (par3 == 'TRUE') par3 <- TRUE if (par3 == 'FALSE') par3 <- FALSE library(Hmisc) z <- data.frame(cbind(x,y)) names(z) <- list(par4,par5) bitmap(file='plot.png') out <- histbackback(z, probability=par3, main = main, ylab = ylab) barplot(-out$left, col=par1, horiz=TRUE, space=0, add=TRUE, axes=FALSE) barplot(out$right, col=par2, horiz=TRUE, space=0, add=TRUE, axes=FALSE) dev.off()
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation