You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

R中Sys.getenv('SLURM_ARRAY_TASK_ID')返回NA的报错问题咨询

R脚本运行报错:SLURM_ARRAY_TASK_ID获取值为NA导致计算失败

运行的R代码

cur_dir<-"C:/Users/child/Dropbox/Proteogenomics_analysis/Proteome and Phosphoproteome Data     Normalization/Experiment_data_20230222_Metabric_multistate_analysis"
setwd(cur_dir)
library(mstate)
library(brcarepred)

id <- as.numeric(Sys.getenv("SLURM_ARRAY_TASK_ID"))
print(id)
load("./Models/FourGroupsM.RData")
timepoints <- seq(from=0, to=20, by=0.25)
pt <- list()
newdata.DR <- newdata
newdata.DR$AGE.DR[which(newdata.DR$strata %in% seq(from=9,by=9, length=4))] <- newdata.DR$AGE.DR[which(newdata.DR$strata %in% seq(from=9,by=9, length=4))] + newdata.DR$TLastSurgery[which(newdata.DR$strata %in% seq(from=8, by=9, length=4))]
pt[['DR']] <- getProbsDR(m, group=id, newdata.DR, timepoints=timepoints)

报错信息

pt[['DR']] <- getProbsDR(m, group=id, newdata.DR, timepoints=timepoints)
Error in group:(group + 8) : NA/NaN argument

排查结果

执行id <- as.numeric(Sys.getenv("SLURM_ARRAY_TASK_ID"))后,输出结果为NA:

id <- as.numeric(Sys.getenv("SLURM_ARRAY_TASK_ID"))
print(id)
[1] NA

疑问

  • 不理解Sys.getenv("SLURM_ARRAY_TASK_ID")语句的作用是什么?
  • 运行该脚本前需要创建什么文件?请提供示例说明。

内容的提问来源于stack exchange,提问作者김태훈

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.07.28 11:52:20