Defines functions .recommend_attribute

.recommend_attribute <- function(S, LHS, RHS,
                                 attributes) {

  # Compute closure
  S <- .compute_closure(S, LHS, RHS,
                        attributes = attributes)

  # Which attributes are seeked
  idx <- match(attribute_filter, attributes)

  # Return the recommendation for those attributes
  rec <- S$closure[idx]
  names(rec) <- attribute_filter



Try the fcaR package in your browser

Any scripts or data that you put into this service are public.

fcaR documentation built on April 28, 2023, 1:11 a.m.