data.subset: Data Subset

In mpoll/scale: The Scaleable Langevin Exact Algorithm -- Reference Implementation

Usage

data.subset(datum.idx.start = 1, length.idxs = dsz)

Arguments

datum.idx.start
length.idxs

Examples

##---- 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 (datum.idx.start = 1, length.idxs = dsz) 
{
    if (exists("examp.design") == FALSE) {
        call.data <- datum(datum.idx.start)
        subset.design <- t(as.matrix(call.data$x))
        subset.data <- call.data$y
        if (length.idxs > 1) {
            for (i in (datum.idx.start + 1):(datum.idx.start + 
                length.idxs - 1)) {
                call.data <- datum(i)
                subset.design <- rbind(subset.design, call.data$x)
                subset.data <- c(subset.data, call.data$y)
            }
        }
    }
    if (exists("examp.design") == TRUE) {
        subset.design <- examp.design[datum.idx.start:(datum.idx.start + 
            length.idxs - 1), ]
        subset.data <- examp.data[datum.idx.start:(datum.idx.start + 
            length.idxs - 1)]
    }
    list(subset.design = subset.design, subset.data = subset.data)
  }

mpoll/scale documentation built on Dec. 9, 2019, 7:15 a.m.