Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
2266 1878 2267 2069 1746 2299 2360 2214 2825 2355 2333 3016 2155 2172 2150 2533 2058 2160 2259 2498 2695 2799 2945 2930 2318 2540 2570 2669 2450 2842 3439 2677 2979 2257 2842 2546 2455 2293 2379 2478 2054 2272 2351 2271 2542 2304 2194 2722 2395 2146 1894 2548 2087 2063 2481 2476 2212 2834 2148 2598
Data Y:
715 638 656 606 498 587 677 547 871 731 752 862 619 700 667 667 650 547 637 655 703 886 896 831 741 833 750 779 655 739 845 795 1021 726 1045 915 852 772 729 755 691 729 702 702 894 765 753 876 781 776 606 775 663 649 821 771 635 1070 693 779
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