Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
106.9 107.1 99.3 99.2 108.3 105.6 99.5 107.4 93.1 88.1 110.7 113.1 99.6 93.6 98.6 99.6 114.3 107.8 101.2 112.5 100.5 93.9 116.2 112.0 106.4 95.7 96.0 95.8 103.0 102.2 98.4 111.4 86.6 91.3 107.9 101.8 104.4 93.4 100.1 98.5 112.9 101.4 107.1 110.8 90.3 95.5 111.4 113.0 107.5 95.9 106.3 105.2 117.2 106.9 108.2 113.0 97.2 100.2 109.7 119.1
Data Y:
93.9 89.8 93.4 101.5 110.4 105.9 108.4 113.9 86.1 69.4 101.2 100.5 98.0 106.6 90.1 96.9 125.9 112.0 100.0 123.9 79.8 83.4 113.6 112.9 104.0 109.9 99.0 106.3 128.9 111.1 102.9 130.0 87.0 87.5 117.6 103.4 110.8 112.6 102.5 112.4 135.6 105.1 127.7 137.0 91.0 90.5 122.4 123.3 124.3 120.0 118.1 119.0 142.7 123.6 129.6 151.6 110.4 99.3 129.1 134.1
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