← Back to branch summary

~ubuntu-branches/debian/sid/rkward/sid

« back to all changes in this revision

Viewing changes to tests/distributions/chi_squared_probabilities.rkcommands.R

  • Committer: Bazaar Package Importer
  • Author(s): Thomas Friedrichsmeier
  • Date: 2011-10-23 15:30:00 UTC
  • mfrom: (1.1.18 upstream)
  • Revision ID: james.westby@ubuntu.com-20111023153000-3gutwgotykvcm67s
Tags: 0.5.7-1
* new upstream release
* provide build-arch and build-indep targets
* include buildflags as instructed by the dpkg developers

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/distributions/chi_squared_probabilities.rkcommands.R
 
1
local({
 
2
## Prepare
 
3
## Compute
 
4
result <- (pchisq (q = c (0.97, 0.65), df = 3.00,  ncp = 0.05, lower.tail=TRUE, log.p = FALSE))
 
5
## Print result
 
6
rk.header ("Chi-squared probability", list ("Vector of quantiles", "c (0.97, 0.65)", "Degrees of Freedom", "3.00", "non-centrality parameter", "0.05", "Tail", "lower.tail=TRUE", "Probabilities p are given as", "log.p = FALSE"));
 
7
rk.results (result, titles="Chi-squared probabilities")
 
8
})
 
9
local({
 
10
## Prepare
 
11
## Compute
 
12
result <- (pchisq (q = c (1), df = 1.01,  ncp = 0.02, lower.tail=FALSE, log.p = TRUE))
 
13
## Print result
 
14
rk.header ("Chi-squared probability", list ("Vector of quantiles", "c (1)", "Degrees of Freedom", "1.01", "non-centrality parameter", "0.02", "Tail", "lower.tail=FALSE", "Probabilities p are given as", "log.p = TRUE"));
 
15
rk.results (result, titles="Chi-squared probabilities")
 
16
})