get_HDF5_colSums

C++ Function Reference

1 Signature

Eigen::VectorXd BigDataStatMeth::get_HDF5_colSums(BigDataStatMeth::hdf5Dataset *dsA, bool bparal, Rcpp::Nullable< int > wsize, Rcpp::Nullable< int > threads)

2 Description

Column sums of an HDF5 matrix (block-wise, parallel).

3 Parameters

  • dsA (BigDataStatMeth::hdf5Dataset *): Open HDF5 dataset.
  • bparal (bool): Enable OpenMP parallelism.
  • wsize (Rcpp::Nullable< int >): Block size (NULL = auto).
  • threads (Rcpp::Nullable< int >): Thread count (NULL = auto).

4 Returns

Vector of length ncols_R.

5 Details

Equivalent to base R colSums(X).

6 Call Graph

Function dependencies

7 Source Code

File: inst/include/hdf5Algebra/matrixAggregations.hpp • Lines 130-181

inline Eigen::VectorXd get_HDF5_colSums(BigDataStatMeth::hdf5Dataset* dsA,
                                         bool bparal,
                                         Rcpp::Nullable<int> wsize,
                                         Rcpp::Nullable<int> threads)
{
    try {
        const hsize_t nHDF5rows = dsA->nrows(); // = R ncols  (iterated)
        const hsize_t nHDF5cols = dsA->ncols(); // = R nrows  (fixed)

        const hsize_t bs = agg_block_size(wsize, nHDF5rows, nHDF5cols);

        std::vector<hsize_t> starts, sizes;
        agg_make_blocks(nHDF5rows, bs, starts, sizes);

        const std::vector<hsize_t> stride = {1, 1}, blk = {1, 1};
        const int nthreads = static_cast<int>(
            BigDataStatMeth::get_threads(bparal, threads));

        Eigen::VectorXd result = Eigen::VectorXd::Zero(nHDF5rows);

        #pragma omp parallel for schedule(dynamic) num_threads(nthreads) \
                shared(dsA, starts, sizes, result)
        for (hsize_t bi = 0; bi < starts.size(); bi++) {
            std::vector<double> vd(sizes[bi] * nHDF5cols);
            //.. 20260325 - remove critical ..// #pragma omp critical(accessFile)
            //.. 20260325 - remove critical ..//{ 
            
            dsA->readDatasetBlock({starts[bi], 0}, {sizes[bi], nHDF5cols}, stride, blk, vd.data()); 
            
            //.. 20260325 - remove critical ..//}

            Eigen::Map<const RMMatd> X(vd.data(),
                static_cast<Eigen::Index>(sizes[bi]),
                static_cast<Eigen::Index>(nHDF5cols));

            // rowwise sum: one sum per R-column in this block
            result.segment(starts[bi], sizes[bi]) = X.rowwise().sum();
        }

        return result;

    } catch (H5::FileIException& e) {
        throw std::runtime_error("c++ exception get_HDF5_colSums (File IException): "
                                 + std::string(e.getDetailMsg()));
    } catch (H5::DataSetIException& e) {
        throw std::runtime_error("c++ exception get_HDF5_colSums (DataSet IException): "
                                 + std::string(e.getDetailMsg()));
    } catch (std::exception& e) {
        throw std::runtime_error(std::string("c++ exception get_HDF5_colSums: ")
                                 + e.what());
    }
}

8 Usage Example

#include "BigDataStatMeth.hpp"

// Example usage
auto result = get_HDF5_colSums(...);