Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
-22 -20 -17 -21 -16 -11 -19 -31 -36 -33 -26 -38 -27 -21 -17 -14 -16 -16 -15 -7 -9 2 -6 0 7 4 -5 2 0 3 10 4 5 7 1 -8 -3 -16 -22 -32 -30 -32 -38 -41 -46 -58 -55 -48 -58 -58 -68 -75 -77 -75 -71 -63 -61 -53 -41 -35 -33
Data Y:
46 50 49 48 50 47 50 49 51 52 48 55 56 43 44 50 49 47 46 50 49 53 54 56 56 58 53 51 52 53 56 54 54 56 59 62 62 73 76 80 77 81 80 80 81 80 77 71 71 64 64 47 41 35 34 33 23 16 16 8 9
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
grey
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
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