R/RcppExports.R

In Racmacs: Antigenic Cartography Macros

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

ac_ag_names <- function(map) {
    .Call('_Racmacs_ac_ag_names', PACKAGE = 'Racmacs', map)
}

ac_get_ag_coords <- function(opt) {
    .Call('_Racmacs_ac_get_ag_coords', PACKAGE = 'Racmacs', opt)
}

ac_get_sr_coords <- function(opt) {
    .Call('_Racmacs_ac_get_sr_coords', PACKAGE = 'Racmacs', opt)
}

ac_set_ag_coords <- function(opt, coords) {
    .Call('_Racmacs_ac_set_ag_coords', PACKAGE = 'Racmacs', opt, coords)
}

ac_set_sr_coords <- function(opt, coords) {
    .Call('_Racmacs_ac_set_sr_coords', PACKAGE = 'Racmacs', opt, coords)
}

ac_align_optimization <- function(source_optimization, target_optimization) {
    .Call('_Racmacs_ac_align_optimization', PACKAGE = 'Racmacs', source_optimization, target_optimization)
}

ac_align_map <- function(source_map, target_map, translation, scaling) {
    .Call('_Racmacs_ac_align_map', PACKAGE = 'Racmacs', source_map, target_map, translation, scaling)
}

ac_align_optimizations <- function(optimizations) {
    .Call('_Racmacs_ac_align_optimizations', PACKAGE = 'Racmacs', optimizations)
}

ac_subset_map <- function(map, ags, sr) {
    .Call('_Racmacs_ac_subset_map', PACKAGE = 'Racmacs', map, ags, sr)
}

ac_table_colbases <- function(titer_table, min_col_basis, fixed_col_bases, ag_reactivity_adjustments) {
    .Call('_Racmacs_ac_table_colbases', PACKAGE = 'Racmacs', titer_table, min_col_basis, fixed_col_bases, ag_reactivity_adjustments)
}

ac_numeric_table_distances <- function(titer_table, min_col_basis, fixed_col_bases, ag_reactivity_adjustments) {
    .Call('_Racmacs_ac_numeric_table_distances', PACKAGE = 'Racmacs', titer_table, min_col_basis, fixed_col_bases, ag_reactivity_adjustments)
}

ac_newOptimization <- function(dimensions, num_antigens, num_sera) {
    .Call('_Racmacs_ac_newOptimization', PACKAGE = 'Racmacs', dimensions, num_antigens, num_sera)
}

ac_relaxOptimization <- function(opt, titers, fixed_antigens, fixed_sera, options, titer_weights, dilution_stepsize) {
    .Call('_Racmacs_ac_relaxOptimization', PACKAGE = 'Racmacs', opt, titers, fixed_antigens, fixed_sera, options, titer_weights, dilution_stepsize)
}

ac_optimize_map <- function(map, num_dims, num_optimizations, min_col_basis, fixed_col_bases, ag_reactivity_adjustments, titer_weights, options) {
    .Call('_Racmacs_ac_optimize_map', PACKAGE = 'Racmacs', map, num_dims, num_optimizations, min_col_basis, fixed_col_bases, ag_reactivity_adjustments, titer_weights, options)
}

ac_new_antigen <- function(name) {
    .Call('_Racmacs_ac_new_antigen', PACKAGE = 'Racmacs', name)
}

ac_ag_get_id <- function(ag) {
    .Call('_Racmacs_ac_ag_get_id', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_date <- function(ag) {
    .Call('_Racmacs_ac_ag_get_date', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_reference <- function(ag) {
    .Call('_Racmacs_ac_ag_get_reference', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_passage <- function(ag) {
    .Call('_Racmacs_ac_ag_get_passage', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_clade <- function(ag) {
    .Call('_Racmacs_ac_ag_get_clade', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_annotations <- function(ag) {
    .Call('_Racmacs_ac_ag_get_annotations', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_labids <- function(ag) {
    .Call('_Racmacs_ac_ag_get_labids', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_name <- function(ag) {
    .Call('_Racmacs_ac_ag_get_name', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_extra <- function(ag) {
    .Call('_Racmacs_ac_ag_get_extra', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_lineage <- function(ag) {
    .Call('_Racmacs_ac_ag_get_lineage', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_reassortant <- function(ag) {
    .Call('_Racmacs_ac_ag_get_reassortant', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_strings <- function(ag) {
    .Call('_Racmacs_ac_ag_get_strings', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_continent <- function(ag) {
    .Call('_Racmacs_ac_ag_get_continent', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_match_id <- function(ag) {
    .Call('_Racmacs_ac_ag_get_match_id', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_group <- function(ag) {
    .Call('_Racmacs_ac_ag_get_group', PACKAGE = 'Racmacs', ag)
}

ac_ag_get_group_levels <- function(map) {
    .Call('_Racmacs_ac_ag_get_group_levels', PACKAGE = 'Racmacs', map)
}

ac_ag_set_id <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_id', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_date <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_date', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_reference <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_reference', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_passage <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_passage', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_clade <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_clade', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_annotations <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_annotations', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_labids <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_labids', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_name <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_name', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_extra <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_extra', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_lineage <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_lineage', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_reassortant <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_reassortant', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_strings <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_strings', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_continent <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_continent', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_group <- function(ag, value) {
    .Call('_Racmacs_ac_ag_set_group', PACKAGE = 'Racmacs', ag, value)
}

ac_ag_set_group_levels <- function(map, values) {
    .Call('_Racmacs_ac_ag_set_group_levels', PACKAGE = 'Racmacs', map, values)
}

ac_opt_get_ag_base_coords <- function(opt) {
    .Call('_Racmacs_ac_opt_get_ag_base_coords', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_sr_base_coords <- function(opt) {
    .Call('_Racmacs_ac_opt_get_sr_base_coords', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_transformation <- function(opt) {
    .Call('_Racmacs_ac_opt_get_transformation', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_translation <- function(opt) {
    .Call('_Racmacs_ac_opt_get_translation', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_mincolbasis <- function(opt) {
    .Call('_Racmacs_ac_opt_get_mincolbasis', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_fixedcolbases <- function(opt) {
    .Call('_Racmacs_ac_opt_get_fixedcolbases', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_agreactivityadjustments <- function(opt) {
    .Call('_Racmacs_ac_opt_get_agreactivityadjustments', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_stress <- function(opt) {
    .Call('_Racmacs_ac_opt_get_stress', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_dimensions <- function(opt) {
    .Call('_Racmacs_ac_opt_get_dimensions', PACKAGE = 'Racmacs', opt)
}

ac_opt_get_comment <- function(opt) {
    .Call('_Racmacs_ac_opt_get_comment', PACKAGE = 'Racmacs', opt)
}

ac_opt_set_ag_base_coords <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_ag_base_coords', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_sr_base_coords <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_sr_base_coords', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_transformation <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_transformation', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_translation <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_translation', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_mincolbasis <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_mincolbasis', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_fixedcolbases <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_fixedcolbases', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_agreactivityadjustments <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_agreactivityadjustments', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_stress <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_stress', PACKAGE = 'Racmacs', opt, value)
}

ac_opt_set_comment <- function(opt, value) {
    .Call('_Racmacs_ac_opt_set_comment', PACKAGE = 'Racmacs', opt, value)
}

ac_rotate_optimization <- function(opt, degrees, axis_num) {
    .Call('_Racmacs_ac_rotate_optimization', PACKAGE = 'Racmacs', opt, degrees, axis_num)
}

ac_reflect_optimization <- function(opt, axis_num) {
    .Call('_Racmacs_ac_reflect_optimization', PACKAGE = 'Racmacs', opt, axis_num)
}

ac_translate_optimization <- function(opt, translation) {
    .Call('_Racmacs_ac_translate_optimization', PACKAGE = 'Racmacs', opt, translation)
}

ac_apply_optimization_transform <- function(opt, coords) {
    .Call('_Racmacs_ac_apply_optimization_transform', PACKAGE = 'Racmacs', opt, coords)
}

ac_plotspec_get_shown <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_shown', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_size <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_size', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_fill <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_fill', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_outline <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_outline', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_outline_width <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_outline_width', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_rotation <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_rotation', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_aspect <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_aspect', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_get_shape <- function(ps) {
    .Call('_Racmacs_ac_plotspec_get_shape', PACKAGE = 'Racmacs', ps)
}

ac_plotspec_set_shown <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_shown', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_size <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_size', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_fill <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_fill', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_outline <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_outline', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_outline_width <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_outline_width', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_rotation <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_rotation', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_aspect <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_aspect', PACKAGE = 'Racmacs', ps, value)
}

ac_plotspec_set_shape <- function(ps, value) {
    .Call('_Racmacs_ac_plotspec_set_shape', PACKAGE = 'Racmacs', ps, value)
}

ac_new_serum <- function(name) {
    .Call('_Racmacs_ac_new_serum', PACKAGE = 'Racmacs', name)
}

ac_sr_get_id <- function(sr) {
    .Call('_Racmacs_ac_sr_get_id', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_date <- function(sr) {
    .Call('_Racmacs_ac_sr_get_date', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_reference <- function(sr) {
    .Call('_Racmacs_ac_sr_get_reference', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_passage <- function(sr) {
    .Call('_Racmacs_ac_sr_get_passage', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_species <- function(sr) {
    .Call('_Racmacs_ac_sr_get_species', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_clade <- function(sr) {
    .Call('_Racmacs_ac_sr_get_clade', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_annotations <- function(sr) {
    .Call('_Racmacs_ac_sr_get_annotations', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_name <- function(sr) {
    .Call('_Racmacs_ac_sr_get_name', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_extra <- function(sr) {
    .Call('_Racmacs_ac_sr_get_extra', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_lineage <- function(sr) {
    .Call('_Racmacs_ac_sr_get_lineage', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_reassortant <- function(sr) {
    .Call('_Racmacs_ac_sr_get_reassortant', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_strings <- function(sr) {
    .Call('_Racmacs_ac_sr_get_strings', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_continent <- function(sr) {
    .Call('_Racmacs_ac_sr_get_continent', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_match_id <- function(sr) {
    .Call('_Racmacs_ac_sr_get_match_id', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_homologous_ags <- function(sr) {
    .Call('_Racmacs_ac_sr_get_homologous_ags', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_group <- function(sr) {
    .Call('_Racmacs_ac_sr_get_group', PACKAGE = 'Racmacs', sr)
}

ac_sr_get_group_levels <- function(map) {
    .Call('_Racmacs_ac_sr_get_group_levels', PACKAGE = 'Racmacs', map)
}

ac_sr_set_id <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_id', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_date <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_date', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_reference <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_reference', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_passage <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_passage', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_species <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_species', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_clade <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_clade', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_annotations <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_annotations', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_name <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_name', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_extra <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_extra', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_lineage <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_lineage', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_reassortant <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_reassortant', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_strings <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_strings', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_continent <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_continent', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_homologous_ags <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_homologous_ags', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_group <- function(sr, value) {
    .Call('_Racmacs_ac_sr_set_group', PACKAGE = 'Racmacs', sr, value)
}

ac_sr_set_group_levels <- function(map, values) {
    .Call('_Racmacs_ac_sr_set_group_levels', PACKAGE = 'Racmacs', map, values)
}

ac_bootstrap_map <- function(map, method, bootstrap_ags, bootstrap_sr, reoptimize, ag_noise_sd, titer_noise_sd, minimum_column_basis, fixed_column_bases, ag_reactivity_adjustments, num_optimizations, num_dimensions, options) {
    .Call('_Racmacs_ac_bootstrap_map', PACKAGE = 'Racmacs', map, method, bootstrap_ags, bootstrap_sr, reoptimize, ag_noise_sd, titer_noise_sd, minimum_column_basis, fixed_column_bases, ag_reactivity_adjustments, num_optimizations, num_dimensions, options)
}

ac_dimension_test_map <- function(titer_table, dimensions_to_test, test_proportion, minimum_column_basis, fixed_column_bases, ag_reactivity_adjustments, num_optimizations, options) {
    .Call('_Racmacs_ac_dimension_test_map', PACKAGE = 'Racmacs', titer_table, dimensions_to_test, test_proportion, minimum_column_basis, fixed_column_bases, ag_reactivity_adjustments, num_optimizations, options)
}

ac_errorline_data <- function(map) {
    .Call('_Racmacs_ac_errorline_data', PACKAGE = 'Racmacs', map)
}

ac_hemi_test <- function(optimization, titertable, grid_spacing, stress_lim, options, dilution_stepsize) {
    .Call('_Racmacs_ac_hemi_test', PACKAGE = 'Racmacs', optimization, titertable, grid_spacing, stress_lim, options, dilution_stepsize)
}

ac_match_map_ags <- function(map1, map2) {
    .Call('_Racmacs_ac_match_map_ags', PACKAGE = 'Racmacs', map1, map2)
}

ac_match_map_sr <- function(map1, map2) {
    .Call('_Racmacs_ac_match_map_sr', PACKAGE = 'Racmacs', map1, map2)
}

ac_merge_titers <- function(titers, options) {
    .Call('_Racmacs_ac_merge_titers', PACKAGE = 'Racmacs', titers, options)
}

ac_merge_titer_layers <- function(titer_layers, options) {
    .Call('_Racmacs_ac_merge_titer_layers', PACKAGE = 'Racmacs', titer_layers, options)
}

ac_merge_tables <- function(maps, merge_options) {
    .Call('_Racmacs_ac_merge_tables', PACKAGE = 'Racmacs', maps, merge_options)
}

ac_merge_reoptimized <- function(maps, num_dims, num_optimizations, min_col_basis, optimizer_options, merge_options) {
    .Call('_Racmacs_ac_merge_reoptimized', PACKAGE = 'Racmacs', maps, num_dims, num_optimizations, min_col_basis, optimizer_options, merge_options)
}

ac_merge_frozen_overlay <- function(maps, merge_options) {
    .Call('_Racmacs_ac_merge_frozen_overlay', PACKAGE = 'Racmacs', maps, merge_options)
}

ac_merge_relaxed_overlay <- function(maps, optimizer_options, merge_options) {
    .Call('_Racmacs_ac_merge_relaxed_overlay', PACKAGE = 'Racmacs', maps, optimizer_options, merge_options)
}

ac_merge_frozen_merge <- function(maps, optimizer_options, merge_options) {
    .Call('_Racmacs_ac_merge_frozen_merge', PACKAGE = 'Racmacs', maps, optimizer_options, merge_options)
}

ac_merge_incremental <- function(maps, num_dims, num_optimizations, min_colbasis, optimizer_options, merge_options) {
    .Call('_Racmacs_ac_merge_incremental', PACKAGE = 'Racmacs', maps, num_dims, num_optimizations, min_colbasis, optimizer_options, merge_options)
}

ac_titer_merge_type <- function(titers) {
    .Call('_Racmacs_ac_titer_merge_type', PACKAGE = 'Racmacs', titers)
}

ac_titer_layer_merge_types <- function(titer_layers) {
    .Call('_Racmacs_ac_titer_layer_merge_types', PACKAGE = 'Racmacs', titer_layers)
}

ac_titer_layer_sd <- function(titer_layers, dilution_stepsize) {
    .Call('_Racmacs_ac_titer_layer_sd', PACKAGE = 'Racmacs', titer_layers, dilution_stepsize)
}

ac_move_trapped_points <- function(optimization, titertable, grid_spacing, options, max_iterations = 10L, dilution_stepsize = 1.0) {
    .Call('_Racmacs_ac_move_trapped_points', PACKAGE = 'Racmacs', optimization, titertable, grid_spacing, options, max_iterations, dilution_stepsize)
}

ac_coords_stress <- function(titers, min_colbasis, fixed_colbases, ag_reactivity_adjustments, ag_coords, sr_coords, dilution_stepsize) {
    .Call('_Racmacs_ac_coords_stress', PACKAGE = 'Racmacs', titers, min_colbasis, fixed_colbases, ag_reactivity_adjustments, ag_coords, sr_coords, dilution_stepsize)
}

ac_point_stresses <- function(titer_table, min_colbasis, fixed_colbases, ag_reactivity_adjustments, map_dists, dilution_stepsize) {
    .Call('_Racmacs_ac_point_stresses', PACKAGE = 'Racmacs', titer_table, min_colbasis, fixed_colbases, ag_reactivity_adjustments, map_dists, dilution_stepsize)
}

ac_point_residuals <- function(map, optimization_number) {
    .Call('_Racmacs_ac_point_residuals', PACKAGE = 'Racmacs', map, optimization_number)
}

ac_relax_coords <- function(tabledist_matrix, titertype_matrix, ag_coords, sr_coords, options, fixed_antigens, fixed_sera, titer_weights, dilution_stepsize) {
    .Call('_Racmacs_ac_relax_coords', PACKAGE = 'Racmacs', tabledist_matrix, titertype_matrix, ag_coords, sr_coords, options, fixed_antigens, fixed_sera, titer_weights, dilution_stepsize)
}

ac_runOptimizations <- function(titertable, minimum_col_basis, fixed_colbases, ag_reactivity_adjustments, num_dims, num_optimizations, options, titer_weights, dilution_stepsize) {
    .Call('_Racmacs_ac_runOptimizations', PACKAGE = 'Racmacs', titertable, minimum_col_basis, fixed_colbases, ag_reactivity_adjustments, num_dims, num_optimizations, options, titer_weights, dilution_stepsize)
}

ac_reactivity_adjustment_stress <- function(par, fixed_ag_reactivities, minimum_column_basis, fixed_column_bases, titertable, ag_coords, sr_coords, options, fixed_antigens, fixed_sera, titer_weights, reactivity_stress_weighting, reoptimize, num_optimizations, dilution_stepsize) {
    .Call('_Racmacs_ac_reactivity_adjustment_stress', PACKAGE = 'Racmacs', par, fixed_ag_reactivities, minimum_column_basis, fixed_column_bases, titertable, ag_coords, sr_coords, options, fixed_antigens, fixed_sera, titer_weights, reactivity_stress_weighting, reoptimize, num_optimizations, dilution_stepsize)
}

ac_stress_blob_grid <- function(testcoords, coords, tabledists, titertypes, stress_lim, grid_spacing, dilution_stepsize) {
    .Call('_Racmacs_ac_stress_blob_grid', PACKAGE = 'Racmacs', testcoords, coords, tabledists, titertypes, stress_lim, grid_spacing, dilution_stepsize)
}

numeric_titers <- function(titers) {
    .Call('_Racmacs_numeric_titers', PACKAGE = 'Racmacs', titers)
}

log_titers <- function(titers, dilution_stepsize) {
    .Call('_Racmacs_log_titers', PACKAGE = 'Racmacs', titers, dilution_stepsize)
}

titer_types_int <- function(titers) {
    .Call('_Racmacs_titer_types_int', PACKAGE = 'Racmacs', titers)
}

make_titers <- function(numeric_titers, titer_types_int) {
    .Call('_Racmacs_make_titers', PACKAGE = 'Racmacs', numeric_titers, titer_types_int)
}

reduce_matrix_dimensions <- function(m, dim) {
    .Call('_Racmacs_reduce_matrix_dimensions', PACKAGE = 'Racmacs', m, dim)
}

json_to_acmap <- function(json) {
    .Call('_Racmacs_json_to_acmap', PACKAGE = 'Racmacs', json)
}

acmap_to_json <- function(map, version, pretty, round_titers) {
    .Call('_Racmacs_acmap_to_json', PACKAGE = 'Racmacs', map, version, pretty, round_titers)
}

ac_procrustes <- function(X, Xstar, translation, dilation) {
    .Call('_Racmacs_ac_procrustes', PACKAGE = 'Racmacs', X, Xstar, translation, dilation)
}

ac_align_coords <- function(source, target, translation = TRUE, dilation = FALSE) {
    .Call('_Racmacs_ac_align_coords', PACKAGE = 'Racmacs', source, target, translation, dilation)
}

ac_procrustes_map_coords <- function(base_map, procrustes_map, base_map_optimization_number, procrustes_map_optimization_number, translation = TRUE, scaling = FALSE) {
    .Call('_Racmacs_ac_procrustes_map_coords', PACKAGE = 'Racmacs', base_map, procrustes_map, base_map_optimization_number, procrustes_map_optimization_number, translation, scaling)
}

ac_procrustes_map_data <- function(optimization, pc_coords) {
    .Call('_Racmacs_ac_procrustes_map_data', PACKAGE = 'Racmacs', optimization, pc_coords)
}

ac_coord_dists <- function(coords1, coords2) {
    .Call('_Racmacs_ac_coord_dists', PACKAGE = 'Racmacs', coords1, coords2)
}

parallel_mode <- function() {
    .Call('_Racmacs_parallel_mode', PACKAGE = 'Racmacs')
}

ac_coordDistMatrix <- function(coords1, coords2) {
    .Call('_Racmacs_ac_coordDistMatrix', PACKAGE = 'Racmacs', coords1, coords2)
}

mesh_volume <- function(faces, vertices) {
    .Call('_Racmacs_mesh_volume', PACKAGE = 'Racmacs', faces, vertices)
}

polygon_area <- function(x, y) {
    .Call('_Racmacs_polygon_area', PACKAGE = 'Racmacs', x, y)
}

interp2d <- function(x, gpoints1, gpoints2, f) {
    .Call('_Racmacs_interp2d', PACKAGE = 'Racmacs', x, gpoints1, gpoints2, f)
}