search for: double_homo

Displaying 2 results from an estimated 2 matches for "double_homo".

2007 Oct 19
1
(no subject)
...;-"L(B)a(j)" result.df ### The loop written to find Double Homozygotes for (a in seq(1,(ncol(X)-3), by=2)){ for (b in seq(3,(ncol(X)-1), by=2)){ for (i in a){ j <- a+1 for (k in b){ l <- b+1 match.rows <- ((X [,i] == X [, j] ) & ( X [,k] == X [, l])) double_homo_i <- X [match.rows, i] double_homo_k <- X [match.rows, k] double_homo<- cbind( double_homo_i, double_homo_k) double_homo.df<-data.frame(double_homo,Counts=2) names(double_homo.df)[1]<-"L(A)a(i)" names(double_homo.df)[2]<- "L(B)a(j)"...
2007 Oct 19
1
conduct pairwise column comparisons without comparing a column to itself
...;-"L(B)a(j)" result.df ### The loop written to find Double Homozygotes for (a in seq(1,(ncol(X)-3), by=2)){ for (b in seq(3,(ncol(X)-1), by=2)){ for (i in a){ j <- a+1 for (k in b){ l <- b+1 match.rows <- ((X [,i] == X [, j] ) & ( X [,k] == X [, l])) double_homo_i <- X [match.rows, i] double_homo_k <- X [match.rows, k] double_homo<- cbind( double_homo_i, double_homo_k) double_homo.df<-data.frame(double_homo,Counts=2) names(double_homo.df)[1]<-"L(A)a(i)" names(double_homo.df)[2]<- "L(B)a(j)"...