对基因型和表型做t.test
t.test参考部分
参考链接:
https://zhuanlan.zhihu.com/p/126351774
https://zhuanlan.zhihu.com/p/123907459
因为只有数值型基因型和表型,想用tassel产生p-value很困难。所以老师建议用t检验。代码和数据如下。
第一列是表型值,第二列及后面每列都是标记。可以说行是个体,列是基因型值。
#计算p-value
# peaks.win <- matrix(NA, 2000, 4)
data(wheat)
test <- read.table("t_test.txt",sep = "\t",header = T)
ev1 <- cbind(test[,5],t(wheat.X))
# colnames(peaks.win) <- c("ev1","ev2","ev3","ev4")
# # t.test(ev1[,2],ev1[,1],paired = F)
# for (i in 1:1279) {
# peaks.win[i,1] = t.test(ev1[,i+1],ev1[,1],paired = F)[["statistic"]][["t"]]
# peaks.win[i,2] = t.test(ev2[,i+1],ev2[,1],paired = F)[["statistic"]][["t"]]
# peaks.win[i,3] = t.test(ev3[,i+1],ev3[,1],paired = F)[["statistic"]][["t"]]
# peaks.win[i,4] = t.test(ev4[,i+1],ev4[,1],paired = F)[["statistic"]][["t"]]
# }
# peaks.win <- na.omit(peaks.win)
ev1 <- as.data.frame(ev1)
rownames(ev1)<-NULL
colnames(ev1)[1]<-"pvalue"
library(Metrics)
threshold = c(0.1,0.01,0.001,0.0001,0.00001,1e-06,1e-07,5e-08,3e-08,1e-08,1e-09,1e-10,1e-11)
j=4
for (a in 1:length(threshold)) {w.X <- subset(ev1, pvalue < threshold[a])w.X <- w.X[-1]w.X <- t(w.X)X=scale(w.X)/sqrt(ncol(w.X))#G=tcrossprod(X) # tcrossprod(A,B),AB'(A乘以B的转置)pheno <- wheat.Y[,1:4] # 所有性状peaks.win <- matrix(NA, 2000, 5)colnames(peaks.win) <- c("threshold","env1","env2","env3","env4")peaks.win[a,1] = threshold[a]
}
最后产生的就是该表型下每个标记的t检验下的p-value。
对基因型和表型做t.test相关推荐
- 一文学会基因型和表型关联分析算法GEMMA
基于GEMMA算法分析与细菌表型相关的基因型 1.介绍 1.1 介绍_简介 1.2 介绍_优点 1.2.1介绍_优点_排除了连锁不平衡的干扰3级标题 1.2.2介绍_优点_速度快 2.实际操作 2.1 ...
- GTEx:基因型和基因表达量关联数据库
欢迎关注"生信修炼手册"! GTEx全称如下 Genotype-Tissue Expression 该项目对来自人体多个组合和器官的样本,同时进行了转录组测序和基因分型分析,构建了 ...
- WGCNA将共表达基因与表型数据相关联
欢迎关注微信公众号<生信修炼手册>! 单纯的共表达基因集合的结果并不能与我们的实验设计相关联,对于识别到的几十个共表达基因集合,一一进行富集分析去挖掘其功能,看上去如此的盲目,没有目的性, ...
- 「华大基因」追风做BaaS平台,基因科技和区块链能碰撞出什么未来?
编者按:4月3日起,针对网信办近期公布的境内区块链信息服务备案项目,Odaily星球日报推出「直击链企」栏目,对首批 197个已备案区块链信息技术全方位解读. 欢迎各方朋友关注支持,与我们一起把握区块 ...
- 图示不写程序如何根据dbSNP rs号批量获取基因组坐标、相关基因和表型影响
最近有个项目希望更新rs号的坐标到hg38的组装,不想下载全部dbSNP的数据,就通过ENSEMBL的Biomart做一下提取和转换. 截图操作如下: 首先打开网址:http://asia.ensem ...
- 用Python语言模型和LSTM做一个Drake饶舌歌词生成器!自己蒙了!
未来AI的主要应用是在建立能够学习数据然后生成原创内容的网络.这个想法已经充分应用于在自然语言处理(NLP)领域,这也是AI社区能够搭建出所谓语言模型的原因:语言模型的前提是学习句子在文章段落中的组成 ...
- 通过基因组选择预测杂交水稻的表现(数据挖掘)
基因组选择, 预测杂种优势, 在水稻可以用, 在玉米, 高粱中也可以用, 在动物选择配套系时也可以用, 根据加性效应和非加性效应进行预测. 前景广阔. 这篇文章的作者, 有很多大牛, 徐世忠老师, 专 ...
- 利用一个核雄性不育基因构建杂交水稻雄性不育系统
利用一个核雄性不育基因构建杂交水稻雄性不育系统 邓兴旺院士和唐晓艳教授领衔的深圳作物分子设计研究院近日在<美国国家科学院院报>(PNAS)上发表论文<<利用一个核雄性不育基因构 ...
- 文献阅读---对β-三酮除草剂具有广谱抗性的一个水稻基因研究
文献:对β-三酮除草剂具有广谱抗性的一个水稻基因研究 1. 简介β-三酮除草剂类型 2. 简述和总结Report的研究内容和结果 2.1 研究动机 2.2 研究材料和方法 2.3 研究结果 3. 心得 ...
最新文章
- python输出到语音播放_用Python写一个语音播放软件
- 记前端项目首屏加载优化(网络篇)
- python 带参数的多重继承
- Fibonacci数列 矩阵快速幂
- react把表格渲染好ui_《RSUITE》React企业级UI框架实战评测
- Last non-zero Digit in N! HDU - 1066
- ubuntu 通过 海康sdk调用摄像头抓图片
- 二维有限体积 matlab,二维有限体积法计算热传导及源码.pdf
- 前端学习(2354):image组件的基本使用
- Matlab——图像平移
- 遍历结果集java_java – 循环遍历while循环后如何将结果集重置为第一行
- 结果不对_男子去医院抽血体检,拿到化验单发现不对劲,医院:医生专业不精...
- linux下安装共享软件,Linux 系统下各种包的安装方法分享
- ICS工业控制安全类方向赛题简单总结
- 数论_埃氏筛法(求区间内多少素数)
- kali linux国内源
- web资源分享(视频、资料)
- 一次 truncate 核心表衍生的安全管理思考
- sublime text 打开txt文档乱码问题
- 文件包含漏洞及漏洞利用