我发现虽然我可以cat重音西班牙语字母：
> cat("** Retención Probabilidad Estimación ** \n")
** Retención Probabilidad Estimación **
由于某种原因，当我使用source来源包含cat的脚本时，这会中断：
> source("..//codigo//upn_notas.R")
***************************************************************************
** Retención Probabilidad Estimación **
***************************************************************************
起初我想通过改变我的系统区域来解决这个问题，但事实证明它不符合建议，因为它并不总是直截了当，可能会导致系统出现其他问题。
我不确定为什么source会破坏print或cat重音字符的能力，但有没有解决方法？