Erreur getLRGeneSignatures apres fetch/merge

[ZheFrench]

J'ai fusionné ton code avec mon code.
Ça se fait parfaitement bien.
Tu me diras si je peux pusher du coup .
En testant par contre ya une erreur qui vient de getLRGeneSignatures

signed est pas defini : renvoi NULL
signed <- infParam(obj)$signed

Dc la suite bug

    for (i in seq_len(nrow(pairs))){
        tg <- t.genes[[i]]
        stop()
        if (signed)
            t.genes[[i]] <- tg[pairs$rank[i]:length(tg)]
        else{
            corr <- tg.corr[[i]]
            o <- order(corr**2)
            t.genes[[i]] <- tg[o][pairs$rank[i]:length(tg)]
        }
    }