Skip to contents

This generic returns the number of scans in an object (e.g. a sequence of fMRI scans).

Usage

n_scans(x)

Arguments

x

The object from which to retrieve the number of scans

Value

An integer representing the number of scans

Examples

if (FALSE) { # \dontrun{
if (requireNamespace("neuroim2", quietly = TRUE) &&
    requireNamespace("hdf5r", quietly = TRUE) &&
    exists("H5ClusterExperiment", where = "package:fmristore") &&
    exists("n_scans", where = "package:fmristore") &&
    !is.null(fmristore:::create_minimal_h5_for_H5ClusterExperiment)) {

  temp_exp_file <- NULL
  exp_obj <- NULL
  tryCatch({
    # Create a minimal H5ClusterExperiment which contains runs (scans)
    temp_exp_file <- fmristore:::create_minimal_h5_for_H5ClusterExperiment()
    exp_obj <- fmristore::H5ClusterExperiment(file_path = temp_exp_file)

    # Get the number of scans
    num_scans <- n_scans(exp_obj)
    print(num_scans) # Should be 2 based on the helper

  }, error = function(e) {
    message("n_scans example failed: ", e$message)
  }, finally = {
    if (!is.null(exp_obj)) try(close(exp_obj), silent = TRUE)
    if (!is.null(temp_exp_file) && file.exists(temp_exp_file)) {
      unlink(temp_exp_file)
    }
  })
} else {
  message("Skipping n_scans example: dependencies or helper not available.")
}
} # }