```r ht <- htable(mtcars) # all of these would work and do the same thing: ht$col_bold(1) ht$col_bold("mpg") ht$col_bold(mpg) # add this option ```