R更新JSON时data.table触发join报错的原因与解决方案
报错触发原因
这个错误和你要更新的JSON对象完全无关,是data.table的自定义索引语法和base R data.frame不兼容导致的:
- 对于base R的
data.frame,df[colname]的行为是选择名为colname的列,返回单列的data.frame - 对于
data.table,dt[i,j,by]的三个核心参数位置是固定的,你写lab_updates[fq]时,fq被识别为第一个位置的行筛选参数i,当i是字符向量时,data.table默认你要进行表连接操作,要求你指定连接键on参数,不符合条件就直接抛出错误,而非警告。
你把data.table转为data.frame后,索引逻辑回归base R的默认行为,所以代码可以正常运行。
无需转data.frame的解决方案
修改你循环内的取值语法即可,推荐以下两种写法,都可以兼容data.table的语法规则:
方案1:用[[直接提取列向量(最简洁)
直接替换你循环内的两行取值逻辑:
# 嵌套字段赋值 new_content_i$questionnaireAnswers[fq][[1]][[1]]$value <- lab_updates[[fq]][i] # 核心字段赋值 new_content_i[fc][[1]] <- lab_updates[[fc]][i]
[[是S3通用方法,对data.table和data.frame的行为一致,都是直接提取对应列的向量,不会触发索引逻辑冲突。
方案2:显式指定data.table的列选择参数
如果要保留[的写法,需要显式声明你选择的是列参数j,并关闭列名非标准求值:
# 嵌套字段赋值 new_content_i$questionnaireAnswers[fq][[1]][[1]]$value <- lab_updates[, get(fq)][i] # 或者 new_content_i$questionnaireAnswers[fq][[1]][[1]]$value <- lab_updates[, ..fq][[1]][i]
另外补充你代码里的一个小语法问题:你定义coreFields时用了括号包裹向量元素,应该改为c()包裹,否则会直接报错:
# 修正前 coreFields <- ("personId", "id", "outbreakId", ...) # 修正后 coreFields <- c("personId", "id", "outbreakId", ...)
内容的提问来源于stack exchange,提问作者Amy M
相关产品推荐
相关产品推荐

