# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
.colSums_wt_cpp <- function(mat, vec_wt = 1L) {
.Call(`_ProSpect_colSums_wt_cpp`, mat, vec_wt)
}
.vec_add_cpp <- function(vec_base, vec_add = 0L) {
invisible(.Call(`_ProSpect_vec_add_cpp`, vec_base, vec_add))
}
.vec_mult_cpp <- function(vec_base, vec_mult = 1L) {
invisible(.Call(`_ProSpect_vec_mult_cpp`, vec_base, vec_mult))
}
.wave_rebin_cpp <- function(wave, wave_bin, wave_bin_lo, wave_bin_hi, logbin = FALSE) {
.Call(`_ProSpect_wave_rebin_cpp`, wave, wave_bin, wave_bin_lo, wave_bin_hi, logbin)
}
.spec_rebin_cpp <- function(wave_in, flux_in, wave_out, logbin_in = FALSE, logbin_out = FALSE) {
.Call(`_ProSpect_spec_rebin_cpp`, wave_in, flux_in, wave_out, logbin_in, logbin_out)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.