File:Binomial distribution cdf.svg

Wikimedia Commonsista
Siirry navigaatioon Siirry hakuun

Alkuperäinen tiedosto(SVG-tiedosto; oletustarkkuus 640 × 480 kuvapistettä; tiedostokoko 64 KiB)

Kuvatekstit

Kuvatekstit

Lisää yhden rivin pituinen kuvaus tästä tiedostosta

Yhteenveto

[muokkaa]
Kuvaus Binomial distribution cumulative distribution function
Päiväys
Lähde Oma teos
Tekijä Tayste
SVG kehittely
InfoField
 
Tämä SVG-tiedosto on viallinen, koska siinä on 42 virhettä.
 
Tämä vektorigrafiikkatiedosto luotiin käyttäen apuna ohjelmaa R
 
 This file uses embedded text that can be easily translated using a text editor.
Lähdekoodi
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()

Lisenssi

[muokkaa]
Public domain Minä, tämän teoksen tekijänoikeudellinen omistaja, julkaisen tämän teoksen public domainiin eli luovun kaikista tekijänoikeuksista lain sallimissa puitteissa. Tämä on voimassa maailmanlaajuisesti.
Joissain maissa laki ei mahdollista tätä. Mikäli näin on:
Myönnän kenelle tahansa oikeuden käyttää tätä teosta mihin tahansa tarkoitukseen, ilman mitään ehtoja, ellei laki vaadi ehtojen asettamista.

Tiedoston historia

Päiväystä napsauttamalla näet, millainen tiedosto oli kyseisellä hetkellä.

PäiväysPienoiskuvaKokoKäyttäjäKommentti
nykyinen13. toukokuuta 2010 kello 13.11Pienoiskuva 13. toukokuuta 2010 kello 13.11 tallennetusta versiosta640 × 480 (64 KiB)Meisterkoch (keskustelu | muokkaukset)final fix
13. toukokuuta 2010 kello 13.02Pienoiskuva 13. toukokuuta 2010 kello 13.02 tallennetusta versiosta289 × 217 (62 KiB)Meisterkoch (keskustelu | muokkaukset)fix colours
13. toukokuuta 2010 kello 12.48Pienoiskuva 13. toukokuuta 2010 kello 12.48 tallennetusta versiosta289 × 217 (40 KiB)Meisterkoch (keskustelu | muokkaukset)change colour coding
12. helmikuuta 2010 kello 18.07Pienoiskuva 12. helmikuuta 2010 kello 18.07 tallennetusta versiosta1 052 × 744 (56 KiB)Meisterkoch (keskustelu | muokkaukset)format
12. helmikuuta 2010 kello 18.04Pienoiskuva 12. helmikuuta 2010 kello 18.04 tallennetusta versiosta744 × 1 052 (55 KiB)Meisterkoch (keskustelu | muokkaukset)step function, updated R-code
1. maaliskuuta 2008 kello 20.09Pienoiskuva 1. maaliskuuta 2008 kello 20.09 tallennetusta versiosta434 × 289 (20 KiB)Tayste (keskustelu | muokkaukset){{Information |Description=Binomial distribution cdf |Source=self-made |Date=2 Mar 2008 |Author= Tayste |Permission= |other_versions= }}

Tätä tiedostoa ei käytetä millään sivulla.

Tiedoston järjestelmänlaajuinen käyttö

Seuraavat muut wikit käyttävät tätä tiedostoa: