HybridHandlerMap& get_handlers(){
static HybridHandlerMap handlers ;
if( !handlers.size() ){
handlers[ Rf_install("n") ] = count_prototype ;
handlers[ Rf_install( "mean" ) ] = mean_prototype ;
handlers[ Rf_install( "min" ) ] = min_prototype ;
handlers[ Rf_install( "max" ) ] = max_prototype ;
handlers[ Rf_install( "var" ) ] = var_prototype ;
handlers[ Rf_install( "sd") ] = sd_prototype ;
handlers[ Rf_install( "sum" ) ] = sum_prototype;
handlers[ Rf_install( "count_distinct" ) ] = count_distinct_prototype ;
}
return handlers ;
}
HybridHandlerMap& get_handlers(){
static HybridHandlerMap handlers ;
if( !handlers.size() ){
handlers[ Rf_install("n") ] = count_prototype ;
handlers[ Rf_install( "mean" ) ] = mean_prototype ;
handlers[ Rf_install( "min" ) ] = minmax_prototype<dplyr::Min> ;
handlers[ Rf_install( "max" ) ] = minmax_prototype<dplyr::Max> ;
handlers[ Rf_install( "var" ) ] = var_prototype ;
handlers[ Rf_install( "sd") ] = sd_prototype ;
handlers[ Rf_install( "sum" ) ] = sum_prototype;
handlers[ Rf_install( "n_distinct" ) ] = count_distinct_prototype ;
handlers[ Rf_install( "row_number" ) ] = row_number_prototype ;
handlers[ Rf_install( "min_rank" ) ] = rank_impl_prototype<dplyr::internal::min_rank_increment> ;
handlers[ Rf_install( "dense_rank" ) ] = rank_impl_prototype<dplyr::internal::dense_rank_increment> ;
// handlers[ Rf_install( "lead" ) ] = lead_prototype ;
// handlers[ Rf_install( "lag" ) ] = lag_prototype ;
}
return handlers ;
}
HybridHandlerMap& get_handlers() {
static HybridHandlerMap handlers;
if (!handlers.size()) {
/*
handlers[ Rf_install( "cumsum") ] = cumfun_prototype<CumSum>;
handlers[ Rf_install( "cummin") ] = cumfun_prototype<CumMin>;
handlers[ Rf_install( "cummax") ] = cumfun_prototype<CumMax>;
*/
install_simple_handlers(handlers);
install_minmax_handlers(handlers);
install_count_handlers(handlers);
install_nth_handlers(handlers);
install_window_handlers(handlers);
install_offset_handlers(handlers);
install_in_handlers(handlers);
install_debug_handlers(handlers);
}
return handlers;
}