Code Monkey home page Code Monkey logo

Comments (7)

smjenness avatar smjenness commented on July 20, 2024 1

@clchand23 : this is now merged in and you can update EpiModelHPC with remotes::install_github("EpiModel/EpiModelHPC@main")

from epimodelhpc.

sgoodreau avatar sgoodreau commented on July 20, 2024

@AdrienLeGuillou Do you think this may be the same underlying issue that is in #40 ?

from epimodelhpc.

AdrienLeGuillou avatar AdrienLeGuillou commented on July 20, 2024

@sgoodreau yes, I am pretty sure it is. I'll look into it today

from epimodelhpc.

AdrienLeGuillou avatar AdrienLeGuillou commented on July 20, 2024

Actually it may be different issue.
@clchand23 can you point me to the code that produced that error? I cannot replicate it on my projects

from epimodelhpc.

clchand23 avatar clchand23 commented on July 20, 2024

Hi @AdrienLeGuillou - it is showing an error with the signalConditions() function. Namely, the first time it says stop(condition) below.

Error in names(z[[other.x[j]]]) <- newnames : 
  attempt to set an attribute on NULL
Called from: signalConditions(obj, exclude = getOption("future.relay.immediate", 
    "immediateCondition"), resignal = resignal, ...)
function (future, include = "condition", exclude = NULL, resignal = TRUE, 
  ...) 
{
  if (!future$state %in% c("finished", "failed")) {
    stop(FutureError(sprintf("Internal error: Cannot resignal future conditions. %s has not yet been resolved (state = %s)", 
      class(future)[1], paste(sQuote(future$state), collapse = ", ")), 
      future = future))
  }
  if (length(include) == 0L) 
    return(invisible(future))
  result <- result(future)
  stop_if_not(inherits(result, "FutureResult"))
  conditions <- result$conditions
  if (length(conditions) == 0) 
    return(invisible(future))
  debug <- getOption("future.debug", FALSE)
  if (debug) {
    mdebug("signalConditions() ...")
    mdebug(" - include = ", paste(sQuote(include), collapse = ", "))
    mdebug(" - exclude = ", paste(sQuote(exclude), collapse = ", "))
    mdebug(" - resignal = ", resignal)
    mdebug(" - Number of conditions: ", length(conditions))
    on.exit(mdebug("signalConditions() ... done"))
  }
  signaled <- logical(length(conditions))
  for (kk in seq_along(conditions)) {
    cond <- conditions[[kk]]
    if (!resignal && !is.null(cond$signaled) && cond$signaled > 
      0L) 
      next
    condition <- cond$condition
    if (length(exclude) > 0L && inherits(condition, exclude)) 
      next
    if (length(include) > 0L && !inherits(condition, include)) 
      next
    mdebugf(" - Condition #%d: %s", kk, paste(sQuote(class(condition)), 
      collapse = ", "))
    cond$signaled <- cond$signaled + 1L
    conditions[[kk]] <- cond
    if (inherits(condition, "error")) {
      result$conditions <- conditions
      future$result <- result
      if (debug && !"future.info" %in% names(condition)) {
        cond$calls <- c(future$calls, cond$calls)
        condition$future.info <- cond
      }
      stop(condition)
    }
    else if (inherits(condition, "warning")) {
      warning(condition)
    }
    else if (inherits(condition, "message")) {
      message(condition)
    }
    else if (inherits(condition, "condition")) {
      signalCondition(condition)
    }
    else {
      stop_if_not(inherits(condition, "condition"))
    }
    signaled[kk] <- TRUE
  }
  if (isTRUE(attr(future$conditions, "drop"))) {
    conditions <- conditions[!signaled]
  }
  result$conditions <- conditions
  future$result <- result
  invisible(future)
}

from epimodelhpc.

AdrienLeGuillou avatar AdrienLeGuillou commented on July 20, 2024

sorry I was unclear, I need to see the code that produced the simulations. To see if the issue is with the function itself or in the code saving the sims.

from epimodelhpc.

clchand23 avatar clchand23 commented on July 20, 2024

The simulations were created using the EpiModelHIV intervention scenarios workflow scripts and were downloaded directly from the HPC

from epimodelhpc.

Related Issues (20)

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.