> data<-scan("~/scripts/chisq_bins")
Read 130 items
> data
  [1] 17 14 22 16 19 15 20 25 26 27 21 31 32 28 28 14 23 24 20 18 42 29 28 29 26
 [26] 28 26 23 21 24 12 16 24 16 20 16 17 15  9 13 15 14  7  9 16 22  8 10  3 11
 [51]  6  8 17 12  8 11  9  7  6 11  9 11  6 12 17  8  7  6 14 21 20 21 25 29 28
 [76] 31 32 30 32 22 26 30 22 32 31 24 32 36 37 21 16 28 25 22 29 18 16 20 13 21
[101] 22 15 14 19 14  8 11 10 14 10  7  7  7 11 16  6  8  9 18 15  5  5  8 11  6
[126] 10  6  6 10  9
> m <-matrix(data, 2, byrow=T)
> m
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13] [,14]
[1,]   17   14   22   16   19   15   20   25   26    27    21    31    32    28
[2,]    8    7    6   14   21   20   21   25   29    28    31    32    30    32
     [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26]
[1,]    28    14    23    24    20    18    42    29    28    29    26    28
[2,]    22    26    30    22    32    31    24    32    36    37    21    16
     [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [,37] [,38]
[1,]    26    23    21    24    12    16    24    16    20    16    17    15
[2,]    28    25    22    29    18    16    20    13    21    22    15    14
     [,39] [,40] [,41] [,42] [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50]
[1,]     9    13    15    14     7     9    16    22     8    10     3    11
[2,]    19    14     8    11    10    14    10     7     7     7    11    16
     [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [,59] [,60] [,61] [,62]
[1,]     6     8    17    12     8    11     9     7     6    11     9    11
[2,]     6     8     9    18    15     5     5     8    11     6    10     6
     [,63] [,64] [,65]
[1,]     6    12    17
[2,]     6    10     9
> chisq.test(m) 

        Pearson's Chi-squared test

data:  m 
X-squared = 83.4858, df = 64, p-value = 0.05146