getFinalLR: Multipy LRs to get final LR
In califano-lab/OncoSig: What the package does (short line)

This is a helper function for OncoSigNB(). This function gets the final LR given the input dataframe. The first two columns are the name and the response variable, columns 3 and up feature values.

1	getFinalLR(df_1)

df_1

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (df_1) 
{
    to_return = lapply(1:nrow(df_1), function(x) {
        prod(df_1[x, 3:ncol(df_1)])
    })
    return(to_return)
  }