Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
63 90 83 55 55 54 39 65 57 58 64 67 63 48 54 48 54 55 59 56 44 60 55 63 83 78 86 80
Data Y:
61 66 54 53 50 80 57 64 74 51 48 55 64 55 66 63 71 63 59 54 78 65 69 54 53 80 78 74 70 74
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
grey
white
blue
red
black
brown
yellow
color right
(?)
grey
white
blue
red
black
brown
yellow
print densities
(?)
TRUE
FALSE
Name of X series
Name of Y series
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
par5 <- 'Female' par4 <- 'Male' par3 <- 'FALSE' par2 <- 'blue' par1 <- 'red' 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