# NOT RUN {
ht <- huxtable(paste(
rep("Some long text.", 20),
collapse = " "))
width(ht) <- 0.2
wrap(ht) <- TRUE
# }
# NOT RUN {
quick_html(ht)
# }
# NOT RUN {
jams2 <- set_wrap(jams,
TRUE)
wrap(jams2)
jams3 <- set_wrap(jams,
2:3, 1, TRUE)
wrap(jams3)
jams4 <- map_wrap(jams,
by_rows(
TRUE,
FALSE)
)
wrap(jams4)
# }
Run the code above in your browser using DataLab