R/filter_slider.R

In paris-appartemnt-project/apartment_project: Code to Find the Best Apartment to Buy in Paris

#' The Function inputs a dataframe and filters out the quantiles for a specific category that the user wants or do not want.
#'
#' @param castorus_table a data frame we are going to modify
#' @param tri The dataframe with the scores
#' @param min The miminum quantile we want.
#' @param max The highest quantile we want.
#' @param value Select the column in tri which is going to be filtered.
#'
#' @return data frame
#' @import dplyr
#' @export
#'
filter_slider <- function(castorus_table, tri, min, max, value){
  temp<- tri %>%
    dplyr::filter(score_table[,value] %in% c(min:max)) %>%
    select(X)
  a <- castorus_data %>%
    dplyr::filter(X1 %in% temp$X1)
  return(a)
}