File: plot_binomial_distribution.rkcommands.R

package info (click to toggle)
rkward 0.8.2-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 45,628 kB
  • sloc: cpp: 50,489; xml: 9,596; javascript: 6,401; python: 21; makefile: 13
file content (15 lines) | stat: -rw-r--r-- 359 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
local({
## Print result
rk.header ("Binomial density function", parameters=list("Lower quantile"="0",
	"Upper quantile"="12",
	"Number of trials"="12",
	"Probability of success on each trial"="0.50",
	"Logarithmic"="no",
	"Function"="dbinom"))

rk.graph.on ()
try ({
	curve (dbinom(x, size=12, prob=0.50), from=0, to=12, n=13, type="p")
})
rk.graph.off ()
})