R-Quelltext:

 n <- 350
 to <- 3.3
 set.seed(9826064)
 x=seq(from=0, to=to, length=n)
 BM1 <- c(0, cumsum(rnorm(n-1, mean=0, sd=sqrt(to/(n-1)))))
 BM2 <- c(0, cumsum(rnorm(n-1, mean=0, sd=sqrt(to/(n-1)))))
 library("Cairo")
 CairoPNG(filename = "Wienerprozess.png", width=1200, height=900)
 par(bg="whitesmoke")
 plot(x, BM1, type="n", xlab="Zeit", ylab="", ylim=range(BM1, BM2), cex.lab=1.4)
 #polygon(x=c(x, rev(x)), y=c(x, -rev(x)), col="azure3", border=NA)
 polygon(x=c(x, rev(x)), y=c(sqrt(x), -sqrt(rev(x))), col="grey", border=NA)
 lines(x, BM1, col="red", lwd=3)
 lines(x, BM2, col="orange", lwd=3)
 title(main="Zwei Beispiel-Pfade eines Standard-Wiener-Prozesses", cex.main=2.4, font=2)
 #text(x=.99*to, y=.97*to, labels="Varianz", col="white", adj=c(1,1), srt=30, cex=1.6)
 text(x=.98*to, y=sqrt(.94*to), labels="Standardabweichung", col="white", adj=c(1,1), srt=9, cex=1.6)
 axis(1, pos=0, labels=FALSE, at=c(0,to))
 box()
 dev.off()

Benson.by de de.wikipedia.org, en tant que détenteur des droits d’auteur sur cette œuvre, la publie sous la licence suivante :

Vous avez la permission de copier, distribuer et modifier ce document selon les termes de la GNU Free Documentation License version 1.2 ou toute version ultérieure publiée par la Free Software Foundation, sans sections inaltérables, sans texte de première page de couverture et sans texte de dernière page de couverture. Un exemplaire de la licence est inclus dans la section intitulée GNU Free Documentation License.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue

Transféré de de.wikipedia à Commons par Leyo utilisant CommonsHelper.

• 2010-03-09 19:00 Thire 1200×900× (91075 bytes) {{Information |Beschreibung = |Quelle = |Urheber = |Datum = |Genehmigung = |Andere Versionen = |Anmerkungen = }}
• 2009-12-20 16:36 Thire 1200×900× (100198 bytes) deatils, siehe versionen beschreibung (überschrift va)
• 2007-06-11 13:18 BSide 1200×900× (23300 bytes) {{Information |Beschreibung = Ein Standard-Wiener-Prozess auf den Zeitintervall [0,3], außerdem sind die Varianz und die Standardabweichung eingezeichnet |Quelle = selbst erstellt mit [[GNU R]], Quelltext siehe unten |Urheber = [[Benutzer:Thire|Thomas St
• 2005-07-21 13:27 Thire 1200×900× (19823 bytes) klammer
• 2005-07-21 13:23 Thire 1200×900× (8776 bytes) kl fehler n wurde zu n-1 !!
• 2005-06-22 11:54 Thire 1200×900× (19810 bytes) schrft nun schief, mehr pkte
• 2005-06-21 11:38 Thire 1200×900× (18667 bytes) sd() var, neue farben, ...
• 2005-06-21 10:03 Thire 1200×900× (17314 bytes) hellgrau, bessere BM, anderer titel
• 2005-04-20 11:54 Thire 1500×1125× (22955 bytes) ersetzt mit grauem hintergrund
• 2005-04-15 21:22 Thire 1500×1125× (22413 bytes) ersetzen von Benson.by s Bild durch mein R-Bild
• 2005-03-22 08:40 Benson.by 778×523× (19018 bytes) Ein Wiener-Prozess. Eigenbau. public dom.