# NOT RUN {
orig <- font_size(jams)
font_size(jams) <- 14
font_size(jams)
font_size(jams) <- orig
jams2 <- set_font_size(jams,
14)
font_size(jams2)
jams3 <- set_font_size(jams,
2:3, 1, 14)
font_size(jams3)
jams4 <- map_font_size(jams,
by_rows(
14,
12)
)
font_size(jams4)
# }
Run the code above in your browser using DataLab