明智的比较，R代码，矢量

Question

我想对13个数据集进行成对比较（13个独立实验）。由于细胞数量在实验中不同，因此需要用x值（两个细胞群体大小的比率）校正数据。向量

cellno <- c(2.3, 0.5, 1.3, 1.0, 1.6, 1.0, 1.0, 0.8, 1.2, 0.6, 0.8, 0.9, 0.9)

包含有关单元格编号的信息。因此，我从向量中选择第一个值（即2.3）并将每个其他数除以2.3得到x。

n <- cellno [1]
for (i in n:length(cellno)) {print (cellno [i] / n)}

但是，我想逐个计算每对条件的x，这样我就可以为这些条件运行比较函数。这意味着我

• 计算条件1和2的x，然后比较这些条件，然后
• 为条件1和3计算x进行比较，
• 计算条件1和4的x并进行比较等。

当我完成条件1st与其他12的比较时，我想为条件第2等开始相同。

Answer 1

基本上我列出了值，然后使用lapply()对所有13个值进行比较。

cellno <- c(2.3, 0.5, 1.3, 1.0, 1.6, 1.0, 1.0, 0.8, 1.2, 0.6, 0.8, 0.9, 0.9)
cellno.list <- as.list(cellno)
comparisons <- lapply(cellno.list,FUN = function(x) cellno / x)

comparisions是13个向量的列表。第一个列表对象是cellno / cellno[1]