Last fixes before cran release

Author: agosiewska

DESCRIPTION

@@ -12,7 +12,7 @@ License: GPL-3
 Encoding: UTF-8
 LazyData: true
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.1.1
+RoxygenNote: 7.1.2
 Imports:
     DALEX,
     dendextend,

NAMESPACE

@@ -33,6 +33,7 @@ importFrom(grDevices,hcl)
 importFrom(graphics,plot)
 importFrom(ingredients,accumulated_dependence)
 importFrom(ingredients,partial_dependence)
+importFrom(sets,set)
 importFrom(sets,set_union)
 importFrom(stats,AIC)
 importFrom(stats,aggregate)

NEWS.md

@@ -1,6 +1,7 @@
 # version 0.1.3
 - Updated DESCRIPTION (arxiv link changed to doi).
 - Added citation to [Simpler is better: Lifting interpretability-performance trade-off via automated feature engineering](https://doi.org/10.1016/j.dss.2021.113556).
+- Small fixes for compatibility with `sets` package.
 
 # version 0.1.2
 

R/safely_detect_changepoints.R

@@ -25,7 +25,6 @@
 #' data <- c(rnorm(15, 0), rnorm(20, 2), rnorm(30, 8))
 #' safely_detect_changepoints(data)
 #' safely_detect_changepoints(data, penalty = 25)
-#'
 #' @export
 
 safely_detect_changepoints <- function(data, penalty = "MBIC", nquantiles = 10) {
@@ -120,7 +119,7 @@ cost <- function(data, u, v, sumstat, K) { #function that evaluates cost of data
 
 }
 
-#' @importFrom sets set_union
+#' @importFrom sets set_union set
 PELT_algorithm <- function(data, penalty_value, sumstat, K) {
 
   if (is.null(data)) {
@@ -166,13 +165,13 @@ PELT_algorithm <- function(data, penalty_value, sumstat, K) {
     #updating R set for next iterations - removing those points that can never be the last optimal changepoint
     for (tau in R) {
       if (Q[tau+1] + cost(data, tau+1, v, sumstat, K) > Q[v+1] + epsilon) {
-        R <- R - tau
+        R <- R - set(tau)
       }
     }
     R <- set_union(R, v)
   }
 
-  cpts_final <- cp[[n+1]] - 0
+  cpts_final <- cp[[n+1]] - set(0)
 
   return(sort(unlist(cpts_final)))
 

inst/CITATION

@@ -5,7 +5,7 @@ bibentry(bibtype = "Article",
   pages = "113556",
   year = "2021",
   issn = "0167-9236",
-  doi = "https://doi.org/10.1016/j.dss.2021.113556",
+  doi = "10.1016/j.dss.2021.113556",
   url = "https://www.sciencedirect.com/science/article/pii/S016792362100066X",
   author = "Alicja Gosiewska and Anna Kozak and Przemyslaw Biecek",
 )

inst/WORDLIST

@@ -4,6 +4,8 @@ Bemowo
 Bielany
 CMD
 DALEX
+doi
+dss
 GBM
 Hannan
 Kaggle
@@ -32,6 +34,7 @@ github
 glm
 https
 interpretable
+interpretability
 kaggle
 mcquitty
 param