def getProbFactors(fitted, events, evidence): env = Environment() env['fitted'] = fitted str_cpquery = "cpquery(fitted,({}),({}))" suppVals = [ reval(str_cpquery.format(event, evidence), envir=env)[0] for event in events ] return suppVals
def fetch(self, name): """ Fetch the dataset (loads it or evaluates the R associated with it. In R, datasets are loaded into the global environment by default but this function returns an environment that contains the dataset(s). """ if self._datasets is None: self._init_setlist() if name not in self._datasets: raise KeyError('Data set "%s" cannot be found' % name) env = _new_env() _data(StrSexpVector((name, )), **{'package': StrSexpVector((self._packagename, )), 'lib.loc': self._lib_loc, 'envir': env}) return Environment(env)
def __init__(self, string, name): env = Environment() reval(string, env) super(SignatureTranslatedAnonymousPackage, self).__init__(env, name)