使用R的exams2canvas生成QTI文件导入Canvas失败求助

我正在使用R语言的exams包，通过exams2canvas函数为Canvas平台制作测验题，目标是创建一道简答题，要求学生比较并解释ggplot2生成的箱线图与直方图（基于数据集中随机选取的4个变量）的差异。

我曾成功将官方简答题模板的题目导入Canvas题库，但修改模板适配自身需求后，虽然能正常生成QTI压缩包，导入Canvas后题库中却看不到题目。

我的操作流程如下：

• 使用exams包创建测验题目；
• 通过exams2canvas导出为QTI压缩文件；
• 按标准流程将压缩包导入Canvas。

怀疑问题可能和QTI1.2/QTI2.1版本有关，有没有人遇到过类似问题？求解决建议。

更新：仍出现问题的Rmarkdown代码 #

library(palmerpenguins)
library(tidyverse)
library(ggplot2)
library(patchwork)

x <- "bill_depth_mm"

df <- penguins |> select(all_of(x), species)

题目 #

palmerpenguins R包包含南极洲帕尔默群岛三个岛屿上观测到的三种企鹅（Adelie、Chinstrap和Gentoo）的体型测量数据。该数据集包含r ncol(penguins)个变量（样本量n=r nrow(penguins)）。数据集概览如下：

glimpse(penguins)

使用R语言的ggplot2包，以下代码生成两幅图：按物种划分的r names(df)[1]的直方图，以及r names(df)[1]的箱线图。

# Histogram example: flipper length by species
p1 <- df |> ggplot(aes_string(x)) + 
  geom_histogram(aes(fill = species), alpha = 0.5, position = "identity") +
  labs(x= names(df)[1]) +
  scale_fill_manual(values = c("darkorange","darkorchid","cyan4"))

## boxplot
p2 <- df |> ggplot(aes(x = species, y = df[[1]])) + 
  geom_boxplot(aes(fill = species), 
               alpha = 0.7, 
               show.legend = FALSE) +
  labs(y= names(df)[1]) +
  scale_fill_manual(values = c("darkorange", "darkorchid", "cyan4"))

p1 + p2

请解释两幅图在展示不同企鹅物种r names(df)[1]分布信息上的差异，并判断该特征能否有效区分不同企鹅物种？

参考答案 #

箱线图和直方图的合理描述各得0.5分，解释部分得1分。

元信息 #

exname: quiz1_graphical1
extype: string
exstringtype: essay
exsolution: nil
expoints: 2

内容的提问来源于stack exchange，提问作者Jaslene Lin