如何使用带有utf-8编码的cat打印消息

Question

在主脚本中，我正在使用f从另一个脚本中读取source函数。此f函数使用cat打印带有波兰语变音符号的某些消息。问题在于，在评估功能时，这些变音符号未正确打印。我所有的来源都使用UTF-8编码保存。是否需要在某些选项中设置编码？还是可以直接在cat函数中完成？

cat_function.R包含如下功能：

f = function(){
  cat('This is a text with Polish letter: ąęźćó.')
}

我通过

阅读了cat_function.R

source('(dir)\\cat_function.R')
f()

其结果为：

  

这是一封带波兰字母的文字：ąęźćó。

我在Windows 7上工作。