| 123456789101112131415161718192021 |
- #'
- #' Funktsioon qgis'i algoritmi leidmiseks fraasi järele.
- #'
- qgis_algorithm_search_by_word <- function(str = NULL) {
- if (is.null(str)) {
- return(NULL)
- }
- # str = "filedownloader"
- ## QGIi algoritmide nimekiri. Jätame 6 esimest päiserida ja viimase rea välja.
- algs <- qgis_algorithms(query = FALSE, quiet = TRUE)
- # Algoritmi otsimine fraasi järele ja vastava indeksi leidmine
- ids <- grep(str, algs$algorithm)
- # leitid algoritmid
- algs.id <- cbind2(ids, algs[ids, ])
- colnames(algs.id) <- c("id", colnames(algs))
- algs.id
- }
- # qgis_algorithm_search_by_word(str="centroid")
- # qgis_algorithm_search_by_word(str="filedownloader")
- # qgis_algorithm_search_by_word(str="")
- # qgis_algorithm_search_by_word()
|