Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
175 183 172 188 173 182 164 177 173 177 168 170 170 163 178 184 162 175 174 165 174 176 161 180 176 177 173 173 177 181 172 178 181 185 166 175 180 178 166 177 180 177 180 180 174 174 185 168 175 170
Data Y:
185 188 175 190 198 185 196 183 185 188 196 188 183 208 183 178 178 180 183 203 203 178 190 190 190 196 183 188 185 188 193 193 183 188 185 180 198 190 185 190 183 185 190 185 188 198 196 180 185 190
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
blue
grey
white
blue
red
black
brown
yellow
color right
(?)
red
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
par5 <- 'Mannen' par4 <- 'Vrouwen' par3 <- 'FALSE' par2 <- 'red' par1 <- 'blue' 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