// Generated by using Rcpp::compileAttributes() -> do not edit by hand // Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393 #include "../inst/include/crownsegmentr.h" #include using namespace Rcpp; #ifdef RCPP_USE_GLOBAL_ROSTREAM Rcpp::Rostream& Rcpp::Rcout = Rcpp::Rcpp_cout_get(); Rcpp::Rostream& Rcpp::Rcerr = Rcpp::Rcpp_cerr_get(); #endif // calculate_centroids_flexible Rcpp::List calculate_centroids_flexible(const Rcpp::DataFrame& coordinate_table, const spatial::coordinate_t& min_point_height_above_ground, const Rcpp::List& ground_height_data, const Rcpp::List& crown_diameter_to_tree_height_data, const Rcpp::List& crown_length_to_tree_height_data, const double crown_diameter_constant, const double crown_length_constant, const spatial::distance_t& centroid_convergence_distance, const int max_iterations_per_point, const bool also_return_all_centroids, const bool show_progress_bar); RcppExport SEXP _crownsegmentr_calculate_centroids_flexible(SEXP coordinate_tableSEXP, SEXP min_point_height_above_groundSEXP, SEXP ground_height_dataSEXP, SEXP crown_diameter_to_tree_height_dataSEXP, SEXP crown_length_to_tree_height_dataSEXP, SEXP crown_diameter_constantSEXP, SEXP crown_length_constantSEXP, SEXP centroid_convergence_distanceSEXP, SEXP max_iterations_per_pointSEXP, SEXP also_return_all_centroidsSEXP, SEXP show_progress_barSEXP) { BEGIN_RCPP Rcpp::RObject rcpp_result_gen; Rcpp::RNGScope rcpp_rngScope_gen; Rcpp::traits::input_parameter< const Rcpp::DataFrame& >::type coordinate_table(coordinate_tableSEXP); Rcpp::traits::input_parameter< const spatial::coordinate_t& >::type min_point_height_above_ground(min_point_height_above_groundSEXP); Rcpp::traits::input_parameter< const Rcpp::List& >::type ground_height_data(ground_height_dataSEXP); Rcpp::traits::input_parameter< const Rcpp::List& >::type crown_diameter_to_tree_height_data(crown_diameter_to_tree_height_dataSEXP); Rcpp::traits::input_parameter< const Rcpp::List& >::type crown_length_to_tree_height_data(crown_length_to_tree_height_dataSEXP); Rcpp::traits::input_parameter< const double >::type crown_diameter_constant(crown_diameter_constantSEXP); Rcpp::traits::input_parameter< const double >::type crown_length_constant(crown_length_constantSEXP); Rcpp::traits::input_parameter< const spatial::distance_t& >::type centroid_convergence_distance(centroid_convergence_distanceSEXP); Rcpp::traits::input_parameter< const int >::type max_iterations_per_point(max_iterations_per_pointSEXP); Rcpp::traits::input_parameter< const bool >::type also_return_all_centroids(also_return_all_centroidsSEXP); Rcpp::traits::input_parameter< const bool >::type show_progress_bar(show_progress_barSEXP); rcpp_result_gen = Rcpp::wrap(calculate_centroids_flexible(coordinate_table, min_point_height_above_ground, ground_height_data, crown_diameter_to_tree_height_data, crown_length_to_tree_height_data, crown_diameter_constant, crown_length_constant, centroid_convergence_distance, max_iterations_per_point, also_return_all_centroids, show_progress_bar)); return rcpp_result_gen; END_RCPP } // calculate_centroids_normalized Rcpp::List calculate_centroids_normalized(const Rcpp::DataFrame& coordinate_table, const spatial::coordinate_t& min_point_height_above_ground, const double crown_diameter_to_tree_height, const double crown_length_to_tree_height, const double crown_diameter_constant, const double crown_length_constant, const spatial::distance_t& centroid_convergence_distance, const int max_iterations_per_point, const bool also_return_all_centroids, const bool show_progress_bar); RcppExport SEXP _crownsegmentr_calculate_centroids_normalized(SEXP coordinate_tableSEXP, SEXP min_point_height_above_groundSEXP, SEXP crown_diameter_to_tree_heightSEXP, SEXP crown_length_to_tree_heightSEXP, SEXP crown_diameter_constantSEXP, SEXP crown_length_constantSEXP, SEXP centroid_convergence_distanceSEXP, SEXP max_iterations_per_pointSEXP, SEXP also_return_all_centroidsSEXP, SEXP show_progress_barSEXP) { BEGIN_RCPP Rcpp::RObject rcpp_result_gen; Rcpp::RNGScope rcpp_rngScope_gen; Rcpp::traits::input_parameter< const Rcpp::DataFrame& >::type coordinate_table(coordinate_tableSEXP); Rcpp::traits::input_parameter< const spatial::coordinate_t& >::type min_point_height_above_ground(min_point_height_above_groundSEXP); Rcpp::traits::input_parameter< const double >::type crown_diameter_to_tree_height(crown_diameter_to_tree_heightSEXP); Rcpp::traits::input_parameter< const double >::type crown_length_to_tree_height(crown_length_to_tree_heightSEXP); Rcpp::traits::input_parameter< const double >::type crown_diameter_constant(crown_diameter_constantSEXP); Rcpp::traits::input_parameter< const double >::type crown_length_constant(crown_length_constantSEXP); Rcpp::traits::input_parameter< const spatial::distance_t& >::type centroid_convergence_distance(centroid_convergence_distanceSEXP); Rcpp::traits::input_parameter< const int >::type max_iterations_per_point(max_iterations_per_pointSEXP); Rcpp::traits::input_parameter< const bool >::type also_return_all_centroids(also_return_all_centroidsSEXP); Rcpp::traits::input_parameter< const bool >::type show_progress_bar(show_progress_barSEXP); rcpp_result_gen = Rcpp::wrap(calculate_centroids_normalized(coordinate_table, min_point_height_above_ground, crown_diameter_to_tree_height, crown_length_to_tree_height, crown_diameter_constant, crown_length_constant, centroid_convergence_distance, max_iterations_per_point, also_return_all_centroids, show_progress_bar)); return rcpp_result_gen; END_RCPP } // calculate_centroids_terraneous Rcpp::List calculate_centroids_terraneous(const Rcpp::DataFrame& coordinate_table, const spatial::coordinate_t& min_point_height_above_ground, const Rcpp::List& ground_height_grid_data, const double crown_diameter_to_tree_height, const double crown_length_to_tree_height, const double crown_diameter_constant, const double crown_length_constant, const spatial::distance_t& centroid_convergence_distance, const int max_iterations_per_point, const bool also_return_all_centroids, const bool show_progress_bar); RcppExport SEXP _crownsegmentr_calculate_centroids_terraneous(SEXP coordinate_tableSEXP, SEXP min_point_height_above_groundSEXP, SEXP ground_height_grid_dataSEXP, SEXP crown_diameter_to_tree_heightSEXP, SEXP crown_length_to_tree_heightSEXP, SEXP crown_diameter_constantSEXP, SEXP crown_length_constantSEXP, SEXP centroid_convergence_distanceSEXP, SEXP max_iterations_per_pointSEXP, SEXP also_return_all_centroidsSEXP, SEXP show_progress_barSEXP) { BEGIN_RCPP Rcpp::RObject rcpp_result_gen; Rcpp::RNGScope rcpp_rngScope_gen; Rcpp::traits::input_parameter< const Rcpp::DataFrame& >::type coordinate_table(coordinate_tableSEXP); Rcpp::traits::input_parameter< const spatial::coordinate_t& >::type min_point_height_above_ground(min_point_height_above_groundSEXP); Rcpp::traits::input_parameter< const Rcpp::List& >::type ground_height_grid_data(ground_height_grid_dataSEXP); Rcpp::traits::input_parameter< const double >::type crown_diameter_to_tree_height(crown_diameter_to_tree_heightSEXP); Rcpp::traits::input_parameter< const double >::type crown_length_to_tree_height(crown_length_to_tree_heightSEXP); Rcpp::traits::input_parameter< const double >::type crown_diameter_constant(crown_diameter_constantSEXP); Rcpp::traits::input_parameter< const double >::type crown_length_constant(crown_length_constantSEXP); Rcpp::traits::input_parameter< const spatial::distance_t& >::type centroid_convergence_distance(centroid_convergence_distanceSEXP); Rcpp::traits::input_parameter< const int >::type max_iterations_per_point(max_iterations_per_pointSEXP); Rcpp::traits::input_parameter< const bool >::type also_return_all_centroids(also_return_all_centroidsSEXP); Rcpp::traits::input_parameter< const bool >::type show_progress_bar(show_progress_barSEXP); rcpp_result_gen = Rcpp::wrap(calculate_centroids_terraneous(coordinate_table, min_point_height_above_ground, ground_height_grid_data, crown_diameter_to_tree_height, crown_length_to_tree_height, crown_diameter_constant, crown_length_constant, centroid_convergence_distance, max_iterations_per_point, also_return_all_centroids, show_progress_bar)); return rcpp_result_gen; END_RCPP } static const R_CallMethodDef CallEntries[] = { {"_crownsegmentr_calculate_centroids_flexible", (DL_FUNC) &_crownsegmentr_calculate_centroids_flexible, 11}, {"_crownsegmentr_calculate_centroids_normalized", (DL_FUNC) &_crownsegmentr_calculate_centroids_normalized, 10}, {"_crownsegmentr_calculate_centroids_terraneous", (DL_FUNC) &_crownsegmentr_calculate_centroids_terraneous, 11}, {NULL, NULL, 0} }; RcppExport void R_init_crownsegmentr(DllInfo *dll) { R_registerRoutines(dll, NULL, CallEntries, NULL, NULL); R_useDynamicSymbols(dll, FALSE); }