cmf_krr_ecvr: External n-fold cross-validation with reshuffings
In conmolfields: Continuous molecular fields

External n-fold cross-validation with reshuffings

1	cmf_krr_ecvr(act_all_fname = "activity-all.txt", act_colnum = 2, sep = ",", kernels_all_fname = "ligands-kernels-all.RData", ecvr_fname = "ligands-ecvr.RData", ...)

`act_all_fname`
`act_colnum`
`sep`
`kernels_all_fname`
`ecvr_fname`
`...`

##---- 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 (act_all_fname = "activity-all.txt", act_colnum = 2, 
    sep = ",", kernels_all_fname = "ligands-kernels-all.RData", 
    ecvr_fname = "ligands-ecvr.RData", ...) 
{
    act <- read.table(act_all_fname, header = TRUE, sep = sep)
    y <- act[, act_colnum]
    load(kernels_all_fname)
    ecvr <- cmf_krr_ecvr_mem(y = y, kernels = kernels, ...)
    save(ecvr, file = ecvr_fname)
    ecvr
  }