Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
100.00 111.86 94.12 67.79 146.04 125.66 142.87 130.03 110.01 132.79 88.24 91.97 96.65 97.15 90.73 52.53 156.91 144.88 169.43 133.38 131.28 116.33 89.15 85.08 89.39 103.09 85.35 45.99 152.82 130.37 150.50 126.97 123.24 126.57 100.26 91.76 100.28 121.65 97.29 62.55 154.99 147.85 147.40 156.80 126.81 131.76 99.21 87.35 100.76 110.57 76.46 56.51 124.95 118.29 136.43 128.62 100.74 111.75 93.43 83.33
Data Y:
100.00 96.67 91.06 89.04 82.91 84.05 91.76 90.10 85.98 99.82 70.90 83.87 99.21 92.81 95.35 89.66 86.77 88.26 101.23 88.26 96.32 100.44 74.85 88.08 100.61 102.10 98.95 89.40 92.90 92.29 104.12 92.99 95.79 102.72 81.07 91.32 98.60 107.27 99.30 87.64 97.02 98.86 96.23 102.80 95.62 101.58 84.14 87.47 102.37 101.40 87.12 82.65 79.75 81.68 90.36 82.47 80.46 90.01 72.39 78.09
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