Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
25.60 23.70 22.00 21.30 20.70 20.40 20.30 20.40 19.80 19.50 23.10 23.50 23.50 22.90 21.90 21.50 20.50 20.20 19.40 19.20 18.80 18.80 22.60 23.30 23.00 21.40 19.90 18.80 18.60 18.40 18.60 19.90 19.20 18.40 21.10 20.50 19.10 18.10 17.00 17.10 17.40 16.80 15.30 14.30 13.40 15.30 22.10 23.70 22.20 19.50 16.60 17.30 19.80 21.20 21.50 20.60 19.10 19.60 23.50 24.00
Data Y:
7.40 7.10 6.80 6.90 7.20 7.40 7.30 6.90 6.90 6.80 7.10 7.20 7.10 7.00 6.90 7.10 7.30 7.50 7.50 7.50 7.30 7.00 6.70 6.50 6.50 6.50 6.60 6.80 6.90 6.90 6.80 6.80 6.50 6.10 6.10 5.90 5.70 5.90 5.90 6.10 6.30 6.20 5.90 5.70 5.40 5.60 6.20 6.30 6.00 5.60 5.50 5.90 6.50 6.80 6.80 6.50 6.20 6.20 6.50 6.70
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