Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
139.72 139.91 139.97 139.98 140.03 140.03 140.26 142.15 143.54 144.5 145.65 146.47 147.36 147.89 149.23 149.93 150.24 150.15 150.31 150.31 150.37 107.59 107.59 107.59 107.59 107.59 107.58 108.28 109.71 110.21 110.27 110.32 110.33 110.33 113.38 119.37 123.37 123.75 124.13 124.59 124.59 124.68 124.7 124.7 124.7 124.7 124.71 125.55 127.41 127.73 127.8 127.91 127.94 128.01 128.01 128.01 128.01 128.01 128.86 124.74
Data Y:
69.4 57.2 68 53.3 47.9 60.8 61.7 57.8 51.4 50.5 48.1 58.7 54 56.1 60.4 51.2 50.7 56.4 53.3 52.6 47.7 49.5 48.5 55.3 49.8 57.4 64.6 53 41.5 55.9 58.4 53.5 50.6 58.5 49.1 61.1 52.3 58.4 65.5 61.7 45.1 52.1 59.3 57.9 45 64.9 63.8 69.4 71.1 62.9 73.5 62.7 51.9 73.3 66.7 62.5 70.3 66.1 59.6 66.3
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