INIT: barplot
ADD: plot sub data, and find interesting math definition sum(c(NA,NA), na.rm=T) yields zero