R/RcppExports.R

Defines functions kernel_filt_3d_cpp gridToIndex3DCpp gridToIndexCpp exgridToIndex4DCpp exgridToIndex3DCpp grid_to_intvec find_seqnum bilateral_filter_4d_cpp gridToIndexSingleCpp bilateral_filter_cpp gaussian_blur_cpp gaussian_weights box_blur box_nbhd local_sphere indexToGridCpp

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

indexToGridCpp <- function(idx, array_dim) {
    .Call('_neuroim2_indexToGridCpp', PACKAGE = 'neuroim2', idx, array_dim)
}

local_sphere <- function(vx, vy, vz, radius, spacing, dim) {
    .Call('_neuroim2_local_sphere', PACKAGE = 'neuroim2', vx, vy, vz, radius, spacing, dim)
}

box_nbhd <- function(arr, dims, x, y, z, window, out, slicedim) {
    .Call('_neuroim2_box_nbhd', PACKAGE = 'neuroim2', arr, dims, x, y, z, window, out, slicedim)
}

box_blur <- function(arr, mask_idx, window) {
    .Call('_neuroim2_box_blur', PACKAGE = 'neuroim2', arr, mask_idx, window)
}

gaussian_weights <- function(window, sigma, spacing) {
    .Call('_neuroim2_gaussian_weights', PACKAGE = 'neuroim2', window, sigma, spacing)
}

gaussian_blur_cpp <- function(arr, mask_idx, window, sigma, spacing) {
    .Call('_neuroim2_gaussian_blur_cpp', PACKAGE = 'neuroim2', arr, mask_idx, window, sigma, spacing)
}

bilateral_filter_cpp <- function(arr, mask_idx, window, spatial_sigma, intensity_sigma, spacing) {
    .Call('_neuroim2_bilateral_filter_cpp', PACKAGE = 'neuroim2', arr, mask_idx, window, spatial_sigma, intensity_sigma, spacing)
}

gridToIndexSingleCpp <- function(coords, array_dim) {
    .Call('_neuroim2_gridToIndexSingleCpp', PACKAGE = 'neuroim2', coords, array_dim)
}

bilateral_filter_4d_cpp <- function(arr, mask_idx, spatial_window, temporal_window, spatial_sigma, intensity_sigma, temporal_sigma, intensity_sd, spacing) {
    .Call('_neuroim2_bilateral_filter_4d_cpp', PACKAGE = 'neuroim2', arr, mask_idx, spatial_window, temporal_window, spatial_sigma, intensity_sigma, temporal_sigma, intensity_sd, spacing)
}

find_seqnum <- function(clens, idx) {
    .Call('_neuroim2_find_seqnum', PACKAGE = 'neuroim2', clens, idx)
}

grid_to_intvec <- function(D, vox) {
    .Call('_neuroim2_grid_to_intvec', PACKAGE = 'neuroim2', D, vox)
}

exgridToIndex3DCpp <- function(array_dim, iind, jind, kind) {
    .Call('_neuroim2_exgridToIndex3DCpp', PACKAGE = 'neuroim2', array_dim, iind, jind, kind)
}

exgridToIndex4DCpp <- function(array_dim, iind, jind, kind, mind) {
    .Call('_neuroim2_exgridToIndex4DCpp', PACKAGE = 'neuroim2', array_dim, iind, jind, kind, mind)
}

gridToIndexCpp <- function(array_dim, voxmat) {
    .Call('_neuroim2_gridToIndexCpp', PACKAGE = 'neuroim2', array_dim, voxmat)
}

gridToIndex3DCpp <- function(array_dim, voxmat) {
    .Call('_neuroim2_gridToIndex3DCpp', PACKAGE = 'neuroim2', array_dim, voxmat)
}

kernel_filt_3d_cpp <- function(data, kernel) {
    .Call('_neuroim2_kernel_filt_3d_cpp', PACKAGE = 'neuroim2', data, kernel)
}
bbuchsbaum/neuroim2 documentation built on April 20, 2024, 4:20 p.m.