1#' Uppercase a string.
2#'
3#' Return a copy of the string with all the cased characters converted to uppercase.
4#'
5#' @param str A character vector.
6#'
7#' @return A character vector.
8#'
9#' @references \url{https://docs.python.org/3/library/stdtypes.html#str.upper}
10#'
11#' @seealso \code{\link{pystr_lower}}
12#'
13#' @examples
14#' pystr_upper("uppercase me!")
15#'
16#' @export
17pystr_upper <- function(str) {
18  return(vapply(str, toupper, character(1), USE.NAMES = FALSE))
19}
20