Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
77.21 81.52 100.00 87.41 64.23 71.41 51.22 48.64 55.06 63.65 54.83 40.83 83.69 74.18 85.44 79.01 67.92 80.67 53.28 54.31 57.99 60.25 58.05 34.12 95.26 89.41 106.63 83.90 83.21 75.88 58.09 54.10 57.26 67.79 56.72 34.51 91.31 80.10 97.17 78.26 77.23 82.16 65.17 55.56 59.97 75.42 59.51 38.84 93.18 91.74 93.80 101.36 79.60 83.25 64.49 54.04 62.03 70.43 49.78 35.72
Data Y:
101.26 101.08 100.00 98.02 96.76 97.84 107.03 110.09 110.45 110.09 107.03 107.21 106.49 106.13 105.23 103.24 102.16 102.52 111.89 113.33 113.15 110.27 107.21 107.57 106.85 106.31 104.50 103.42 103.24 103.24 111.71 112.79 111.71 105.95 101.98 100.36 101.08 98.92 95.86 94.77 92.07 89.91 100.00 101.80 97.66 94.95 91.89 92.61 93.15 91.53 88.83 88.29 84.50 86.13 95.14 96.22 93.33 91.17 90.45 92.97
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