File:Binomial distribution cdf.svg

No ''Wikimedia Commons''
Pāriet uz navigāciju Pāriet uz meklēšanu

Sākotnējais fails(SVG fails, definētais izmērs 640 × 480 pikseļi, faila izmērs: 64 KB)

Captions

Captions

Pievieno vienas rindiņas aprakstu, ko šis fails attēlo

Kopsavilkums[labot šo sadaļu]

Apraksts Binomial distribution cumulative distribution function
Datums
Avots Paša darbs
Autors Tayste
SVG veidošana
InfoField
 
The source code of this SVG is invalid due to 42 errors.
 
This W3C-invalid chart was created with R.
 
 This file uses embedded text that can be easily translated using a text editor.
Pirmkods
InfoField

R code

# R source code for Wikipedia SVG plot of Binomial CDF
# by de:User:Sigbert, Feb 2010
 
require("RSvgDevice")

create.binomial.cdf <- function(N, p, colour="black", pch=16) {
 n <- max(length(N),length(p),length(colour),length(pch))
 N <- rep(N,length=n); p <- rep(p,length=n)
 colour <- rep(colour,length=n); pch <- rep(pch,length=n) 

 add.one.series <- function(N, p, colour, pch, maxN) {
   cdf <- pbinom(0:N, N, p)
#   lines(0:N, cdf, type="s", col=colour)
   for (i in 1:N) lines (c(i-1,i), c(cdf[i], cdf[i]), type="s", col=colour)
   lines(c(N,maxN), c(1, 1), type="s", col=colour)
   points(0:N, cdf, col=colour, pch=pch)
 }
 
 par(lwd=1.5, cex=1, mar=c(3.1,2.5,0.5,0.5))
 plot(1, xlim=c(0,max(N)), ylim=c(0,1), type="n", xlab="", ylab="")
 for (i in 1:n)
   add.one.series(N[i],p[i],colour[i],pch[i], max(N))
   
 text = paste("p=",rev(p)," and N=",rev(N),sep="")
 legend(max(N), 0, legend=text, xjust=1, yjust=0,
   pch=rev(pch), lwd=rep(par("lwd"),3), col=rev(colour), y.intersp=1.5, bty="n")
}

devSVG("Binomial_distribution_cdf.svg",width=4,height=3)
create.binomial.cdf(c(40,20,20), c(0.5,0.7,0.5), c("red","green","blue"), c(20,15,18))
dev.off()

Licence[labot šo sadaļu]

Public domain I, the copyright holder of this work, release this work into the public domain. This applies worldwide.
In some countries this may not be legally possible; if so:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

Faila hronoloģija

Uzklikšķini uz datums/laiks kolonnā esošās saites, lai apskatītos, kā šis fails izskatījās tad.

Datums/LaiksAttēlsIzmēriDalībnieksKomentārs
tagadējais2010. gada 13. maijs, plkst. 13.112010. gada 13. maijs, plkst. 13.11 versijas sīktēls640 × 480 (64 KB)Meisterkoch (diskusija | devums)final fix
2010. gada 13. maijs, plkst. 13.022010. gada 13. maijs, plkst. 13.02 versijas sīktēls289 × 217 (62 KB)Meisterkoch (diskusija | devums)fix colours
2010. gada 13. maijs, plkst. 12.482010. gada 13. maijs, plkst. 12.48 versijas sīktēls289 × 217 (40 KB)Meisterkoch (diskusija | devums)change colour coding
2010. gada 12. februāris, plkst. 18.072010. gada 12. februāris, plkst. 18.07 versijas sīktēls1 052 × 744 (56 KB)Meisterkoch (diskusija | devums)format
2010. gada 12. februāris, plkst. 18.042010. gada 12. februāris, plkst. 18.04 versijas sīktēls744 × 1 052 (55 KB)Meisterkoch (diskusija | devums)step function, updated R-code
2008. gada 1. marts, plkst. 20.092008. gada 1. marts, plkst. 20.09 versijas sīktēls434 × 289 (20 KB)Tayste (diskusija | devums){{Information |Description=Binomial distribution cdf |Source=self-made |Date=2 Mar 2008 |Author= Tayste |Permission= |other_versions= }}

Šo failu neizmanto nevienā lapā.

Globālais faila lietojums

Šīs Vikipēdijas izmanto šo failu: