r-使用qwraps2包时出错:输入字符串6是无效的UTF-8



我在R studio中使用rmarkdown。我正在尝试创建data.frame中变量的描述性汇总表。我可以编织整个文件,它将使用该表生成一个可工作的PDF。但当我运行这个区块时,它给了我一个错误:

sub中的错误(re,",x,perl=TRUE(:输入字符串6是无效的UTF-8

每当我直接调用我构建的汇总表时,它就会出现。每当我打电话给";summary_table;或";描述性表格它给了我所说的错误。我不知道该怎么办!奇怪的是,它能够毫无问题地将整个rmarkdown文件编织成pdf。

(chunk starts here)
``{r, results='asis', echo = F}
library(qwraps2)

Considered_Variables <- data.frame(female, age, attractive_important, sincere_important, intellicence_important, funny_important, ambtition_important, shared_interests_important,decision,match)
descriptive_analysis <- list("Female" =
list("Minimum value" =~ min(female),
"Maximum Value" =~ max(female),
"Median" =~median(female),
"Standard deviation" =~ sd(female),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(female)),
"Age" =
list("Minimum Value" =~ min(age),
"Maximum Value" =~ max(age),
"Median" =~median(age),
"Standard deviation" = ~ sd(age),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(age)),
"Importance given to attractiveness" =
list("Minimum Value" =~ min(attractive_important),
"Maximum Value" =~ max(attractive_important),
"Median" =~median(attractive_important),
"Standard deviation" = ~ sd(attractive_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(attractive_important)),
"Importance given to attractiveness" =
list("Minimum Value" =~ min(sincere_important),
"Maximum Value" =~ max(sincere_important),
"Median" =~median(sincere_important),
"Standard deviation" = ~ sd(sincere_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(sincere_important)),
"Importance given to intelligence" =
list("Minimum Value" =~ min(intellicence_important),
"Maximum Value" =~ max(intellicence_important),
"Median" =~median(intellicence_important),
"Standard deviation" = ~ sd(intellicence_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(intellicence_important)),
"Importance given to funny traits" =
list("Minimum Value" =~ min(funny_important),
"Maximum Value" =~ max(funny_important),
"Median" =~median(funny_important),
"Standard deviation" = ~ sd(funny_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(funny_important)),
"Importance given to professional ambition" =
list("Minimum Value" =~ min(ambtition_important),
"Maximum Value" =~ max(ambtition_important),
"Median" =~median(ambtition_important),
"Standard deviation" = ~ sd(ambtition_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(ambtition_important)),
"Importance given to shared interests" =
list("Minimum Value" =~ min(shared_interests_important),
"Maximum Value" =~ max(shared_interests_important),
"Median" =~median(shared_interests_important),
"Standard deviation" = ~ sd(shared_interests_important),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(shared_interests_important)),
"Decision" =
list("Minimum Value" =~ min(decision),
"Maximum Value" =~ max(decision),
"Median" =~median(decision),
"Standard deviation" = ~ sd(decision),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(decision)),
"Match" =
list("Minimum Value" =~ min(match),
"Maximum Value" =~ max(match),
"Median" =~median(match),
"Standard deviation" = ~ sd(match),
"Mean ± Standard deviation" = ~ qwraps2::mean_sd(match)))
orig_opt <- options()$qwraps2_markup
options(qwraps2_markup = "markdown")

descriptive_table <- summary_table(Considered_Variables, descriptive_analysis )
print(descriptive_table,
caption = " Descriptive Table",
rtitle = "Variables",
cnames = c("Values"))
``
(chunk ends here)

屏幕截图是生成的PDF,正如你所看到的,在最终结果中没有问题

我是这个网站/社区的一个角落,所以如果我错过了任何关键信息来让这个问题更清楚,请告诉我。

非常感谢!

答案很简单,似乎不支持±符号,它导致了错误消息。虽然它并没有妨碍文件的正确编织和在markdown中生成清晰的PDF,但当块运行时,它确实显示为一个错误。

最新更新