Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
3755.3 3001.4 3815.7 4034.4 3590.4 4176.4 3943.5 3934.2 3859.2 3300.5 3800.0 3958.7 3451.4 2678.6 3279.3 3550.3 3294.4 3202.2 3486.4 3139.7 3283.2 2933.6 3391.6 3301.3 3257.6 2537.0 2970.5 3481.9 3361.1 3123.2 3843.3 3153.0 3365.1 3528.5 3506.7 3146.6 3195.1 2424.0 2676.3 3174.6 3067.4 3121.2 3517.7 3014.7 2949.6 2990.3 3084.1 3077.9 3023.6 2226.2 2628.3 3088.7 2551.4 2856.7 3176.2 2663.1 2630.4 2584.4 2472.2 2895.6
Data Y:
3032.9 2630.8 2851.4 3029.7 2856.4 2899.2 2784.9 2764.2 2770.0 2335.6 2700.9 2941.0 2489.2 2378.3 2404.6 2661.4 2559.3 2431.0 2670.2 2333.8 2441.9 2215.9 2482.9 2520.4 2423.8 2262.3 2190.8 2606.3 2547.9 2281.4 2594.1 2174.8 2158.6 2282.5 2368.1 2316.1 2404.9 2025.7 1931.9 2376.5 2091.7 2232.5 2355.8 2066.1 2014.4 2330.4 2198.2 2287.0 2371.4 1872.4 1983.8 2285.6 1965.0 2213.0 2246.3 1889.4 1907.4 1955.1 1863.6 2161.5
Sample Range:
(leave blank to include all observations)
From:
To:
color left
(?)
grey
grey
white
blue
red
black
brown
yellow
color right
(?)
grey
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
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation