報告書用植生表(被度・ドミン-クラジナ被度 両方対応)
VegetationTable(d = subset(vv, plot == "Arimine"), period = "c04", DK = FALSE)VegetationTable(d=subset(vv,plot=="Arimine"),period="c04",DK=FALSE)
#> # A tibble: 83 × 30
#> sp `1` `2` `3` `4` `5` `6` `7` `8` `9` `10` `11` `12`
#> <chr> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1 アオダモ… 1 3.5 0.5 3 0 0 1 1 0 0 1 3
#> 2 イタヤカ… 0.3 0 0 0 0.5 0.5 0.5 0 0 0 0.5 0.5
#> 3 ウリハダ… 0.5 13 1.5 2 10 1 6 4 1 2 1 2
#> 4 ウワミズ… 0.8 3 3 3 4 2 4 0.5 2 5 0 1
#> 5 オオカメ… 14 37 30 20 15 25 23 35 21 4 20 20
#> 6 オオバク… 10 25 20 4 6 18 15 19 7 7 13 8
#> 7 コシアブ… 4 0 5.5 1.5 0.7 0 1 4 0 2 3 4
#> 8 コマユミ… 0.1 0.5 0 0.5 0.5 0.5 0.5 0 0.5 0 0.2 0.2
#> 9 サワフタ… 2 0 0 0 0 0 0 1.5 7 0.5 0 0
#> 10 タムシバ… 3 0 0 0 0 0 0 0.5 0.5 0 0 0
#> # ℹ 73 more rows
#> # ℹ 17 more variables: `13` <dbl>, `14` <dbl>, `15` <dbl>, `16` <dbl>,
#> # `17` <dbl>, `18` <dbl>, `19` <dbl>, `20` <dbl>, `21` <dbl>, `22` <dbl>,
#> # `23` <dbl>, `24` <dbl>, `25` <dbl>, Mean <dbl>, Frequency <dbl>,
#> # FreqCode <chr>, DominatIndex <dbl>