diff --git a/NAMESPACE b/NAMESPACE index 3be96dac8..9f7e1f11d 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -337,9 +337,6 @@ S3method(sits_cube,default) S3method(sits_cube,local_cube) S3method(sits_cube,sar_cube) S3method(sits_cube,stac_cube) -S3method(sits_detect_change,default) -S3method(sits_detect_change,raster_cube) -S3method(sits_detect_change,sits) S3method(sits_get_data,csv) S3method(sits_get_data,data.frame) S3method(sits_get_data,default) @@ -443,9 +440,6 @@ export(sits_config) export(sits_config_show) export(sits_cube) export(sits_cube_copy) -export(sits_detect_change) -export(sits_detect_change_method) -export(sits_dtw) export(sits_factory_function) export(sits_filter) export(sits_formula_linear) diff --git a/R/sits_detect_change.R b/R/sits_detect_change.R index 6cf1a8b3e..9bf7ffa0a 100644 --- a/R/sits_detect_change.R +++ b/R/sits_detect_change.R @@ -38,7 +38,6 @@ #' each point (tibble of class "sits") #' or a data cube indicating detections in each pixel #' (tibble of class "detections_cube"). -#' @export sits_detect_change <- function(data, cd_method, ..., @@ -49,7 +48,6 @@ sits_detect_change <- function(data, } #' @rdname sits_detect_change -#' @export sits_detect_change.sits <- function(data, cd_method, ..., @@ -74,7 +72,6 @@ sits_detect_change.sits <- function(data, } #' @rdname sits_detect_change -#' @export sits_detect_change.raster_cube <- function(data, cd_method, ..., roi = NULL, @@ -180,7 +177,6 @@ sits_detect_change.raster_cube <- function(data, } #' @rdname sits_detect_change -#' @export sits_detect_change.default <- function(data, cd_method, ...) { stop("Input should be a sits tibble or a data cube") } diff --git a/R/sits_detect_change_method.R b/R/sits_detect_change_method.R index b27c0230e..e92cb843b 100644 --- a/R/sits_detect_change_method.R +++ b/R/sits_detect_change_method.R @@ -12,8 +12,6 @@ #' @return Change detection method prepared #' to be passed to #' \code{\link[sits]{sits_detect_change}} -#' @export -#' sits_detect_change_method <- function(samples, cd_method = sits_dtw()) { # set caller to show in errors .check_set_caller("sits_detect_change_method") diff --git a/R/sits_dtw.R b/R/sits_dtw.R index 34d0480c8..18617381f 100644 --- a/R/sits_dtw.R +++ b/R/sits_dtw.R @@ -19,8 +19,6 @@ #' used in operations with data cubes. #' @return Change detection method prepared to be passed to #' \code{\link[sits]{sits_detect_change_method}} -#' @export -#' sits_dtw <- function(samples = NULL, ...,