Make a short screening excerpt
Usage
make_screening_excerpt(text, max_chars = 900L)
Arguments
- text
Character scalar source text.
- max_chars
Maximum number of characters to keep.
Value
Character scalar excerpt.
Examples
long_text <- paste(rep("screening text", 100), collapse = " ")
make_screening_excerpt(long_text, max_chars = 60)
#> [1] "screening text screening text screening text screening text ..."