Número total de observações para cada espécie, em cada Unidade de Conservação e em cada ano

A função contar_n_obs_sp_uc_ano() gera uma tabela contendo o número total de observações para cada espécie, em cada Unidade de Conservação e em cada ano.

Usage

contar_n_obs_sp_uc_ano(dados = monitora_aves_masto_florestal)

Arguments

dados

recebe a tibble gerada pela função filtrar_dados(). Por configuração, carrega a base de dados burtos de aves e médios e grandes mamíferos do Pojeto Monitora Componente Florestal monitora_aves_masto_florestal.

Value

Retorna um objeto do tipo tibble contendo seis colunas, nome_uc que contem o nome da Unidade de Conservação, nome_uc_abv que contem o nome abreviado da Unidade de Conservação, nome_sp contendo o nome da espécie, nome_sp_abv que contem o nome abreviado da espécie, ano que contem o ano em que a espécie foi amostrada e n contendo o número de observações realizadas para espécie em cada ano.

Author

Vitor N. T. Borges-Junior Luciana A. Fusinatto

Examples

# número de observações para cada espécie, em cada UC e por ano - dados brutos
contar_n_obs_sp_uc_ano()
#> # A tibble: 3,279 × 6
#>    nome_uc               nome_uc_abv          nome_sp    nome_sp_abv   ano     n
#>    <fct>                 <fct>                <fct>      <fct>       <dbl> <int>
#>  1 esec_da_terra_do_meio esec_da_terr_do_meio aburria_c… abur_cuju    2014     3
#>  2 esec_da_terra_do_meio esec_da_terr_do_meio aburria_c… abur_cuju    2016     1
#>  3 esec_da_terra_do_meio esec_da_terr_do_meio aburria_c… abur_cuju    2017     5
#>  4 esec_da_terra_do_meio esec_da_terr_do_meio aburria_c… abur_cuju    2018     1
#>  5 esec_da_terra_do_meio esec_da_terr_do_meio alouatta_… alou_disc    2018     1
#>  6 esec_da_terra_do_meio esec_da_terr_do_meio ateles_ma… atel_marg    2014     4
#>  7 esec_da_terra_do_meio esec_da_terr_do_meio ateles_ma… atel_marg    2016     5
#>  8 esec_da_terra_do_meio esec_da_terr_do_meio ateles_ma… atel_marg    2017     1
#>  9 esec_da_terra_do_meio esec_da_terr_do_meio ateles_ma… atel_marg    2018     4
#> 10 esec_da_terra_do_meio esec_da_terr_do_meio callicebu… call_viei    2014    23
#> # ℹ 3,269 more rows

dados_filtrados <- filtrar_dados(
dados = monitora_aves_masto_florestal,
  nome_uc == "resex_tapajos_arapiuns"
)

contar_n_obs_sp_uc_ano(dados_filtrados)
#> # A tibble: 263 × 6
#>    nome_uc                nome_uc_abv nome_sp            nome_sp_abv   ano     n
#>    <fct>                  <fct>       <fct>              <fct>       <dbl> <int>
#>  1 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2016     2
#>  2 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2017    12
#>  3 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2018     5
#>  4 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2019     3
#>  5 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2020     3
#>  6 resex_tapajos_arapiuns rese_tapa   aburria_cujubi     abur_cuju    2021     5
#>  7 resex_tapajos_arapiuns rese_tapa   alouatta_nigerrima alou_nige    2014     4
#>  8 resex_tapajos_arapiuns rese_tapa   alouatta_nigerrima alou_nige    2015    12
#>  9 resex_tapajos_arapiuns rese_tapa   alouatta_nigerrima alou_nige    2016    10
#> 10 resex_tapajos_arapiuns rese_tapa   alouatta_nigerrima alou_nige    2017    28
#> # ℹ 253 more rows