Browse Source

Kustutatud 'pk_bbox'.

Ardo Kubjas 5 years ago
parent
commit
f0ba91a296
3 changed files with 0 additions and 67 deletions
  1. 0 1
      NAMESPACE
  2. 0 32
      R/pk_boundary_box.R
  3. 0 34
      man/pk_bbox.Rd

+ 0 - 1
NAMESPACE

@@ -22,7 +22,6 @@ export(gpkg_piirkonnale_polygoonide_lisamine)
 export(gpkg_piirkonnale_punktide_lisamine)
 export(gpkg_piirkonnale_ruudustike_lisamine)
 export(gpkg_sellest_alustame_gpkg_loomist)
-export(pk_bbox)
 export(qgis_algorithm_search_by_word)
 export(qgis_show_help)
 importFrom(magrittr,"%>%")

+ 0 - 32
R/pk_boundary_box.R

@@ -1,32 +0,0 @@
-#' Piirkonna piirikast BB
-#'
-#' Funktsioon leiab etteantud piirkonnale piirikasti (boundary box). Tulemuseks on 'qgis_vector'.
-#' @param x	object of class 'sf', 'sfc' or 'sfg'.
-#' @param type num select value: 1-3. 0: Envelope (Bounding Box), 1: Minimum Oriented Rectangle, 2: Minimum Enclosing Circle, 3: Convex Hull.
-#' @return The object with class 'qgis_object'.
-#' @seealso [qgisprocess::qgis_run_algorithm()], [qgisprocess::qgis_output()], [ruut::get_config()]
-#' @keywords piirkond, boundarybox
-#' @export
-#' @examples
-#' \dontrun{
-#'
-#' class(pk)
-#' # > [1] "sf" ...
-#'
-#' pk_bbox(x = pk, type = 1)
-#'
-#' }
-pk_bbox <- function(x = NULL, type = 0) {
-  if (!is.null(x) && sf::st_is_valid(x) && type %in% (seq(0:3) - 1)) {
-    result <- qgisprocess::qgis_run_algorithm(
-      algorithm = "qgis:minimumboundinggeometry",
-      INPUT = x,
-      TYPE = type,
-      .quiet = TRUE
-    )
-    # sf::read_sf(qgisprocess::qgis_output(result, "OUTPUT"))
-    result
-  } else {
-    NULL
-  }
-}

+ 0 - 34
man/pk_bbox.Rd

@@ -1,34 +0,0 @@
-% Generated by roxygen2: do not edit by hand
-% Please edit documentation in R/pk_boundary_box.R
-\name{pk_bbox}
-\alias{pk_bbox}
-\title{Piirkonna piirikast BB}
-\usage{
-pk_bbox(x = NULL, type = 0)
-}
-\arguments{
-\item{x}{object of class 'sf', 'sfc' or 'sfg'.}
-
-\item{type}{num select value: 1-3. 0: Envelope (Bounding Box), 1: Minimum Oriented Rectangle, 2: Minimum Enclosing Circle, 3: Convex Hull.}
-}
-\value{
-The object with class 'qgis_object'.
-}
-\description{
-Funktsioon leiab etteantud piirkonnale piirikasti (boundary box). Tulemuseks on 'qgis_vector'.
-}
-\examples{
-\dontrun{
-
-class(pk)
-# > [1] "sf" ...
-
-pk_bbox(x = pk, type = 1)
-
-}
-}
-\seealso{
-\code{\link[qgisprocess:qgis_run_algorithm]{qgisprocess::qgis_run_algorithm()}}, \code{\link[qgisprocess:is_qgis_result]{qgisprocess::qgis_output()}}, \code{\link[=get_config]{get_config()}}
-}
-\keyword{boundarybox}
-\keyword{piirkond,}