1)
A mais peixes nas áresa que apresentam mais oxinegnio no rio?
2)
jacc_dist<-vegdist(env, method = "jaccard")
jacc_dist
## 1 2 3 4 5 6 7
## 2 0.05408099
## 3 0.07957433 0.04078758
## 4 0.15888148 0.12340644 0.08960248
## 5 0.18026554 0.14606489 0.11095690 0.03004820
## 6 0.16931083 0.13483349 0.09882124 0.03972017 0.04319700
## 7 0.19308332 0.16673247 0.13325999 0.05277368 0.04049857 0.04598261
## 8 0.25709415 0.22745633 0.19565596 0.12403469 0.09721869 0.11106438 0.08272956
## 9 0.30375488 0.27663016 0.24545225 0.17644140 0.15151399 0.16370617 0.13376471
## 10 0.42109963 0.40935308 0.37992378 0.32116842 0.30764805 0.31139966 0.28512539
## 11 0.55420478 0.54186880 0.51611212 0.46519258 0.45281065 0.46012363 0.42622626
## 12 0.55970065 0.54719187 0.52209706 0.47107379 0.45745995 0.46561013 0.43627402
## 13 0.58931162 0.57772173 0.55413490 0.50525616 0.49262568 0.50100139 0.46858766
## 14 0.60576096 0.59524505 0.57057734 0.52460806 0.51009719 0.51854530 0.48849681
## 15 0.62234458 0.61123012 0.58841712 0.54167172 0.52923931 0.53787075 0.50843941
## 16 0.65751841 0.64698390 0.62481639 0.58165905 0.56814836 0.57649028 0.54678717
## 17 0.68542846 0.67613672 0.65401970 0.61423446 0.59858589 0.60701445 0.58042217
## 18 0.69934028 0.69064591 0.66961936 0.63015150 0.61666667 0.62527253 0.59672924
## 19 0.71851383 0.71090425 0.68946812 0.65183025 0.63822197 0.64687565 0.62327597
## 20 0.74139946 0.73449477 0.71457710 0.67843295 0.66553771 0.67393484 0.64852310
## 21 0.76553813 0.75976961 0.74000299 0.70672618 0.69177781 0.70095321 0.67882270
## 22 0.77344967 0.76796689 0.74841289 0.71603153 0.70062947 0.70978289 0.68534896
## 23 0.78678617 0.78188537 0.76304981 0.73223563 0.71461227 0.72578240 0.70253304
## 24 0.79250715 0.78782648 0.76923738 0.73875761 0.72135938 0.73237877 0.70934246
## 25 0.80464368 0.80056878 0.78258562 0.75347399 0.73661966 0.74726283 0.72491962
## 26 0.81560439 0.81191958 0.79417136 0.76573926 0.74906457 0.75964491 0.73744007
## 27 0.82091946 0.81735477 0.79970195 0.77178889 0.75517626 0.76586451 0.74363286
## 28 0.83202576 0.82890529 0.81163659 0.78507521 0.77051749 0.78006836 0.75769916
## 29 0.84488580 0.84235941 0.82612134 0.80095394 0.78819832 0.79639464 0.77484775
## 30 0.85528763 0.85305892 0.83711609 0.81307004 0.79975454 0.80859087 0.78751205
## 8 9 10 11 12 13 14
## 2
## 3
## 4
## 5
## 6
## 7
## 8
## 9 0.07477439
## 10 0.25266187 0.19264416
## 11 0.39132680 0.34601162 0.21602897
## 12 0.40815049 0.35643042 0.22422854 0.03964769
## 13 0.43452293 0.39191753 0.27473176 0.07861660 0.06899253
## 14 0.45347649 0.41011359 0.29868824 0.11021916 0.10137904 0.03765177
## 15 0.48485424 0.43726128 0.32307510 0.16063348 0.13014280 0.09669465 0.06527181
## 16 0.52313905 0.47900030 0.37433501 0.22893491 0.20769086 0.17451920 0.14702665
## 17 0.55091180 0.51047149 0.41769692 0.27079582 0.25765437 0.21665626 0.18598008
## 18 0.57298726 0.53116860 0.44182339 0.30127901 0.28525340 0.24931675 0.22184557
## 19 0.60296898 0.56312525 0.46997519 0.34714061 0.32401830 0.29790294 0.27082177
## 20 0.62976280 0.59177149 0.50757695 0.38999547 0.36858760 0.34376982 0.31937298
## 21 0.65883054 0.62319505 0.54525289 0.44192881 0.42167444 0.39923294 0.37508767
## 22 0.66518535 0.63051591 0.55885040 0.45414917 0.43818065 0.41249347 0.38931185
## 23 0.67164285 0.64553897 0.58378157 0.47368421 0.47164226 0.43249043 0.40991708
## 24 0.67891736 0.65308548 0.59252959 0.48457020 0.48247242 0.44238149 0.42012532
## 25 0.69599700 0.67144055 0.61461823 0.51363110 0.51168873 0.47399847 0.45312336
## 26 0.70924362 0.68527472 0.63034752 0.53523061 0.53055381 0.49983167 0.47967159
## 27 0.72170202 0.69242415 0.63882412 0.55110955 0.54119228 0.51669787 0.49710261
## 28 0.73564915 0.71045882 0.65855581 0.56807102 0.56691574 0.53228652 0.51317731
## 29 0.75540768 0.73185023 0.68316452 0.60072612 0.59960897 0.56791234 0.55069830
## 30 0.76809628 0.74554209 0.70049499 0.62220960 0.62151748 0.59099464 0.57450505
## 15 16 17 18 19 20 21
## 2
## 3
## 4
## 5
## 6
## 7
## 8
## 9
## 10
## 11
## 12
## 13
## 14
## 15
## 16 0.10231961
## 17 0.15007253 0.07657469
## 18 0.18103673 0.10997249 0.04830232
## 19 0.22394194 0.16300898 0.10750070 0.06413556
## 20 0.27568173 0.21741691 0.16639742 0.12527655 0.07522949
## 21 0.33778626 0.28447197 0.23577864 0.20116003 0.15231516 0.09007483
## 22 0.35734455 0.30195601 0.25485259 0.22243656 0.18236041 0.12016296 0.03670106
## 23 0.39578770 0.34469764 0.29084828 0.26483537 0.23224654 0.17297689 0.09801785
## 24 0.40684776 0.35778905 0.30334799 0.27839874 0.24600360 0.18927741 0.11477049
## 25 0.44105582 0.39548904 0.34447122 0.32131395 0.29149184 0.23749563 0.16885931
## 26 0.46180131 0.41758535 0.36774816 0.34523740 0.31636709 0.26366031 0.19658469
## 27 0.47463768 0.43044455 0.38648918 0.36028375 0.33259379 0.28063231 0.21461348
## 28 0.50296977 0.46306625 0.41717456 0.39644826 0.37018156 0.32191267 0.26039578
## 29 0.54192539 0.50589468 0.46555242 0.44585463 0.42288095 0.38020268 0.32240708
## 30 0.56629873 0.53277221 0.49396633 0.47575069 0.45375633 0.41385698 0.35920745
## 22 23 24 25 26 27 28
## 2
## 3
## 4
## 5
## 6
## 7
## 8
## 9
## 10
## 11
## 12
## 13
## 14
## 15
## 16
## 17
## 18
## 19
## 20
## 21
## 22
## 23 0.06630412
## 24 0.08428622 0.03747719
## 25 0.14053019 0.07895432 0.06207007
## 26 0.16881594 0.13995503 0.11597203 0.09070498
## 27 0.18643226 0.17728501 0.15636918 0.13187704 0.04553021
## 28 0.23490628 0.21414643 0.18908957 0.16125786 0.09635832 0.06611977
## 29 0.29897529 0.28556300 0.26165010 0.23810881 0.17868684 0.15149735 0.09568930
## 30 0.33616213 0.32104547 0.29805632 0.27579256 0.21984398 0.19406575 0.13983856
## 29
## 2
## 3
## 4
## 5
## 6
## 7
## 8
## 9
## 10
## 11
## 12
## 13
## 14
## 15
## 16
## 17
## 18
## 19
## 20
## 21
## 22
## 23
## 24
## 25
## 26
## 27
## 28
## 29
## 30 0.05517110
mean(jacc_dist)
## [1] 0.4430788
mean(dist_subset(jacc_dist, c(1:8)))
## [1] 0.1152549
mean(dist_subset(jacc_dist, c(9:18)))
## [1] 0.2340024
mean(dist_subset(jacc_dist, c(19:28)))
## [1] 0.169097
3)
clust_rio<-hclust(jacc_dist, method = "complete")
clust_graf<-plot(clust_rio, hang=-1)

clust_graf
## NULL
Podemos observar que o dendograma se divide em 3 grandes grupos e
que de maneira geral, cada uma representa uma área do rio.
4)
Não é possivel baixar o pacote para realizar essa questão pois ele
esta desatualizado