2017/05/06 updated by Stone.Hou Back to My Github Home Page
all_wars_matrix
non_us_all <- all_wars_matrix[,2]
mean(non_us_all)
non_us_some <- non_us_all[1:2]
mean(non_us_some)