我正在为不同国家/地区制作图表,在这些国家/地区我使用 geom_label_repel 手动添加文本。我在更改该文本中的边框颜色时遇到问题(我希望它的颜色与文本不同)。这是一个可重现的示例:
\n\n#Create dataframe \ncountries <- c("Mundo", "Argentina", "Brasil", "Chile", "Colombia", "Mexico", "Per\xc3\xba", "Estados Unidos")\ncountries <- rep(countries, 120)\nvaccinations <- data.frame(countries)\nvaccinations$countries <- factor(vaccinations$countries , levels = c("Mundo", "Argentina", "Brasil", "Chile",\n "Colombia", "Mexico", "Per\xc3\xba", "Estados Unidos"))\nvaccinations <- vaccinations %>%\n group_by(countries) %>%\n mutate(month = 1:120,\n vaccines = runif(120, min = 0, max = 5))\n\n#Write text to add manually in each country\nsaved_text <- data.frame(\n label_pais = c("10.10 per 100", "11.76 per 100", "12.58 per 100", "62.94 per 100", \n "5.98 per 100", …Run Code Online (Sandbox Code Playgroud)