Collapse continuous integer runs to strings of ranges

by

I think diff is the solution. You might need some additional fiddling to deal with the singletons, but:

lapply(z, function(x) {
  diffs <- c(1, diff(x))
  start_indexes <- c(1, which(diffs > 1))
  end_indexes <- c(start_indexes - 1, length(x))
  coloned <- paste(x[start_indexes], x[end_indexes], sep=":")
  paste0(coloned, collapse=", ")
})

$greg
[1] "7:11, 20:24, 30:33, 49:49"

$researcher
[1] "42:48"

$sally
[1] "25:29, 37:41"

$sam
[1] "1:6, 16:19, 34:36"

$teacher
[1] "12:15"

More Related Contents:

  1. Merge overlapping ranges into unique groups, in dataframe
  2. Controlling number of decimal digits in print output in R
  3. Using regex in R to find strings as whole words (but not strings as part of words)
  4. Convert column with pipe delimited data into dummy variables [duplicate]
  5. Displaying text below the plot generated by ggplot2
  6. Error: ‘\R’ is an unrecognized escape in character string starting “C:\R”
  7. Convert comma separated string to numeric columns
  8. Order Stacked Bar Graph in ggplot [duplicate]
  9. ggplot2 change axis limits for each individual facet panel
  10. Load multiple packages at once
  11. Printing multiple ggplots into a single pdf, multiple plots per page
  12. ignore NA in dplyr row sum
  13. Multiline Comment Workarounds?
  14. How do I change the background color of a plot made with ggplot2
  15. Can I get.seed() somehow?
  16. How to reorder data.table columns (without copying)
  17. How to add multiple columns to a data.frame in one go?
  18. How to change the figure caption format in bookdown
  19. data.frame Group By column [duplicate]
  20. How do I change the number of decimal places on axis labels in ggplot2?
  21. What is difference between dataframe and list in R?
  22. R – How to make a click on webpage using rvest or rcurl
  23. How to load data quickly into R?
  24. Sum of two Columns of Data Frame with NA Values
  25. Extract the coefficients for the best tuning parameters of a glmnet model in caret
  26. R divide data into groups
  27. Convert all data frame character columns to factors
  28. Reading text file with multiple space as delimiter in R
  29. How to pass column name as argument to function for dplyr verbs?
  30. How to use data.table within functions and loops?

Leave a Comment