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相关推荐

  1. 一文学会基因型和表型关联分析算法GEMMA

    基于GEMMA算法分析与细菌表型相关的基因型 1.介绍 1.1 介绍_简介 1.2 介绍_优点 1.2.1介绍_优点_排除了连锁不平衡的干扰3级标题 1.2.2介绍_优点_速度快 2.实际操作 2.1 ...

  2. GTEx:基因型和基因表达量关联数据库

    欢迎关注"生信修炼手册"! GTEx全称如下 Genotype-Tissue Expression 该项目对来自人体多个组合和器官的样本,同时进行了转录组测序和基因分型分析,构建了 ...

  3. WGCNA将共表达基因与表型数据相关联

    欢迎关注微信公众号<生信修炼手册>! 单纯的共表达基因集合的结果并不能与我们的实验设计相关联,对于识别到的几十个共表达基因集合,一一进行富集分析去挖掘其功能,看上去如此的盲目,没有目的性, ...

  4. 「华大基因」追风做BaaS平台,基因科技和区块链能碰撞出什么未来?

    编者按:4月3日起,针对网信办近期公布的境内区块链信息服务备案项目,Odaily星球日报推出「直击链企」栏目,对首批 197个已备案区块链信息技术全方位解读. 欢迎各方朋友关注支持,与我们一起把握区块 ...

  5. 图示不写程序如何根据dbSNP rs号批量获取基因组坐标、相关基因和表型影响

    最近有个项目希望更新rs号的坐标到hg38的组装,不想下载全部dbSNP的数据,就通过ENSEMBL的Biomart做一下提取和转换. 截图操作如下: 首先打开网址:http://asia.ensem ...

  6. 用Python语言模型和LSTM做一个Drake饶舌歌词生成器!自己蒙了!

    未来AI的主要应用是在建立能够学习数据然后生成原创内容的网络.这个想法已经充分应用于在自然语言处理(NLP)领域,这也是AI社区能够搭建出所谓语言模型的原因:语言模型的前提是学习句子在文章段落中的组成 ...

  7. 通过基因组选择预测杂交水稻的表现(数据挖掘)

    基因组选择, 预测杂种优势, 在水稻可以用, 在玉米, 高粱中也可以用, 在动物选择配套系时也可以用, 根据加性效应和非加性效应进行预测. 前景广阔. 这篇文章的作者, 有很多大牛, 徐世忠老师, 专 ...

  8. 利用一个核雄性不育基因构建杂交水稻雄性不育系统

    利用一个核雄性不育基因构建杂交水稻雄性不育系统 邓兴旺院士和唐晓艳教授领衔的深圳作物分子设计研究院近日在<美国国家科学院院报>(PNAS)上发表论文<<利用一个核雄性不育基因构 ...

  9. 文献阅读---对β-三酮除草剂具有广谱抗性的一个水稻基因研究

    文献:对β-三酮除草剂具有广谱抗性的一个水稻基因研究 1. 简介β-三酮除草剂类型 2. 简述和总结Report的研究内容和结果 2.1 研究动机 2.2 研究材料和方法 2.3 研究结果 3. 心得 ...

最新文章

  1. python输出到语音播放_用Python写一个语音播放软件
  2. 记前端项目首屏加载优化(网络篇)
  3. python 带参数的多重继承
  4. Fibonacci数列 矩阵快速幂
  5. react把表格渲染好ui_《RSUITE》React企业级UI框架实战评测
  6. Last non-zero Digit in N! HDU - 1066
  7. ubuntu 通过 海康sdk调用摄像头抓图片
  8. 二维有限体积 matlab,二维有限体积法计算热传导及源码.pdf
  9. 前端学习(2354):image组件的基本使用
  10. Matlab——图像平移
  11. 遍历结果集java_java – 循环遍历while循环后如何将结果集重置为第一行
  12. 结果不对_男子去医院抽血体检,拿到化验单发现不对劲,医院:医生专业不精...
  13. linux下安装共享软件,Linux 系统下各种包的安装方法分享
  14. ICS工业控制安全类方向赛题简单总结
  15. 数论_埃氏筛法(求区间内多少素数)
  16. kali linux国内源
  17. web资源分享(视频、资料)
  18. 一次 truncate 核心表衍生的安全管理思考
  19. sublime text 打开txt文档乱码问题
  20. 文件包含漏洞及漏洞利用

热门文章

  1. mysql 自定义函数 递归查找父节点
  2. pyside2 系列之QMainWindow和QWidget
  3. 在云计算圈儿,她们都能顶大半边天!
  4. 微信小程序获取formId
  5. 查看肺结节图像(luna16)
  6. 微信小程序h5页面分享设置
  7. C 语言中的数组(补充)
  8. 怎么将pdf文件转换成图片?三种方法
  9. 对当今手机圈的一点看法
  10. Docker安装Nginx并修改Nginx配置文件