Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
127 99 NA 98 120 118 121 NA 118 NA NA 111 107 NA 114 120 132 NA NA NA 129 NA 121 123 131 122 NA 103 NA 95 NA NA NA NA NA NA 139 106 106 NA NA NA NA 132 NA 102 96 134 NA 152 NA NA NA NA 112 140 132 NA 105 114 NA NA NA 122 NA NA NA NA 122 137 134 NA NA NA 128 NA 100 132 NA NA 114 NA 104 135 121 128 NA 92 NA 118 NA NA 112 75 NA 101 NA NA 103 NA 136 140 130 NA NA 102 NA 104 104 111 135 130 77 132 NA 136 110 120 126 NA 112 103 134 124
Data Y:
NA NA 126 NA NA NA NA 121 NA 53 121 NA NA 100 NA NA NA 107 117 110 NA 114 NA NA NA NA 118 NA 108 NA 116 131 106 132 124 114 NA NA NA 135 106 113 130 NA 124 NA NA NA 122 NA 115 116 141 137 NA NA NA 124 NA NA 112 113 137 NA 121 129 101 138 NA NA NA 106 135 109 NA 147 NA NA 138 114 NA 118 NA NA NA NA 140 NA 116 NA 109 139 NA NA 109 NA 124 117 NA 130 NA NA NA 118 139 NA 118 NA NA NA NA NA NA NA 128 NA NA NA NA 133 NA NA NA NA
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
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