Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
109.20 88.60 94.30 98.30 86.40 80.60 104.10 108.20 93.40 71.90 94.10 94.90 96.40 91.10 84.40 86.40 88.00 75.10 109.70 103.00 82.10 68.00 96.40 94.30 90.00 88.00 76.10 82.50 81.40 66.50 97.20 94.10 80.70 70.50 87.80 89.50 99.60 84.20 75.10 92.00 80.80 73.10 99.80 90.00 83.10 72.40 78.80 87.30 91.00 80.10 73.60 86.40 74.50 71.20 92.40 81.50 85.30 69.90 84.20 90.70 100.30
Data Y:
99.90 99.80 99.80 100.30 99.90 99.90 100.00 100.10 100.10 100.20 100.30 100.60 100.00 100.10 100.20 100.00 100.10 100.10 100.10 100.50 100.50 100.50 96.30 96.30 96.80 96.80 96.90 96.80 96.80 96.80 96.80 97.00 97.00 97.00 96.80 96.90 97.20 97.30 97.30 97.20 97.30 97.30 97.30 97.30 97.30 97.30 98.10 96.80 96.80 96.80 96.80 96.80 96.80 96.80 96.80 96.80 96.80 96.80 96.90 97.10 97.10
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