| 查看: 12641 | 回复: 7 | ||
[求助]
VPA分析（Vegan包Varpart程序） 已有1人参与
|
|
这是varpart自带example，求大神解读：三个因子，为什么跑完程序图中会出现四个圈？ data(mite) data(mite.env) data(mite.pcnm) # two explanatory data frames -- hellinger-transform y mod <- varpart(mite, mite.env, mite.pcnm, transfo="hel" ) mod ## use fill colours showvarparts(2, bg = c("hotpink","skyblue" )) plot(mod, bg = c("hotpink","skyblue" )) ## test fraction [a] using partial rda, '~ .' in formula tells to use ## all variables of data mite.env. afrac <- rda(decostand(mite, "hel" ) , mite.env, mite.pcnm) anova(afrac) ## rsquareadj gives the same result as component [a] of varpart rsquareadj(afrac) ## partition bray-curtis dissimilarities varpart(vegdist(mite), mite.env, mite.pcnm) ## three explanatory tables with formula interface mod <- varpart(mite, ~ subsdens + watrcont, ~ substrate + shrub + topo, mite.pcnm, data=mite.env, transfo="hel" ) mod showvarparts(3, bg=2:4) plot(mod, bg=2:4) ## use rda to test fraction [a] ## matrix can be an argument in formula rda.result <- rda(decostand(mite, "hell" ) ~ subsdens + watrcont + condition(substrate + shrub + topo) + condition(as.matrix(mite.pcnm)), data = mite.env) anova(rda.result) ## four explanatory tables mod <- varpart(mite, ~ subsdens + watrcont, ~substrate + shrub + topo, mite.pcnm[,1:11], mite.pcnm[,12:22], data=mite.env, transfo="hel" ) mod plot(mod, bg=2:5) ## show values for all partitions by putting 'cutoff' low enough: plot(mod, cutoff = -inf, cex = 0.7, bg=2:5) [ last edited by jjdg on 2019-5-7 at 09:11 ] [ Last edited by jjdg on 2019-5-7 at 09:11 ] |
回复此楼» 猜你喜欢
不要再数国自然申请书的 filecode 的分隔符个数了
已经有21人回复
-
投英文期刊如何查重
已经有5人回复
-
伯胺上甲基求助
已经有7人回复
-
生命口面上会评结束了吗大家有知道结果吗？现在还没有结果正常不？
已经有8人回复
-
跨出版社商投稿
已经有5人回复
-
5个%2F，非固定段22个字母
已经有7人回复
-
生命口C13面上会评时间
已经有10人回复
-
生生命学部会评
已经有4人回复
-
H口，面上，时间戳7月7日。
已经有3人回复
-
小木虫没落了，除了祈祷帖子，几乎看不到有价值的帖子
已经有14人回复
xp198766
铁杆木虫 (著名写手)
小木虫职业打酱油滴~~！
- 应助: 5 (幼儿园)
- 金币: 6525.1
- 散金: 262
- 红花: 25
- 帖子: 2193
- 在线: 554小时
- 虫号: 1046859
- 注册: 2010-06-24
- 性别: GG
- 专业: 环境微生物学
2楼2019-04-22 08:24:09
3楼2019-05-06 15:44:13
| 一直看赖老师的书和文章，听课的感觉完全不同。老师很专业，讲解很耐心，小白也收获很多。帮老师宣传一下，有兴趣的朋友们可以报名。http://mp.weixin.qq.com/s?__biz= ... 3&srcid=#rd |
4楼2019-05-27 11:14:53
wuchao924929
新虫 (初入文坛)
- 应助: 1 (幼儿园)
- 金币: 18
- 散金: 29
- 红花: 2
- 帖子: 46
- 在线: 43.8小时
- 虫号: 1944264
- 注册: 2012-08-18
- 专业: 环境工程
5楼2019-08-29 21:01:09
6楼2020-05-01 13:22:25
chenhezhou
新虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 803.3
- 散金: 88
- 红花: 2
- 帖子: 228
- 在线: 105小时
- 虫号: 3773922
- 注册: 2015-03-30
- 性别: GG
- 专业: 环境工程
7楼2020-07-08 15:58:07
8楼2021-03-28 20:22:20