Заменить данные в столбце, используя R

Question

В моем фрейме данных есть столбец с данными, подобными приведенным ниже:

RIsGreat
ILoveDataAnalysis
...
...

Ярлыки становятся очень длинными при печати с использованием ggplot. Пробовал использовать str_wrap, но это не помогает, потому что это метки из одного слова.

Пытался заменить RIsGreat на R Is Great, используя replace(x, "RIsGreat", "R Is Great). Это не работает.

Может кто-нибудь, пожалуйста, помогите.

Заранее спасибо.

Answer 1

library(snakecase)
library(dplyr)
Events <- c("RIsGreat", "ILoveDataAnalysis")

to_mixed_case(Events) %>% gsub("_"," ",.)

Answer 2

Вот регулярное выражение, которое просто вставляет пробел между буквой (в любом случае), за которой следует заглавная буква. Если у вас есть другие крайние случаи, можете изменить.

Events <- c("RIsGreat", "ILoveDataAnalysis")
gsub("([A-z])([A-Z])", "\\1 \\2", Events)
#> [1] "R Is Great"           "I Love Data Analysis"

Создано в 2018-05-01 пакетом Представить (v0.2.0).