R.DGEOM(x,psuc,give_log)
x: observation
psuc: the probability of success in each trial
give_log: if true, log of the result will be returned instead
This function returns the probability density function of the geometric distribution.
R.PGEOM, R.QGEOM.