ペアワイズ比較、Rコード、ベクトル

Question

13個のデータセット（13個の独立した実験）のペアワイズ比較を行いたいと思います。実験の間に細胞数が異なるので、x値（2つの細胞集団サイズの比）でデータを補正することが必要である。ベクター

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)} 

はしかし、私はので、私はそれらの条件のための私の比較関数を実行することができるもので条件1の各ペアのためのxを計算します。それはI

• 計算条件1、X 2は、条件1および4のためのこれらの条件の比較条件1及び3メイク比較のために、次に
• 計算X、
• 計算xを作成し、作成することを意味します比較など、私は条件の第二のために同じことを始めたい

私は他の12と条件第一の比較で行われていますなど

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のベクトルのリストである。 1番目のリストオブジェクトはcellno/cellno[1]