Datei:Panjer-Binomial.png
Panjer-Binomial.png (480 × 480 Pixel, Dateigröße: 6 KB, MIME-Typ: image/png)
Beschreibung, Quelle
[Bearbeiten | Quelltext bearbeiten]Beschreibung |
Die Wahrscheinlichkeitsverteilung den Panjer-Verteilung im Hinblick auf die Binomialverteilung |
---|---|
Quelle |
Bild mit GNU R-Script produziert |
Urheber bzw. Nutzungsrechtinhaber |
|
Genehmigung |
Gnu FDL |
Anmerkungen |
siehe Script |
Diese Datei ist identisch mit it:Immagine:Panjer-Binomiale.png.
Diese Datei sollte, wenn commonsfähig, von der italienischsprachigen Wikipedia nach Commons übertragen werden. Trage anschließend die Beschreibung von hier auf Commons nach und füge auch hier {{NowCommons|Dateiname auf Commons}} hinzu. |
Lizenz
[Bearbeiten | Quelltext bearbeiten]
Diese Datei wurde unter der GNU-Lizenz für freie Dokumentation veröffentlicht. Es ist erlaubt, die Datei unter den Bedingungen der GNU-Lizenz für freie Dokumentation, Version 1.2 oder einer späteren Version, veröffentlicht von der Free Software Foundation, zu kopieren, zu verbreiten und/oder zu modifizieren. Es gibt keine unveränderlichen Abschnitte, keinen vorderen Umschlagtext und keinen hinteren Umschlagtext. |
Diese Datei wurde unter den Bedingungen der „Creative Commons Namensnennung-Weitergabe unter gleichen Bedingungen Unported“-Lizenz (abgekürzt „cc-by-sa“) in der Version 3.0 veröffentlicht. Lizenzvertrag: https://creativecommons.org/licenses/by-sa/3.0/legalcode |
Diese ursprünglich nur unter der GNU Free Documentation License (GFDL, Version 1.3) lizenzierte Datei ist in Folge der Lizenzumstellung der Wikipedia auch unter den Bedingungen der Creative Commons Attribution-Share Alike 3.0 nutzbar.
Dieser Umstand muss beim Übertragen dieser Datei auf Wikimedia Commons dokumentiert bleiben. The information that this file is available under CC-by-sa due to relicensing must remain documented after migration to Wikimedia Commons. |
Script
[Bearbeiten | Quelltext bearbeiten]#source('c:/Temp/Panjer.R') Panjer <- function(k=100,a=0,b=1){ p0 <- 1; p <- c(max(0,a+b)*p0); k <- 2; while (p[k-1]>10^(-300)) { p <- c(p,p[k-1]*max(0,a+b/k)); k <- k+1; } p <- c(p0,p) p <- p/sum(p); return (p); } n<-6; p<-0.45; k <- seq(0,n) k0 <- seq(0,n-1) a <- -p/(1-p) png('c:/Temp/Panjer-Binomial.png'); plot(k, Panjer(a=a,b=-(n+1)*a)[(k+1)], ylim=c(0,0.33), xlab='',ylab='', type='b',col='red',lwd=2, main='Panjer- u. Binomialverteilung') lines(k,Panjer(a=a,b=-(n+0.5)*a)[(k+1)],type='b',lwd=2); lines(k0,Panjer(a=a,b=-(n)*a)[(k0+1)],type='b',col='green',lwd=2); for (d in c(0.25,.75)) { lines(k,Panjer(a=a,b=-(n+d)*a)[(k+1)],type='b') } legend(1.8,0.2, c(paste('n =',n),paste('p =',p),'a = -p/(1-p)'), bty='n') legend(1.3,0.12, c(paste('b = -(n+',0,')a',sep=''), paste('b = -(n+',0.25,')a',sep=''), paste('b = -(n+',0.50,')a',sep=''), paste('b = -(n+',0.75,')a',sep=''), paste('b = -(n+',1,')a',sep=''), ), col = c('green','black','black','black','red'), lwd = c(2,1,2,1,2), bty='n') abline(0,0) dev.off()
Dateiversionen
Klicke auf einen Zeitpunkt, um diese Version zu laden.
Version vom | Vorschaubild | Maße | Benutzer | Kommentar | |
---|---|---|---|---|---|
aktuell | 13:44, 8. Okt. 2006 | 480 × 480 (6 KB) | Tomi (Diskussion | Beiträge) | {{Information |Beschreibung=Die Wahrscheinlichkeitsverteilung den Panjer-Verteilung im Hinblick auf di Binomialverteilung |Quelle= |Urheber=Benutzer:Tomi |Datum= |Genehmigung=Gnu FDL |Andere Versionen= |Anmerkungen=Bild mi script mit GNU R |
Du kannst diese Datei nicht überschreiben.
Dateiverwendung
Die folgende Seite verwendet diese Datei: