我的 R 代碼中有一個導致無限回圈的錯誤。我想寫一個測驗來檢查我已經修復了這個錯誤。
foo <- function () {
while (TRUE) sleep(1) # oops!
}
# I want something like:
expect_completes_within(foo(), seconds = 10)
有沒有現成的解決方案?有沒有辦法在給定時間后中斷執行并拋出錯誤?
uj5u.com熱心網友回復:
R.utils::withTimeout(foo(), timeout = 10) # Stop foo() after 10 seconds.
已在此處找到解決方案,其中還提供了 base R 中的代碼。
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/424112.html
