r - 奇怪的行为 Hmisc::upData 标记数据框

Question

当我想使用德语变音符号或上标等标记我的数据框的变量时...使用此代码一切正常：

library(dplyr)
library(Hmisc)

## with this code everthing works fine
# dataframe
colnamesiris <- c("a", "b", "c", "d")
iris_test <- iris %>% 
  select(2:5) %>% 
  setNames(colnamesiris)

# defining labels
df_test_labels <- c(
  a = "Fake1 [cm²]",
  b  = "Fake2 ä",
  c = "Fake3 Ö",
  d = "üüü³²³")

# assign labels to dataframe (iris_test)
iris_test <- Hmisc::upData(iris_test, labels = df_test_labels)
View(iris_test)

• 为了清理工作流程，我将此代码拆分为两个文件 1. analysis.R 并获取包含标签定义的第二个文件 2. df_test_labels.R（标签定义向量）。在这种情况下，标签看起来不合适。

1. 分析.R

library(dplyr)
library(Hmisc)

## with this code everthing works fine
# dataframe
colnamesiris <- c("a", "b", "c", "d")
iris_test <- iris %>% 
  select(2:5) %>% 
  setNames(colnamesiris)

# assign labels to dataframe (iris_test)

source("./df_test_labels.R") # vector for labels

iris_test <- Hmisc::upData(iris_test, labels = df_test_labels)
View(iris_test)

• 2. df_test_labels.R

# defining labels
df_test_labels <- c(
  a = "Fake1 [cm²]",
  b  = "Fake2 ä",
  c = "Fake3 Ö",
  d = "üüü³²³")

• 我发现只有在iris_test <- Hmisc::upData(iris_test, labels = df_test_labels)与变量标签的定义不在同一个脚本中时才会发生这种行为。有人可以解释为什么会这样吗？先感谢您。