Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
3755.3 3001.4 3815.7 4034.4 3590.4 4176.4 3943.5 3934.2 3859.2 3300.5 3800.0 3958.7 3451.4 2678.6 3279.3 3550.3 3294.4 3202.2 3486.4 3139.7 3283.2 2933.6 3391.6 3301.3 3257.6 2537.0 2970.5 3481.9 3361.1 3123.2 3843.3 3153.0 3365.1 3528.5 3506.7 3146.6 3195.1 2424.0 2676.3 3174.6 3067.4 3121.2 3517.7 3014.7 2949.6 2990.3 3084.1 3077.9 3023.6 2226.2 2628.3 3088.7 2551.4 2856.7 3176.2 2663.1 2630.4 2584.4 2472.2 2895.6
Data Y:
236.1 194.7 194.8 219.3 209.1 208.8 206.4 220.3 206.3 156.0 195.9 199.0 198.0 190.6 169.5 212.3 173.8 231.5 206.0 181.5 181.4 168.3 188.7 206.4 179.4 158.6 138.9 185.4 163.4 136.5 187.8 146.2 137.5 155.0 177.6 155.9 173.2 153.1 134.8 182.0 140.6 151.8 169.1 145.8 143.6 146.0 170.7 154.1 164.7 135.5 129.5 165.9 129.3 137.7 157.5 124.5 125.3 117.1 121.4 143.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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation