README.Rmd

---
output: github_document
---

<!-- README.md is generated from README.Rmd. Please edit that file -->

```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%"
)
```

# paisaje <img align="right" width="180" src="man/figures/paisaje_logo.png">

<!-- badges: start -->
<!-- badges: end -->

The goal of paisaje is to provide tools for landscape analysis.

## Installation

You can install the development version of paisaje from [GitHub](https://github.com/) with:

``` r
install.packages("devtools")
devtools::install_github("ManuelSpinola/paisaje")
```

## Example

This is a basic example which shows you how to use the package:

```{r}
#| message: false
#| warning: false
library(paisaje)
library(tidyverse)
library(sf)
library(h3jsr)
```

Let's bring an sf object

```{r}
#| message: false
#| warning: false
nc = st_read(system.file("shape/nc.shp", package="sf"))
```

Create an h3 grid of resolution 4

```{r}
#| message: false
#| warning: false
h3_grid_nc <- get_h3_grid(nc, resolution = 4)
```

Make a map

```{r}
ggplot() +
  theme_minimal() +
  geom_sf(data = nc, color = "blue", linewidth = 0.5) +
  geom_sf(data = h3_grid_nc, alpha = 0.4, color = "coral", linewidth = 0.5)
```