Extract the UIDs (or SQUIDs) from a vector

Usage

extract_uids(x, returnSQUIDs = FALSE)

Arguments

x: The vector
returnSQUIDs: WHether to return the UIDs or the SQUIDs.

Value

A vector with (SQ)UIDs

Examples

exampleText <- c(
  "Lorem ipsum dolor sit amet, consectetur",
  "adipiscing elit. Nunc non commodo ex,",
  "ac varius mi. Praesent feugiat nunc",
  "eget urna euismod lobortis. Sed",
  "hendrerit suscipit nisl, ac tempus",
  "magna porta et. Quisque libero massa,",
  "tempus vel tristique lacinia, tristique",
  "in nulla. Nam cursus enim dui, non",
  "ornare est tempor eu. Vivamus et massa",
  "consectetur, tristique magna eget,",
  "viverra elit."
);

withUIDs <-
  rock::prepend_ids_to_source(
    exampleText
  );

rock::extract_uids(
  withUIDs
);
#>  [1] "[[uid=7zz4g2d2]]" "[[uid=7zz4g2d3]]" "[[uid=7zz4g2d4]]" "[[uid=7zz4g2d5]]"
#>  [5] "[[uid=7zz4g2d6]]" "[[uid=7zz4g2d7]]" "[[uid=7zz4g2d8]]" "[[uid=7zz4g2d9]]"
#>  [9] "[[uid=7zz4g2db]]" "[[uid=7zz4g2dc]]" "[[uid=7zz4g2dd]]"