Added printsummary.R to test.