x <- 'The quick brown fox jumps over the lazy dog.'
cat(schunk(x,15),'\n')
x <- 'The word, honorificabilitudinita, occurs in Shakespeare\'s
play Love\'s Labour\'s Lost, and means "with honorablenesses".'cat(schunk(x,30),'\n')
## The word, honorificabilitudini-
## ta, occurs in Shakespeare's
## play Love's Labour's Lost, and
## means "with honorablenesses".Run the code above in your browser using DataLab