Повна роздільність(SVG-файл, номінально 640 × 480 пікселів, розмір файлу: 64 КБ)

Wikimedia Commons logo Відомості про цей файл містяться на Вікісховищі — централізованому сховищі вільних файлів мультимедіа для використання у проектах Фонду Вікімедіа.

Опис файлу

Опис Binomial distribution cumulative distribution function
Час створення
Джерело Власна робота
Автор Tayste
SVG розвиток
InfoField
 
Вихідний код цього SVG-файлу неправильний.
 
Це векторне зображення було створено з допомогою R
 
 This file uses embedded text that can be easily translated using a text editor.
Сирцевий код
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()

Ліцензування

Public domain Я, власник авторських прав на цю роботу, передаю роботу в суспільне надбання. Застосовується по всьому світу.
У деяких країнах це не може бути юридично можливо, в такому випадку:
Я даю кожному право на використання цієї роботи для будь-яких цілей, без будь-яких умов, якщо такі умови не вимагаються за законом.

Підписи

Додайте однорядкове пояснення, що саме репрезентує цей файл

Об'єкти, показані на цьому файлі

зображує

66 037 байт

480 піксель

640 піксель

Історія файлу

Клацніть на дату/час, щоб переглянути, як тоді виглядав файл.

Дата/часМініатюраРозмір об'єктаКористувачКоментар
поточний13:11, 13 травня 2010Мініатюра для версії від 13:11, 13 травня 2010640 × 480 (64 КБ)Meisterkochfinal fix
13:02, 13 травня 2010Мініатюра для версії від 13:02, 13 травня 2010289 × 217 (62 КБ)Meisterkochfix colours
12:48, 13 травня 2010Мініатюра для версії від 12:48, 13 травня 2010289 × 217 (40 КБ)Meisterkochchange colour coding
18:07, 12 лютого 2010Мініатюра для версії від 18:07, 12 лютого 20101052 × 744 (56 КБ)Meisterkochformat
18:04, 12 лютого 2010Мініатюра для версії від 18:04, 12 лютого 2010744 × 1052 (55 КБ)Meisterkochstep function, updated R-code
20:09, 1 березня 2008Мініатюра для версії від 20:09, 1 березня 2008434 × 289 (20 КБ)Tayste{{Information |Description=Binomial distribution cdf |Source=self-made |Date=2 Mar 2008 |Author= Tayste |Permission= |other_versions= }}

Така сторінка використовує цей файл:

Глобальне використання файлу

Цей файл використовують такі інші вікі: