Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
18.5 20.8 21.7 20.8 18.7 18.9 20.0 17.7 18.6 19.3 18.9 19.8 21.3 23.1 23.3 22.5 18.9 18.7 19.1 19.4 20.2 20.5 21.3 21.9 23.1 23.7 23.7 22.7 19.7 19.6 20.3 19.9 20.5 21.0 21.5 22.1 23.3 25.2 25.3 24.3 17.5 17.2 17.9 18.9 19.8 20.2 22.1 22.2 23.5 24.8 24.9 23.9 19.0 18.6 19.4 20.2 20.9 21.4 17.9 18.2 19.1 19.2 19.3 18.1 15.4 15.5 16.1 17.4 17.8 18.2 18.7 19.1 21.0 18.5 18.4 16.5 15.0 15.2 15.8 13.6 14.1 14.5 15.4 15.8 17.0 20.7 21.4 18.9 14.1 14.3 15.2 14.8 15.6 16.3
Data Y:
6.0 6.2 6.4 6.4 6.3 6.5 6.6 6.8 6.9 7.0 6.5 6.6 6.7 6.5 6.6 6.6 7.3 7.3 7.3 7.4 7.4 7.4 7.0 6.9 7.0 7.1 7.1 7.1 6.8 7.0 6.8 7.3 7.3 7.3 6.9 6.9 6.9 7.4 7.4 7.2 6.3 6.3 6.3 7.5 7.5 7.4 6.9 6.8 6.9 6.5 6.5 6.5 6.5 6.5 6.5 6.8 6.9 6.8 6.9 6.9 6.9 6.2 6.3 6.3 6.0 6.0 6.0 6.3 6.3 6.3 6.1 6.1 6.3 5.1 5.0 4.9 5.2 5.2 5.2 5.2 5.3 5.4 5.7 5.7 5.9 5.4 5.6 5.5 5.5 5.5 5.7 6.2 6.4 6.5
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
grey
grey
white
blue
red
black
brown
yellow
color right
(?)
grey
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