R ggplot2 在传说中给出了口音

Question

我创建了一个函数来在折线图中绘制每个城市的一些数据。我希望用户能够更改图例中每个城市的标签。

一个简化的例子:

example_plot <- function(plot_labs = c("Anvers", "Liège")){

graphics.off()

input <- data.table(x_axis = c(1, 2, 3, 4, 5, 1, 2, 3, 4, 5), 
                y_axis = c(5, 6, 4, 2, 8, 9, 3, 1, 7, 5),
                City = c("Anvers", "Anvers", "Anvers", "Anvers", "Anvers", 
                         "Liege", "Liege", "Liege", "Liege", "Liege"))

ggplot(data = input, aes(x = x_axis, y = y_axis, group = City, lty = City)) + 
geom_line() + scale_linetype_manual(labels = plot_labs, breaks = c("Anvers", 
"Liege"), values = 1:2)
}

我的问题:

当我将函数保存为“example_plot.R”，然后在命令提示符下不带参数调用它时，“Liège”中的重音 无法正确显示 :

example_plot()

如果我用 plot_labs 参数调用函数，它 正确显示 :

example_plot(plot_labs = c("Anvers", "Liège"))

我发现更奇怪的是，如果我在命令提示符中复制粘贴函数的代码(而不是 'source(example_plot.R")')，那么一切正常。

知道为什么在保存函数时它的行为会有所不同吗？

Answer 1

您可能将源文件保存为 UTF-8 等编码，然后假设它是 Latin-1 格式，然后重新打开或获取源文件。

如果您使用的是 RStudio，请检查菜单点 File/Save with encoding 和 File/reopen with encoding，并确保字符编码匹配。