Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
100.00 101.25 96.25 93.75 95.00 97.50 97.50 97.50 93.75 93.75 88.75 93.75 93.75 95.00 96.25 96.25 98.75 101.25 102.50 102.50 102.50 98.75 91.25 86.25 82.50 83.75 86.25 87.50 88.75 90.00 88.75 86.25 87.50 85.00 80.00 83.75 82.50 80.00 78.75 77.50 81.25 85.00 85.00 80.00 76.25 72.50 76.25 90.00 91.25 86.25 76.25 72.50 77.50 88.75 96.25 98.75 96.25 92.50 93.75 100.00
Data Y:
100.00 98.20 90.09 82.88 82.88 85.59 86.49 85.59 81.98 80.18 81.08 90.99 92.79 91.89 86.49 82.88 83.78 84.68 84.68 82.88 81.08 81.08 81.08 88.29 90.09 88.29 83.78 81.08 81.08 81.98 81.98 81.98 82.88 79.28 74.77 75.68 72.97 69.37 71.17 71.17 72.07 71.17 68.47 63.96 61.26 58.56 62.16 73.87 78.38 74.77 71.17 67.57 70.27 74.77 75.68 73.87 69.37 64.86 65.77 72.97
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