var.hom: ~~function to do ... ~~

In jservadio/TrialistNof1: Bayesian N-of-1 calculations

Usage

var.hom(prior, varprior, path)

Arguments

prior
varprior
path

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 (prior, varprior, path) 
{
    if (varprior[[1]] == "prec") {
        cat("\n            prec ~ ", prior$Prior.prec, "\n            sigma <- 1/prec", 
            file = paste(path, "model.txt", sep = ""), append = T, 
            sep = "")
    }
    else if (varprior[[1]] == "Sd") {
        cat("\n            Sd ~ ", prior$Prior.prec, "\n            prec <- 1/pow(Sd,2)\n            Sigma <- 1/prec", 
            file = paste(path, "model.txt", sep = ""), append = T, 
            sep = "")
    }
  }

jservadio/TrialistNof1 documentation built on May 20, 2019, 2:08 a.m.