1:- module(rint, [interval/2, interval/3, op(150, xfx, ...), op(800, xfx, <-)]). 2 3:- multifile r_hook/1. 4:- multifile r_hook/2. 5:- multifile int_hook/4. 6:- multifile eval_hook/2. 7:- multifile mono/2. 8:- multifile interval_/3. 9:- multifile instantiate/2. 10 11:- set_prolog_flag(float_overflow, infinity). 12:- set_prolog_flag(float_undefined, nan). 13:- set_prolog_flag(float_zero_div, infinity). 14 15:- nb_setval(digits, 2). 16 17:- consult([lib/interface, lib/core, lib/op, lib/rint_op]).
26% Binomial distribution
27% - Cumulated density lower-tail: interval(pbinom(X, N, P, true), Res)
28% - Cumulated density upper-tail: interval(pbinom(X, N, P, false), Res)
29% - Quantile: interval(qbinom(Alpha, N, P, true), Res)
30% - Density: interval(dbinom(X, N, P), Res)
31%
32% Normal distribution
33% - Cumulated density: interval(pnorm(X, Mu, Sigma), Res)
34% - Quantile: interval(qnorm(P, Mu, Sigma), Res)
35% - Density: interval(dnorm(X, Mu, Sigma), Res)
36%
37% T distribution
38% - Cumulated density lower-tail: interval(pt(X, Df, true), Res)
39% - Cumulated density upper-tail: interval(pt(X, Df, false), Res)
40% - Quantile: interval(qt(P, Df), Res)
41% - Density: interval(dt(X, Df), Res)
Use intervals in R functions.
This module expands the 'interval' module with R functions. For general information on the use of interval/2, please refer to that module. /