diff --git a/NAMESPACE b/NAMESPACE index f9bbb46..26b8c85 100644 --- a/NAMESPACE +++ b/NAMESPACE @@ -16,4 +16,4 @@ export(define_nir) export(define_red) export(define_rededge) export(define_yellow) -export(konwersja_temp) +export(ortho_download_big_area_rgugik) diff --git a/R/aoi_sample.R b/R/aoi_sample.R.gitignore similarity index 100% rename from R/aoi_sample.R rename to R/aoi_sample.R.gitignore diff --git a/R/konwersja_temp.R b/R/konwersja_temp.R deleted file mode 100644 index 4c11d25..0000000 --- a/R/konwersja_temp.R +++ /dev/null @@ -1,15 +0,0 @@ -#' Konwersja temperatur -#' @description -#' Przelicza temperaturÄ™ -#' -#' @param temperatura_f -#' -#' @return przeliczona temperatura -#' @export -#' -#' @examples konwersja_temp(40) - -konwersja_temp = function(temperatura_f){ - (temperatura_f - 32) / 1.8 -} - diff --git a/R/ortho_download_big_area_rgugik.R b/R/ortho_download_big_area_rgugik.R new file mode 100644 index 0000000..1dd0bb5 --- /dev/null +++ b/R/ortho_download_big_area_rgugik.R @@ -0,0 +1,23 @@ + +#' Title +#' +#' @param x - path to your shapefile +#' @param y - integer of length 1 or 2, number of grid cells in x and y direction (columns, rows) +#' +#' @return +#' @export +#' +#' @examples +ortho_download_big_area_rgugik=function(x,y){ + aoi=sf::st_read(x) + grid=sf::st_make_grid(aoi, n=y) + aoi=sf::st_intersection(aoi,grid) + plot(aoi) + result=data_frame() + for (i in 1:length(aoi$geometry)) { + req_df=rgugik::ortho_request(aoi[i,]) + result=dplyr::bind_rows(req_df, result) + } + return(result) + print("This tools is based on https://github.com/kadyb/rgugik") +} diff --git a/R/raster_sample.R b/R/raster_sample.R.gitignore similarity index 100% rename from R/raster_sample.R rename to R/raster_sample.R.gitignore diff --git a/man/foRestools-package.Rd b/man/foRestools-package.Rd new file mode 100644 index 0000000..6beb0c2 --- /dev/null +++ b/man/foRestools-package.Rd @@ -0,0 +1,24 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/foRestools-package.R +\docType{package} +\name{foRestools-package} +\alias{foRestools} +\alias{foRestools-package} +\title{foRestools: Tools for foresters} +\description{ +\if{html}{\figure{logo.png}{options: style='float: right' alt='logo' width='120'}} + +Calculate vegetation indices and generate statistics and charts for user defined districts +} +\seealso{ +Useful links: +\itemize{ + \item \url{https://j-miszczyszyn.github.io/foRestools/} +} + +} +\author{ +\strong{Maintainer}: First Last \email{jakub.miszczyszyn@urk.edu.pl} (\href{https://orcid.org/0009-0002-8592-946X}{ORCID}) + +} +\keyword{internal} diff --git a/man/konwersja_temp.Rd b/man/konwersja_temp.Rd deleted file mode 100644 index 56d21be..0000000 --- a/man/konwersja_temp.Rd +++ /dev/null @@ -1,20 +0,0 @@ -% Generated by roxygen2: do not edit by hand -% Please edit documentation in R/konwersja_temp.R -\name{konwersja_temp} -\alias{konwersja_temp} -\title{Konwersja temperatur} -\usage{ -konwersja_temp(temperatura_f) -} -\arguments{ -\item{temperatura_f}{} -} -\value{ -przeliczona temperatura -} -\description{ -Przelicza temperaturÄ™ -} -\examples{ -konwersja_temp(40) -} diff --git a/man/ortho_download_big_area_rgugik.Rd b/man/ortho_download_big_area_rgugik.Rd new file mode 100644 index 0000000..9da47a9 --- /dev/null +++ b/man/ortho_download_big_area_rgugik.Rd @@ -0,0 +1,20 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/ortho_download_big_area_rgugik.R +\name{ortho_download_big_area_rgugik} +\alias{ortho_download_big_area_rgugik} +\title{Title} +\usage{ +ortho_download_big_area_rgugik(x, y) +} +\arguments{ +\item{x}{\itemize{ +\item path to your shapefile +}} + +\item{y}{\itemize{ +\item integer of length 1 or 2, number of grid cells in x and y direction (columns, rows) +}} +} +\description{ +Title +}