README.md

Small ForestGEO datasets for examples

lifecycle Travis build
status CRAN
status

Access small example datasets from Luquillo, a ForestGEO site in Puerto Rico.

Installation

Install the latest stable version of fgeo.x from CRAN with:

install.packages("fgeo.x")

Install the development version of fgeo.x from GitHub with:

# install.packages("devtools")
devtools::install_github("forestgeo/fgeo.x")

Or install all fgeo packages in one step.

Example

library(fgeo.x)

Some datasets available in fgeo.x:

str(elevation)
#> List of 4
#>  $ col :Classes 'tbl_df', 'tbl' and 'data.frame':    6565 obs. of  3 variables:
#>   ..$ x   : int [1:6565] 0 0 0 0 0 0 0 0 0 0 ...
#>   ..$ y   : int [1:6565] 0 5 10 15 20 25 30 35 40 45 ...
#>   ..$ elev: num [1:6565] 364 364 363 363 363 ...
#>  $ mat : num [1:101, 1:65] 364 364 363 363 363 ...
#>  $ xdim: int 320
#>  $ ydim: int 500

str(habitat)
#> Classes 'fgeo_habitat', 'tbl_df', 'tbl' and 'data.frame':    400 obs. of  3 variables:
#>  $ gx      : num  0 0 0 0 0 0 0 0 0 0 ...
#>  $ gy      : num  0 20 40 60 80 100 120 140 160 180 ...
#>  $ habitats: int  1 1 1 1 1 1 1 1 1 1 ...

str(tree5)
#> Classes 'tbl_df', 'tbl' and 'data.frame':    30 obs. of  19 variables:
#>  $ treeID   : int  7624 8055 19930 23746 31702 35355 35891 39705 50184 57380 ...
#>  $ stemID   : int  160987 10036 117849 29677 39793 44026 44634 48888 60798 155867 ...
#>  $ tag      : chr  "108958" "109482" "123493" "14473" ...
#>  $ StemTag  : chr  "175325" "109482" "165576" "14473" ...
#>  $ sp       : chr  "TRIPAL" "CECSCH" "CASARB" "PREMON" ...
#>  $ quadrat  : chr  "722" "522" "425" "617" ...
#>  $ gx       : num  138.7 94.8 61.3 100.3 53.8 ...
#>  $ gy       : num  425.3 424.4 495.7 328 73.8 ...
#>  $ MeasureID: int  486675 468874 471979 442571 447307 449169 434266 451067 437645 459427 ...
#>  $ CensusID : int  5 5 5 5 5 5 5 5 5 5 ...
#>  $ dbh      : num  10.9 165 23.6 170 67 50 269 67 240 16.6 ...
#>  $ pom      : chr  "1.3" "1.3" "1.3" "1.3" ...
#>  $ hom      : num  1.3 1.3 1.3 1.32 1.37 1.4 1.26 1.5 1.3 1.3 ...
#>  $ ExactDate: Date, format: "2012-02-01" "2012-01-30" ...
#>  $ DFstatus : chr  "alive" "alive" "alive" "alive" ...
#>  $ codes    : chr  "SPROUT;A" "MAIN;A" "SPROUT;A" "MAIN;A" ...
#>  $ nostems  : num  2 1 2 1 1 1 1 5 1 3 ...
#>  $ status   : chr  "A" "A" "A" "A" ...
#>  $ date     : num  19024 19022 19051 18967 18821 ...

str(stem5)
#> Classes 'tbl_df', 'tbl' and 'data.frame':    30 obs. of  19 variables:
#>  $ treeID   : int  4832 9689 23686 23903 24526 24978 25534 30954 32644 34407 ...
#>  $ stemID   : int  5905 12178 29616 29911 30750 31380 32193 38949 40902 42945 ...
#>  $ tag      : chr  "10554" "111528" "14406" "14637" ...
#>  $ StemTag  : chr  "10554" "111528" "14406" "14637" ...
#>  $ sp       : chr  "MANBID" "CORBOR" "PREMON" "PREMON" ...
#>  $ quadrat  : chr  "212" "1524" "417" "1017" ...
#>  $ gx       : num  30.8 289 69 193.7 194.2 ...
#>  $ gy       : num  235 465 335 334 359 ...
#>  $ MeasureID: int  440357 469305 442528 442708 443140 443418 435148 446883 447786 435787 ...
#>  $ CensusID : int  5 5 5 5 5 5 5 5 5 5 ...
#>  $ dbh      : num  148 NA 154 195 360 185 328 15.7 60 124 ...
#>  $ pom      : chr  "1.5" NA "1.3" "1.2" ...
#>  $ hom      : num  1.48 NA 1.3 1.2 1.4 1.4 1.5 1.3 1.29 1.35 ...
#>  $ ExactDate: Date, format: "2011-09-30" "2012-02-17" ...
#>  $ DFstatus : chr  "alive" "stem dead" "alive" "alive" ...
#>  $ codes    : chr  "MAIN;A" "MAIN;A;LS;DP;ST" "MAIN;A" "MAIN;A" ...
#>  $ countPOM : num  1 1 1 1 1 1 1 1 1 1 ...
#>  $ status   : chr  "A" "G" "A" "A" ...
#>  $ date     : num  18900 19040 18966 19010 19009 ...

str(vft_4quad)
#> Classes 'tbl_df', 'tbl' and 'data.frame':    500 obs. of  32 variables:
#>  $ DBHID           : int  480614 467103 466804 388646 481054 388453 411794 411798 411761 388160 ...
#>  $ PlotName        : chr  "luquillo" "luquillo" "luquillo" "luquillo" ...
#>  $ PlotID          : int  1 1 1 1 1 1 1 1 1 1 ...
#>  $ Family          : chr  "Fabaceae-mimosoideae" "Salicaceae" "Meliaceae" "Salicaceae" ...
#>  $ Genus           : chr  "Inga" "Casearia" "Guarea" "Casearia" ...
#>  $ SpeciesName     : chr  "laurina" "sylvestris" "guidonia" "arborea" ...
#>  $ Mnemonic        : chr  "INGLAU" "CASSYL" "GUAGUI" "CASARB" ...
#>  $ Subspecies      : chr  NA NA NA NA ...
#>  $ SpeciesID       : int  128 73 117 70 70 185 184 117 184 70 ...
#>  $ SubspeciesID    : chr  NA NA NA NA ...
#>  $ QuadratName     : chr  "721" "621" "721" "622" ...
#>  $ QuadratID       : int  327 326 327 342 343 342 343 343 342 343 ...
#>  $ PX              : num  126 115 127 110 126 ...
#>  $ PY              : num  413 405 412 431 420 ...
#>  $ QX              : num  5.75 14.59 6.64 9.9 5.66 ...
#>  $ QY              : num  13.1 4.9 11.9 10.7 0.5 ...
#>  $ TreeID          : int  108604 2092 871 8811 109474 8475 109467 109471 109438 7843 ...
#>  $ Tag             : chr  "154809" "102365" "100975" "110415" ...
#>  $ StemID          : int  143326 2555 114203 11057 144288 115993 144281 144285 144248 115875 ...
#>  $ StemNumber      : int  0 0 0 0 0 0 0 0 0 0 ...
#>  $ StemTag         : int  154809 102365 154808 110415 156286 156210 156268 156281 156223 156272 ...
#>  $ PrimaryStem     : chr  NA NA NA NA ...
#>  $ CensusID        : int  5 5 5 4 5 4 4 4 4 4 ...
#>  $ PlotCensusNumber: int  5 5 5 4 5 4 4 4 4 4 ...
#>  $ DBH             : num  30.8 74 22.3 NA 33.8 NA NA 16.5 NA 44.6 ...
#>  $ HOM             : num  1.3 1.3 1.3 NA 1.3 NA NA 1.3 NA 1.3 ...
#>  $ ExactDate       : Date, format: "2012-01-31" "2012-01-30" ...
#>  $ Date            : int  19023 19022 19023 17122 19024 17125 17126 17126 17125 17126 ...
#>  $ ListOfTSM       : chr  "MAIN;A" "MAIN;A" "SPROUT;A" "MAIN;A;LS;B" ...
#>  $ HighHOM         : int  1 1 1 1 1 1 1 1 1 1 ...
#>  $ LargeStem       : chr  NA NA NA NA ...
#>  $ Status          : chr  "alive" "alive" "alive" "broken below" ...

Some other datasets that install with fgeo.x:

example_path()
#>  [1] "csv"           "mixed_files"   "rdata"         "rdata_one"    
#>  [5] "rds"           "taxa.csv"      "tsv"           "vft_4quad.csv"
#>  [9] "view"          "weird"         "xl"

dir(example_path("view"))
#> [1] "taxa.csv"      "vft_4quad.csv"

str(read.csv(example_path("vft_4quad.csv")))
#> 'data.frame':    500 obs. of  32 variables:
#>  $ DBHID           : int  385164 385261 384600 608789 388579 384626 410958 385102 353163 481018 ...
#>  $ PlotName        : Factor w/ 1 level "luquillo": 1 1 1 1 1 1 1 1 1 1 ...
#>  $ PlotID          : int  1 1 1 1 1 1 1 1 1 1 ...
#>  $ Family          : Factor w/ 20 levels "Araliaceae","Arecaceae",..: 17 20 17 17 2 1 17 15 2 19 ...
#>  $ Genus           : Factor w/ 30 levels "Alchornea","Alchorneopsis",..: 25 6 25 25 24 27 25 23 24 5 ...
#>  $ SpeciesName     : Factor w/ 36 levels " hirsuta","acuminata",..: 9 29 9 7 2 23 9 14 2 4 ...
#>  $ Mnemonic        : Factor w/ 37 levels "ALCFLO","ALCLAT",..: 32 7 32 31 30 34 32 28 30 5 ...
#>  $ Subspecies      : logi  NA NA NA NA NA NA ...
#>  $ SpeciesID       : int  185 74 185 184 182 196 185 174 182 70 ...
#>  $ SubspeciesID    : logi  NA NA NA NA NA NA ...
#>  $ QuadratName     : int  621 621 721 621 622 721 721 621 722 622 ...
#>  $ QuadratID       : int  326 326 327 326 342 327 327 326 343 342 ...
#>  $ PX              : num  119 109 133 117 113 ...
#>  $ PY              : num  414 411 416 412 424 ...
#>  $ QX              : num  19 9.4 12.9 16.6 12.6 ...
#>  $ QY              : num  13.64 10.52 15.9 11.58 3.62 ...
#>  $ TreeID          : int  1990 2177 797 124957 84880 862 108712 1848 26708 109413 ...
#>  $ Tag             : int  102244 102466 100889 175166 110271 100964 154949 102088 17576 156180 ...
#>  $ StemID          : int  2419 114525 981 163153 103483 1068 143443 2248 33769 144222 ...
#>  $ StemNumber      : int  0 0 0 0 0 0 0 0 0 0 ...
#>  $ StemTag         : int  102244 154442 100888 175166 110271 100964 154949 102088 17576 156180 ...
#>  $ PrimaryStem     : logi  NA NA NA NA NA NA ...
#>  $ CensusID        : int  4 4 4 6 4 4 4 4 4 5 ...
#>  $ PlotCensusNumber: int  4 4 4 6 4 4 4 4 4 5 ...
#>  $ DBH             : num  NA NA NA 34.6 171 NA NA NA 163 36.2 ...
#>  $ HOM             : num  NA NA NA 1.3 1.3 NA NA NA 1.35 1.3 ...
#>  $ ExactDate       : Factor w/ 14 levels "2006-11-16","2006-11-17",..: 2 2 4 10 2 4 5 1 3 7 ...
#>  $ Date            : int  17122 17122 17126 20662 17122 17126 17127 17121 17125 19023 ...
#>  $ ListOfTSM       : Factor w/ 16 levels "MAIN;A","MAIN;A;C",..: 8 14 14 1 1 8 8 8 1 1 ...
#>  $ HighHOM         : int  1 1 1 1 1 1 1 1 1 1 ...
#>  $ LargeStem       : logi  NA NA NA NA NA NA ...
#>  $ Status          : Factor w/ 4 levels "alive","broken below",..: 3 4 4 1 1 3 3 3 1 1 ...

Download data from fgeo.data:

str(download_data("luquillo_stem6_random"))
#> Classes 'tbl_df', 'tbl' and 'data.frame':    1320 obs. of  19 variables:
#>  $ treeID   : int  104 119 180 180 180 180 602 631 647 1086 ...
#>  $ stemID   : int  143 158 222 223 224 225 736 775 793 1339 ...
#>  $ tag      : chr  "10009" "100104" "100171" "100171" ...
#>  $ StemTag  : chr  "10009" "100104" "100095" "100096" ...
#>  $ sp       : chr  "DACEXC" "MYRSPL" "CASARB" "CASARB" ...
#>  $ quadrat  : chr  "113" "1021" "921" "921" ...
#>  $ gx       : num  10.3 182.9 164.6 164.6 164.6 ...
#>  $ gy       : num  245 410 410 410 410 ...
#>  $ MeasureID: int  582850 578696 NA NA 617046 617049 614253 598429 614211 603131 ...
#>  $ CensusID : int  6 6 NA NA 6 6 6 6 6 6 ...
#>  $ dbh      : num  195 44.9 NA NA NA 46.1 33.1 139 248 176 ...
#>  $ pom      : chr  "1.45" "1.25" NA NA ...
#>  $ hom      : num  1.45 1.26 NA NA NA 1.34 1.3 1.25 1.35 1.42 ...
#>  $ ExactDate: Date, format: "2016-04-20" "2016-08-04" ...
#>  $ DFstatus : chr  "alive" "alive" NA NA ...
#>  $ codes    : chr  "MAIN;A" "MAIN;A" NA NA ...
#>  $ countPOM : num  1 1 NA NA 1 1 1 1 1 1 ...
#>  $ status   : chr  "A" "A" "G" "G" ...
#>  $ date     : num  20564 20670 NA NA 20670 ...

Get started with fgeo

Information



Try the fgeo.x package in your browser

Any scripts or data that you put into this service are public.

fgeo.x documentation built on June 8, 2019, 1:04 a.m.