Я создаю сетевой сюжет на некотором текстовом корпусе. Я создаю график, а затем использую igraph, ggraph для построения графика.
tmp %>%
group_by(word) %>%
filter(n() >= 10) %>%
pairwise_cor(word, chapter) %>%
filter(!is.na(correlation), + correlation > 0.7) %>%
graph_from_data_frame() %>%
ggraph(layout = 'fr') +
geom_edge_link(aes(edge_alpha = correlation, edge_colour = 'gold'),
show.legend = F ) +
geom_node_point(color = 'lightblue', size = 2) +
geom_node_text(aes(label = as.character( name)), repel = T, colour = 'blue', parse = T) +
theme_void()
Ошибка разбора (text = as.character (lab)):: 26: 5: неожиданный символ 25: 968 26 : 2594m
Итак, я попытался сделать это:
parse(text = '49efv')
Ошибка разбора (text = "49efv"):: 1: 6: неожиданный символ 1: 49efv ^
Проблема возникает ТОЛЬКО, когда строка начинается с цифры.
Есть идеи?