library(ggplot2)
df <- read.csv("http://dl.dropbox.com/u/361076/maxprocs_compare.csv")
breaks <- seq(-40, 40)

Difference in max procs from current values to new generated values.

summary(df$new_maxprocs - df$current_maxprocs)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##     -31      -3      -2      -2      -1      24 
ggplot(df, aes(x = new_maxprocs - current_maxprocs)) + geom_histogram(binwidth = 1, 
    aes(fill = ..count..), breaks = breaks)

plot of chunk unnamed-chunk-2

Difference in max procs from current values to new generated values with shared apc.

summary(df$shared_maxprocs - df$current_maxprocs)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##  -29.00   -1.00    1.00    0.98    2.00   48.00 
ggplot(df, aes(x = shared_maxprocs - current_maxprocs)) + geom_histogram(binwidth = 1, 
    aes(fill = ..count..), breaks = breaks)

plot of chunk unnamed-chunk-3

Difference in max procs from new generated values without shared apc to with shared apc.

summary(df$shared_maxprocs - df$new_maxprocs)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   -1.00    1.00    3.00    2.98    3.00   33.00 
ggplot(df, aes(x = shared_maxprocs - new_maxprocs)) + geom_histogram(binwidth = 1, 
    aes(fill = ..count..), breaks = breaks)

plot of chunk unnamed-chunk-4