24小时热门版块排行榜    

查看: 1435  |  回复: 4
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

悠悠飘杨

新虫 (小有名气)

[求助] 请问哪位大神会用R软件计算微生物多样性指数? 已有1人参与

请问哪位大神会用R软件计算微生物多样性指数?我的一些高通量实验数据想做一些特殊的分析,为此需要学习一下用R软件计算微生物多样性指数,
请会做的大神把详细的过程写给我好吗?非常感谢!
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tanglianfa

金虫 (著名写手)

同求,找到的有不少差距
5楼2021-05-15 11:22:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

yanjinjg

金虫 (小有名气)

【答案】应助回帖

library(vegan)
otu=read.table("otu.txt",header=T)
otu=otu.matrix(otu)#将数据类型转化为矩阵
Shannon.Wiener <- diversity(otu,index="shannon"#计算香农指数
Simpson <- diversity(otu,index="simpson"
Inverse.Simpson <- diversity(otu,index="inv"
S <- specnumber(otu)#计算物种累计数
plot(S)
J <- Shannon.Wiener/log(S) #计算Pielou均匀度指数
J
2楼2015-07-06 09:54:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yanjinjg

金虫 (小有名气)

【答案】应助回帖

otu=read.table("otu.txt",header=T)
otu=otu.matrix(otu) #将数据类型转化为矩阵
Shannon.Wiener <- diversity(otu,index="shannon" #计算香农指数
Simpson <- diversity(otu,index="simpson"
Inverse.Simpson <- diversity(otu,index="inv"
S <- specnumber(otu)  #计算物种累计数
plot(S)
J <- Shannon.Wiener/log(S)   #计算Pielou均匀度指数
J
3楼2015-07-06 09:56:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yanjinjg

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★
悠悠飘杨: 金币+7, ★★★★★最佳答案, 非常感谢 2015-07-07 08:25:51
不知道怎么回事,半括号发上去成笑脸了,你在跑R程序时候自动补全吧
4楼2015-07-06 09:57:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 6/300 2026-08-11 13:19 by JACS/Angew
[基金申请] FileCode能看出啥? +7 要乐观耀哥 2026-08-10 17/850 2026-08-11 10:50 by 要乐观耀哥
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +5 布布和一二 2026-08-10 6/300 2026-08-11 10:15 by 医学老男孩
[基金申请] filecode +9 documentary 2026-08-10 9/450 2026-08-11 10:08 by wk7465
[基金申请] 应该是93bebmhtak前后十一个字符比较关键 +15 Lanmanbaby 2026-08-09 23/1150 2026-08-11 09:51 by demonstreets
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +8 家与远方 2026-08-10 13/650 2026-08-11 09:49 by 家与远方
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +10 yufeiwaner 2026-08-09 11/550 2026-08-10 18:47 by yufeiwaner
[基金申请] 关于代码变化问题,想知道的进来 +17 且听虎啸 2026-08-07 24/1200 2026-08-10 18:35 by zhangduo2008
[基金申请] 静等基金结果 +5 gjjjzhong 2026-08-10 16/800 2026-08-10 17:19 by Tide man
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] fileCode有新解读? +10 Tide man 2026-08-08 18/900 2026-08-09 12:55 by 仁砚薪传
[基金申请] 化学口download_prp&amp;fileCode的固定段好像这几天一直没变,有变的大神么? +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 固定端突然变了,今天 +6 archvillain 2026-08-06 10/500 2026-08-07 16:03 by 医学老男孩
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] 求各位大神看下 100+6 hpkpkpkp 2026-08-05 33/1650 2026-08-06 14:49 by zhiyanjiang
[基金申请] 影响面上的因素 +8 布布和一二 2026-08-05 11/550 2026-08-06 10:41 by 宝贝虫子
[基金申请] 好消息?这个有何含义??? +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
信息提示
请填处理意见