R: summary() uses internal .print.header()

To avoid code duplication.