my_data <- data.frame("Column Name 1" = c(1, 2, 3), "Column Name 2" = c(4, 5, 6))
rownames(my_data) <- c("Row Name 1", "Row Name 2", "Row Name 3")
fix_row_spaces(my_data)
# Returns a data frame with row names where spaces are replaced by underscores.
Run the code above in your browser using DataLab