dcard(x, mu, rho, log=FALSE)
pcard(q, mu, rho)
qcard(p, mu, rho, tolerance = 1e-07, maxits = 500)
rcard(n, mu, rho, ...)
cardioid
for more information.tolerance
controls for the accuracy and
maxits
is the maximum number of iterations.
rcard
log=TRUE
then the logarithm of the density is returned.dcard
gives the density,
pcard
gives the distribution function,
qcard
gives the quantile function, and
rcard
generates random deviates.cardioid
, the cardioid
.mu = 4; rho = 0.4
x = seq(0, 2*pi, len=501)
plot(x, dcard(x, mu, rho), type="l", las=1, ylim=c(0,1), col="blue",
ylab=paste("[dp]card(mu=", mu, ", rho=", rho, ")"),
main="Blue is density, red is cumulative distribution function",
sub="Purple lines are the 10,20,...,90 percentiles")
lines(x, pcard(x, mu, rho), col="red")
probs = seq(0.1, 0.9, by=0.1)
Q = qcard(probs, mu, rho)
lines(Q, dcard(Q, mu, rho), col="purple", lty=3, type="h")
lines(Q, pcard(Q, mu, rho), col="purple", lty=3, type="h")
abline(h=c(0,probs,1), v=c(0,2*pi), col="purple", lty=3)
max(abs(pcard(Q, mu, rho) - probs)) # Should be 0
Run the code above in your browser using DataLab