比较直观,但是缺点在于如果单细胞样本个数过少且异质性大,导致很难有统计学显著意义
library(ggpubr)
data <- data.frame(Cancer = c(0.5, 0.6, 0.8, 0.2),
Normal = c(0.2, 0.3, 0.7, 0.4),
Celltype = "T cells")
mydata <- reshape2::melt(data,id.vars=c("Celltype"))
ggboxplot(mydata, x = "Celltype", y = "value",
color = "variable", palette = "jama",
add = "jitter") + stat_compare_means(aes(color=variable))

好多文章都有用这个,我的理解是四格表卡方检验计算出来的观测除以期望
| Cell_type | Cancer | Normal |
|---|---|---|
| Tcell | 80 | 200 |
| Bcell | 100 | 120 |
| Tam | 200 | 100 |
例如上述数据,一开始有三类细胞,分别在癌和正常的个数如表所示,那么计算R
o/e 的时候就要构建四格表,以T细胞为例
| Cell_type | Cancer | Normal |
|---|---|---|
| Tcell | 80 | 200 |
| Others | 300 | 220 |
##计算卡方值以及期望和观测值
x <- chisq.test(matrix(c(80,300,200,220),ncol = 2))
Roe <- x$observed / x$expected
Roe
## [,1] [,2]
## [1,] 0.6015038 1.3605442
## [2,] 1.2145749 0.8058608
#p值
paste0("P-value = ",x$p.value)
## [1] "P-value = 6.55065992002061e-15"
可以看出Normal组Roe>1,说明T细胞比例在Normal组相对Cancer组会更多一些
这个其实跟Roe是等同效果,只不过它是利用fisher检验来计算OR值
###T细胞在Cancer组OR值
fisher.test(matrix(c(80,300,200,220),ncol = 2))
##
## Fisher's Exact Test for Count Data
##
## data: matrix(c(80, 300, 200, 220), ncol = 2)
## p-value = 2.184e-15
## alternative hypothesis: true odds ratio is not equal to 1
## 95 percent confidence interval:
## 0.2117305 0.4052156
## sample estimates:
## odds ratio
## 0.2938061
###T细胞在Normal组OR值
fisher.test(matrix(c(200,220,80,300),ncol = 2))
##
## Fisher's Exact Test for Count Data
##
## data: matrix(c(200, 220, 80, 300), ncol = 2)
## p-value = 2.184e-15
## alternative hypothesis: true odds ratio is not equal to 1
## 95 percent confidence interval:
## 2.467822 4.722986
## sample estimates:
## odds ratio
## 3.403605
终: 写这个单纯记录一下过程,避免后面自己忘记了,仅为拙见
我正在学习如何使用Nokogiri,根据这段代码我遇到了一些问题:require'rubygems'require'mechanize'post_agent=WWW::Mechanize.newpost_page=post_agent.get('http://www.vbulletin.org/forum/showthread.php?t=230708')puts"\nabsolutepathwithtbodygivesnil"putspost_page.parser.xpath('/html/body/div/div/div/div/div/table/tbody/tr/td/div
总的来说,我对ruby还比较陌生,我正在为我正在创建的对象编写一些rspec测试用例。许多测试用例都非常基础,我只是想确保正确填充和返回值。我想知道是否有办法使用循环结构来执行此操作。不必为我要测试的每个方法都设置一个assertEquals。例如:describeitem,"TestingtheItem"doit"willhaveanullvaluetostart"doitem=Item.new#HereIcoulddotheitem.name.shouldbe_nil#thenIcoulddoitem.category.shouldbe_nilendend但我想要一些方法来使用
类classAprivatedeffooputs:fooendpublicdefbarputs:barendprivatedefzimputs:zimendprotecteddefdibputs:dibendendA的实例a=A.new测试a.foorescueputs:faila.barrescueputs:faila.zimrescueputs:faila.dibrescueputs:faila.gazrescueputs:fail测试输出failbarfailfailfail.发送测试[:foo,:bar,:zim,:dib,:gaz].each{|m|a.send(m)resc
我正在尝试设置一个puppet节点,但rubygems似乎不正常。如果我通过它自己的二进制文件(/usr/lib/ruby/gems/1.8/gems/facter-1.5.8/bin/facter)在cli上运行facter,它工作正常,但如果我通过由rubygems(/usr/bin/facter)安装的二进制文件,它抛出:/usr/lib/ruby/1.8/facter/uptime.rb:11:undefinedmethod`get_uptime'forFacter::Util::Uptime:Module(NoMethodError)from/usr/lib/ruby
我想了解Ruby方法methods()是如何工作的。我尝试使用“ruby方法”在Google上搜索,但这不是我需要的。我也看过ruby-doc.org,但我没有找到这种方法。你能详细解释一下它是如何工作的或者给我一个链接吗?更新我用methods()方法做了实验,得到了这样的结果:'labrat'代码classFirstdeffirst_instance_mymethodenddefself.first_class_mymethodendendclassSecond使用类#returnsavailablemethodslistforclassandancestorsputsSeco
我在我的项目中添加了一个系统来重置用户密码并通过电子邮件将密码发送给他,以防他忘记密码。昨天它运行良好(当我实现它时)。当我今天尝试启动服务器时,出现以下错误。=>BootingWEBrick=>Rails3.2.1applicationstartingindevelopmentonhttp://0.0.0.0:3000=>Callwith-dtodetach=>Ctrl-CtoshutdownserverExiting/Users/vinayshenoy/.rvm/gems/ruby-1.9.3-p0/gems/actionmailer-3.2.1/lib/action_mailer
设置:狂欢ruby1.9.2高线(1.6.13)描述:我已经相当习惯在其他一些项目中使用highline,但已经有几个月没有使用它了。现在,在Ruby1.9.2上全新安装时,它似乎不允许在同一行回答提示。所以以前我会看到类似的东西:require"highline/import"ask"Whatisyourfavoritecolor?"并得到:Whatisyourfavoritecolor?|现在我看到类似的东西:Whatisyourfavoritecolor?|竖线(|)符号是我的终端光标。知道为什么会发生这种变化吗? 最佳答案
我已经从我的命令行中获得了一切,所以我可以运行rubymyfile并且它可以正常工作。但是当我尝试从sublime中运行它时,我得到了undefinedmethod`require_relative'formain:Object有人知道我的sublime设置中缺少什么吗?我正在使用OSX并安装了rvm。 最佳答案 或者,您可以只使用“require”,它应该可以正常工作。我认为“require_relative”仅适用于ruby1.9+ 关于ruby-主要:Objectwhenrun
我有一个具有一些属性的模型:attr1、attr2和attr3。我需要在不执行回调和验证的情况下更新此属性。我找到了update_column方法,但我想同时更新三个属性。我需要这样的东西:update_columns({attr1:val1,attr2:val2,attr3:val3})代替update_column(attr1,val1)update_column(attr2,val2)update_column(attr3,val3) 最佳答案 您可以使用update_columns(attr1:val1,attr2:val2
我不确定传递给方法的对象的类型是否正确。我可能会将一个字符串传递给一个只能处理整数的函数。某种运行时保证怎么样?我看不到比以下更好的选择:defsomeFixNumMangler(input)raise"wrongtype:integerrequired"unlessinput.class==FixNumother_stuffend有更好的选择吗? 最佳答案 使用Kernel#Integer在使用之前转换输入的方法。当无法以任何合理的方式将输入转换为整数时,它将引发ArgumentError。defmy_method(number)