Jak wykreślić rozkład dwumianowy w r

Aby wykreślić funkcję masy prawdopodobieństwa dla rozkładu dwumianowego w R, możemy skorzystać z następujących funkcji:

• dbinom(x, size, prob), aby utworzyć funkcję masy prawdopodobieństwa
• plot(x, y, type = 'h’) do wykreślenia funkcji masy prawdopodobieństwa, określając, że wykres jest histogramem (type=’h’)

Aby wykreślić funkcję masy prawdopodobieństwa, wystarczy określić rozmiar   (np. liczba prób) i prob (np. prawdopodobieństwo sukcesu w danej próbie) w funkcji dbinom() .

Na przykład poniższy kod ilustruje sposób wykreślenia funkcji masy prawdopodobieństwa dla rozkładu dwumianowego o rozmiarze = 20 i prawdopodobieństwie = 0,3:

 success <- 0:20

plot(success, dbinom(success, size=20, prob=.3), type='h')

Oś x pokazuje liczbę sukcesów, a oś y prawdopodobieństwo uzyskania tej liczby sukcesów w 20 próbach.

Możemy dodać tytuł, zmienić etykiety osi i zwiększyć szerokość linii, aby fabuła była bardziej estetyczna:

 success <- 0:20

plot(success,dbinom(success,size=20,prob=.3),
     type='h',
     main='Binomial Distribution (n=20, p=0.3)',
     ylab='Probability',
     xlab ='# Successes',
     lwd=3)

Możesz użyć poniższego kodu, aby uzyskać rzeczywiste prawdopodobieństwa dla każdej liczby sukcesów wyświetlonych na wykresie:

 #prevent R from displaying numbers in scientific notation
options(scipen=999) 

#define range of successes
success <- 0:20

#display probability of success for each number of trials
dbinom(success, size=20, prob=.3)

[1] 0.00079792266297612 0.00683933711122388 0.02784587252426865
[4] 0.07160367220526231 0.13042097437387065 0.17886305056987975
[7] 0.19163898275344257 0.16426198521723651 0.11439673970486122
[10] 0.06536956554563482 0.03081708090008504 0.01200665489613703
[13] 0.00385928193090119 0.00101783259716075 0.00021810698510587
[16] 0.00003738976887529 0.00000500755833151 0.00000050496386536
[19] 0.00000003606884753 0.00000000162716605 0.00000000003486784

Dodatkowe zasoby

Wprowadzenie do rozkładu dwumianowego
Zrozumienie kształtu rozkładu dwumianowego