Skip to contents

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  ..."