Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
100.00 94.97 107.50 124.27 107.06 79.71 163.41 144.83 166.82 154.26 132.60 157.51 104.02 106.03 113.23 117.64 113.34 66.62 185.99 174.57 208.19 163.81 162.46 148.16 113.41 105.63 111.79 132.36 110.75 67.37 178.29 156.38 189.71 152.80 150.80 160.40 127.25 108.47 117.09 147.25 116.19 75.83 181.94 179.12 183.15 197.90 155.42 162.54 125.90 105.50 121.11 137.51 97.20 69.74 152.58 146.59 161.16 152.84 121.95 140.12
Data Y:
100.00 110.76 130.55 126.20 118.88 116.25 108.24 109.73 119.79 117.62 112.24 130.32 92.56 109.50 129.52 121.17 124.49 117.05 113.27 115.22 132.15 115.22 125.74 131.12 97.71 114.99 131.35 133.30 129.18 116.70 121.28 120.48 135.93 121.40 125.06 134.10 105.84 119.22 128.72 140.05 129.63 114.42 126.66 129.06 125.63 134.21 124.83 132.61 109.84 114.19 133.64 132.38 113.73 107.89 104.12 106.64 117.96 107.67 105.03 117.51
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