Π£ Π½Π°Ρ Π²Ρ ΠΌΠΎΠΆΠ΅ΡΠ΅ ΠΏΠΎΡΠΌΠΎΡΡΠ΅ΡΡ Π±Π΅ΡΠΏΠ»Π°ΡΠ½ΠΎ ΠΠ΅ΡΠ΅ΡΡΠ°Π½ΠΎΠ²ΠΎΡΠ½ΡΠΉ ΠΌΠ½ΠΎΠ³ΠΎΠΌΠ΅ΡΠ½ΡΠΉ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΎΠ½Π½ΡΠΉ Π°Π½Π°Π»ΠΈΠ· Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ ΠΌΠ°ΡΡΠΈΡ ΡΠ°ΡΡΡΠΎΡΠ½ΠΈΠΉ Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½... ΠΈΠ»ΠΈ ΡΠΊΠ°ΡΠ°ΡΡ Π² ΠΌΠ°ΠΊΡΠΈΠΌΠ°Π»ΡΠ½ΠΎΠΌ Π΄ΠΎΡΡΡΠΏΠ½ΠΎΠΌ ΠΊΠ°ΡΠ΅ΡΡΠ²Π΅, Π²ΠΈΠ΄Π΅ΠΎ ΠΊΠΎΡΠΎΡΠΎΠ΅ Π±ΡΠ»ΠΎ Π·Π°Π³ΡΡΠΆΠ΅Π½ΠΎ Π½Π° ΡΡΡΠ±. ΠΠ»Ρ Π·Π°Π³ΡΡΠ·ΠΊΠΈ Π²ΡΠ±Π΅ΡΠΈΡΠ΅ Π²Π°ΡΠΈΠ°Π½Ρ ΠΈΠ· ΡΠΎΡΠΌΡ Π½ΠΈΠΆΠ΅:
ΠΡΠ»ΠΈ ΠΊΠ½ΠΎΠΏΠΊΠΈ ΡΠΊΠ°ΡΠΈΠ²Π°Π½ΠΈΡ Π½Π΅
Π·Π°Π³ΡΡΠ·ΠΈΠ»ΠΈΡΡ
ΠΠΠΠΠΠ’Π ΠΠΠΠ‘Π¬ ΠΈΠ»ΠΈ ΠΎΠ±Π½ΠΎΠ²ΠΈΡΠ΅ ΡΡΡΠ°Π½ΠΈΡΡ
ΠΡΠ»ΠΈ Π²ΠΎΠ·Π½ΠΈΠΊΠ°ΡΡ ΠΏΡΠΎΠ±Π»Π΅ΠΌΡ ΡΠΎ ΡΠΊΠ°ΡΠΈΠ²Π°Π½ΠΈΠ΅ΠΌ Π²ΠΈΠ΄Π΅ΠΎ, ΠΏΠΎΠΆΠ°Π»ΡΠΉΡΡΠ° Π½Π°ΠΏΠΈΡΠΈΡΠ΅ Π² ΠΏΠΎΠ΄Π΄Π΅ΡΠΆΠΊΡ ΠΏΠΎ Π°Π΄ΡΠ΅ΡΡ Π²Π½ΠΈΠ·Ρ
ΡΡΡΠ°Π½ΠΈΡΡ.
Π‘ΠΏΠ°ΡΠΈΠ±ΠΎ Π·Π° ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ ΡΠ΅ΡΠ²ΠΈΡΠ° ClipSaver.ru
ΠΠ΅ΡΠΌΡΡΠ°ΡΠΈΠΎΠ½Π½ΡΠΉ ΠΌΠ½ΠΎΠ³ΠΎΠΌΠ΅ΡΠ½ΡΠΉ Π΄ΠΈΡΠΏΠ΅ΡΡΠΈΠΎΠ½Π½ΡΠΉ Π°Π½Π°Π»ΠΈΠ· Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ ΠΌΠ°ΡΡΠΈΡ ΡΠ°ΡΡΡΠΎΡΠ½ΠΈΠΉ library(vegan) ΠΎΠ±ΡΠ΅Π΄ΠΈΠ½Π΅Π½ΠΈΠ΅ Π²ΡΠ΅Ρ Π·Π°Π²ΠΈΡΠΈΠΌΡΡ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΡΡ attach(ECO) DV=ECO[1:30]# Π²Π°ΡΠΈΠ°Π½Ρ 1 DV=rbind(Achimill,Agrostol,Airaprae,Alopgeni.....ΠΈ Ρ.Π΄.)# Π²Π°ΡΠΈΠ°Π½Ρ 2 adon1=adonis2(DV ~A1,method="bray",perm=999) adon2=adonis2(DV~A1*Management, method="bray",perm=999) adon3=adonis2(DV ~Management,method="bray",perm=999) ΠΌΠ½ΠΎΠ³ΠΎΡΡΠΎΠ²Π½Π΅Π²ΠΎΠ΅ ΠΏΠΎΠΏΠ°ΡΠ½ΠΎΠ΅ ΡΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Ρ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΠ΅ΠΌ ΠΠ΄ΠΎΠ½ΠΈΡ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° (ΠΈΠ½ΡΡΡΡΠΌΠ΅Π½ΡΡ ΡΠ°Π·ΡΠ°Π±ΠΎΡΡΠΈΠΊΠ°) install_github("pmartinezarbizu/pairwiseAdonis/pairwiseAdonis") ############ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ°(ΠΏΠΎΠΏΠ°ΡΠ½ΠΎΠΠ΄ΠΎΠ½ΠΈΡ) Pairwise.adonis(ECO[1:30],ECO$Management) Π΅Π²ΠΊΠ»ΠΈΠ΄ΠΎΠ²ΠΎ ΡΡ ΠΎΠ΄ΡΡΠ²ΠΎ ΠΈΠ· ΠΊΠΎΡΡΠ΅ΠΊΡΠΈΠΈ Π²Π΅Π³Π΄ΠΈΡΡΠ° ΠΈ Ρ ΠΎΠ»ΠΌΠ° pairwise.adonis(x=ECO[1:30],factors=ECO$Management,sim.function='vegdist',sim.method='euclian',p.adjust.m='holm') #ΡΡ ΠΎΠ΄ΡΡΠ²ΠΎ ΠΌΠ°Π½Ρ ΡΡΡΠ΅Π½Π° ΠΈΠ· ΡΠΎΠΌΠ°ΡΠΊΠΈ ΠΈ Π±ΠΎΠ½ΡΠ΅ΡΡΠΎΠ½ΠΈ ΠΊΠΎΡΡΠ΅ΠΊΡΠΈΡ pairwise.adonis(x=ECO[1:30],factors=ECO$Management,sim.function='daisy',sim.method='manhattan',p.adjust.m='bonferroni') Π΄Π»Ρ Π²Π·Π°ΠΈΠΌΠΎΠ΄Π΅ΠΉΡΡΠ²ΠΈΡ factors=interaction(A1,Management) pairwise.adonis(ECO[1:30],factors) pairwise.adonis(x=ECO[1:30],factors=factors,sim.function='vegdist',sim.method='euclidian',p.adjust.m='BH')