code來自於某篇paper(2013年),但不知道為什麼會卡在下列的code
if (hessian == FALSE) hes <- " -nohess" else hes <- ""
shell(paste(file.name, ".exe -nox",hes,sep=""),invisible=TRUE)
p1 <- c(na.omit(as.numeric(scan(paste(file.name,".par",sep=""),what="")[-(1:16)])))
軟體版本
R-4.1.0-win
RStudio-1.4.1717
rtools40v2-x86_64
"收捲時發生錯誤"問題
在重跑一次function就消失了
"錯誤發生在 file(file, "r"):無法開啟連接"
這部分不知道怎麼處理,有考慮過system2 和設定 Git Bash
也有嚐試直接設定完整路徑
有其他建議嗎? 謝謝
補充:
這段程式是function內的部分
我將function拆開來重跑也是出現相同問題
我有找到R指令下的shell能讀取.exe檔
但我不確定shell有沒有輸出的功能
確實是缺少exe檔...