DPQmpfr (version 0.3-3)

DPQmpfr-package: tools:::Rd_package_title("DPQmpfr")

Description

tools:::Rd_package_description("DPQmpfr")

Author

tools:::Rd_package_author("DPQmpfr")

Maintainer: tools:::Rd_package_maintainer("DPQmpfr")

Details

The DESCRIPTION file: tools:::Rd_package_DESCRIPTION("DPQmpfr") tools:::Rd_package_indices("DPQmpfr")

See Also

Packages DPQ, Rmpfr are both used by this package.

Examples

## An example how mpfr-numbers  "just work" with reasonable R functions:
.srch <- search() ; doAtt <- is.na(match("Rmpfr:package", .srch))
if(doAtt) require(Rmpfr)
nu.s <- 2^seqMpfr(mpfr(-30, 64), mpfr(100, 64), by = 1/mpfr(4, 64))
b0 <- DPQ::b_chi(nu.s)
b1 <- DPQ::b_chi(nu.s, one.minus=TRUE)
stopifnot(inherits(b0,"mpfr"), inherits(b1, "mpfr"),
          b0+b1 == 1,  diff(log(b1)) < 0)
plot(nu.s,          log(b1),  type="l", log="x")
plot(nu.s[-1], diff(log(b1)), type="l", log="x")
if(doAtt) # detach the package(s) we've attached above
  for(pkg in setdiff(search(), .srch)) detach(pkg, character.only=TRUE)