Czy istnieją funkcje domyślne dla dyskretnych równomiernych rozkładów w R?

Większość standardowych dystrybucji w R ma rodzinę poleceń - pdf / pmf, cdf / cmf, kwantyl, losowe odchylenia (na przykład - dnorm, pnorm, qnorm, rnorm).

Wiem, że łatwo jest użyć niektórych standardowych poleceń do odtworzenia tych funkcji dla dyskretnych rozkładów jednorodnych, ale czy istnieje już preferowana wbudowana rodzina funkcji do modelowania dyskretnych rozkładów jednorodnych w R, o której nie wiem?

Jak napisał Nico, nie są one zaimplementowane w R. Zakładając, że pracujemy w wersji 1..k, funkcje te powinny wyglądać następująco:

Do generowania losowego:

rdu<-function(n,k) sample(1:k,n,replace=T)

PDF:

ddu<-function(x,k) ifelse(x>=1 & x<=k & round(x)==x,1/k,0) 

CDF:

pdu<-function(x,k) ifelse(x<1,0,ifelse(x<=k,floor(x)/k,1))

Oto kod dyskretnego rozkładu jednostajnego w zakresie [min, maks.], Zaadaptowany z postu mbq:

dunifdisc<-function(x, min=0, max=1) ifelse(x>=min & x<=max & round(x)==x, 1/(max-min+1), 0)
punifdisc<-function(q, min=0, max=1) ifelse(q<min, 0, ifelse(q>=max, 1, (floor(q)-min+1)/(max-min+1)))
qunifdisc<-function(p, min=0, max=1) floor(p*(max-min+1))
runifdisc<-function(n, min=0, max=1) sample(min:max, n, replace=T)

CRAN Zadanie Widok: Prawdopodobieństwo Dystrybucje strona mówi:

Dyskretny równomierny rozkład można łatwo uzyskać za pomocą podstawowych funkcji.

Chyba coś takiego powinno zrobić:

a <- round(runif(1000, min=0, max=100))

EDYTOWAĆ

Jak zauważył csgillespie, nie jest to poprawne ...

a <- ceiling(runif(1000, min=0, max=100))

będzie jednak działać (zwróć uwagę, że przykład wygeneruje wartości od 1 do 100, a nie od 0 do 100)