> print(paste("Sum AA Sum BB Sum CC Sum DD CC/AA DD/AA"))
[1] "Sum AA Sum BB Sum CC Sum DD CC/AA DD/AA"
> c(sum(aa$n1), sum(bb$n1), sum(cc$n1), sum(dd$n1), round(sum(cc$
	n1)/sum(aa$n1), 2), round(sum(dd$n1)/sum(aa$n1), 2))
[1] 5026.00 5026.00 4321.00 5536.00    0.86    1.10
> c(sum(aa$n2), sum(bb$n2), sum(cc$n2), sum(dd$n2), round(sum(cc$
	n2)/sum(aa$n2), 2), round(sum(dd$n2)/sum(aa$n2), 2))
[1] 10805.00 10805.00  9515.00 11674.00     0.88     1.08
> c(sum(aa$n3), sum(bb$n3), sum(cc$n3), sum(dd$n3), round(sum(cc$
	n3)/sum(aa$n3), 2), round(sum(dd$n3)/sum(aa$n3), 2))
[1] 12710.00 12710.00 12627.00 13431.00     0.99     1.06
> c(sum(aa$n4), sum(bb$n4), sum(cc$n4), sum(dd$n4), round(sum(cc$
	n4)/sum(aa$n4), 2), round(sum(dd$n4)/sum(aa$n4), 2))
[1] 15466.00 15466.00 15813.00 16056.00     1.02     1.04
> c(sum(aa$n5), sum(bb$n5), sum(cc$n5), sum(dd$n5), round(sum(cc$
	n5)/sum(aa$n5), 2), round(sum(dd$n5)/sum(aa$n5), 2))
[1] 11939.00 11939.00 11745.00 11894.00     0.98     1.00
> c(sum(aa$n6), sum(bb$n6), sum(cc$n6), sum(dd$n6), round(sum(cc$
	n6)/sum(aa$n6), 2), round(sum(dd$n6)/sum(aa$n6), 2))
[1] 15637.00 15637.00 14943.00 14698.00     0.96     0.94
> c(sum(aa$n7), sum(bb$n7), sum(cc$n7), sum(dd$n7), round(sum(cc$
	n7)/sum(aa$n7), 2), round(sum(dd$n7)/sum(aa$n7), 2))
[1] 13681.00 13681.00 13842.00 13427.00     1.01     0.98
> c(sum(aa$n8), sum(bb$n8), sum(cc$n8), sum(dd$n8), round(sum(cc$
	n8)/sum(aa$n8), 2), round(sum(dd$n8)/sum(aa$n8), 2))
[1] 6616.00 6616.00 7036.00 6837.00    1.06    1.03
> c(sum(aa$n9), sum(bb$n9), sum(cc$n9), sum(dd$n9), round(sum(cc$
	n9)/sum(aa$n9), 2), round(sum(dd$n9)/sum(aa$n9), 2))
[1] 3265.00 3265.00 3464.00 3403.00    1.06    1.04
> c(sum(aa$n10), sum(bb$n10), sum(cc$n10), sum(dd$n10), round(
	sum(cc$n10)/sum(aa$n10), 2), round(sum(dd$n10)/sum(aa$
	n10), 2))
[1] 2369.00 2369.00 2359.00 2244.00    1.00    0.95
> c(sum(aa$n11), sum(bb$n11), sum(cc$n11), sum(dd$n11), round(
	sum(cc$n11)/sum(aa$n11), 2), round(sum(dd$n11)/sum(aa$
	n11), 2))
[1] 2381.00 2381.00 2549.00 2298.00    1.07    0.97
> c(sum(aa$n12), sum(bb$n12), sum(cc$n12), sum(dd$n12), round(
	sum(cc$n12)/sum(aa$n12), 2), round(sum(dd$n12)/sum(aa$
	n12), 2))
[1] 676.00 676.00 793.00 699.00   1.17   1.03
> c(sum(aa$n13), sum(bb$n13), sum(cc$n13), sum(dd$n13), round(
	sum(cc$n13)/sum(aa$n13), 2), round(sum(dd$n13)/sum(aa$
	n13), 2))
[1] 190.00 190.00 190.00 149.00   1.00   0.78
> c(sum(aa$n14), sum(bb$n14), sum(cc$n14), sum(dd$n14), round(
	sum(cc$n14)/sum(aa$n14), 2), round(sum(dd$n14)/sum(aa$
	n14), 2))
[1] 85.00 85.00 91.00 65.00  1.07  0.76
> c(sum(aa$n15), sum(bb$n15), sum(cc$n15), sum(dd$n15), round(
	sum(cc$n15)/sum(aa$n15), 2), round(sum(dd$n15)/sum(aa$
	n15), 2))
[1] 45.00 45.00 35.00 27.00  0.78  0.60
> c(sum(aa$n16), sum(bb$n16), sum(cc$n16), sum(dd$n16), round(
	sum(cc$n16)/sum(aa$n16), 2), round(sum(dd$n16)/sum(aa$
	n16), 2))
[1] 19.00 19.00  8.00 16.00  0.42  0.84
> c(sum(aa$n17), sum(bb$n17), sum(cc$n17), sum(dd$n17), round(
	sum(cc$n17)/sum(aa$n17), 2), round(sum(dd$n17)/sum(aa$
	n17), 2))
[1] 4.00 4.00 2.00 3.00 0.50 0.75
> c(sum(aa$n18), sum(bb$n18), sum(cc$n18), sum(dd$n18), round(
	sum(cc$n18)/sum(aa$n18), 2), round(sum(dd$n18)/sum(aa$
	n18), 2))
[1] 2.0 2.0 1.0 3.0 0.5 1.5
> c(sum(aa$n19), sum(bb$n19), sum(cc$n19), sum(dd$n19), round(
	sum(cc$n19)/sum(aa$n19), 2), round(sum(dd$n19)/sum(aa$
	n19), 2))
[1]  0  0  0  0 NA NA
> c(sum(aa$n20), sum(bb$n20), sum(cc$n20), sum(dd$n20), round(
	sum(cc$n20)/sum(aa$n20), 2), round(sum(dd$n20)/sum(aa$
	n20), 2))
[1]  0  0  0  0 NA NA