Questa immagine (categorizzazione automatica: graph) o tutte le immagini in questa categoria o galleria dovrebbero essere ricreate usando grafica vettoriale come file SVG. Questo offre diversi vantaggi: vedi Commons:Media for cleanup per maggiori informazioni. Se è disponibile una versione in formato SVG di questa immagine, per favore caricala. Dopo aver caricato un file SVG, sostituisci questo avviso con il template {{Vector version available|nome_immagine.svg}}.

(An SVG version should ideally not include the title text, which should be a separate caption as text instead to allow this to be useful in any language).

È permesso copiare, distribuire e/o modificare questo documento in base ai termini della GNU Free Documentation License, Versione 1.2 o successive pubblicata dalla Free Software Foundation; senza alcuna sezione non modificabile, senza testo di copertina e senza testo di quarta di copertina. Una copia della licenza è inclusa nella sezione intitolata Testo della GNU Free Documentation License.http://www.gnu.org/copyleft/fdl.htmlGFDLGNU Free Documentation Licensetruetrue

	Questo file è disponibile in base alla licenza Creative Commons Attribuzione-Condividi allo stesso modo 3.0 Unported
	Tu sei libero: di condividere – di copiare, distribuire e trasmettere quest'opera di modificare – di adattare l'opera Alle seguenti condizioni: attribuzione – Devi fornire i crediti appropriati, un collegamento alla licenza e indicare se sono state apportate modifiche. Puoi farlo in qualsiasi modo ragionevole, ma non in alcun modo che suggerisca che il licenziante approvi te o il tuo uso. condividi allo stesso modo – Se remixi, trasformi o sviluppi il materiale, devi distribuire i tuoi contributi in base alla stessa licenza o compatibile all'originale.
	Questo tag di copyright è stato aggiunto nell'ambito dell'aggiornamento della licenza dei progetti Wikimedia.http://creativecommons.org/licenses/by-sa/3.0/CC BY-SA 3.0Creative Commons Attribution-Share Alike 3.0truetrue

R-source code:

T=7
N=100000
set.seed(303898)
a=0.9
cs=c("orange", "navy", "seagreen4", "grey31")

bm1=c(0,cumsum(rnorm(N,mean=0,sd=sqrt(T/N))))
tau1=which(bm1>a)[1]
bm1[tau1:(N+1)]=a

bm2=c(0,cumsum(rnorm(N,mean=0,sd=sqrt(T/N))))
tau2=which(bm2>a)[1]
bm2[tau2:(N+1)]=a

bm3=c(0,cumsum(rnorm(N,mean=0,sd=sqrt(T/N))))
tau3=which(bm3>a)[1]
bm3[tau3:(N+1)]=a

png(filename = "HittingTimes1.png", width=1200, height=900, pointsize = 12)
par(bg="gray88")
t=seq(0,T,length=N+1)
plot(t,bm1,type="l",ylim=range(bm1,bm2,bm3,a*1.2),col=cs[1],lwd=2,ylab="",xlab="Zeit",main="Hitting time von drei Sampels der Brownschen Bewegung als Beispiel für eine Stoppzeit")
lines(t,bm2,col=cs[2],lwd=2)
lines(t,bm3,col=cs[3],lwd=2)
abline(h=a,col=cs[4],lty=1,lwd=3)

text(x=tau1*T/N,y=a*1.14, labels = substitute(tau[2]==t1,list(t1=tau1*T/N)),pos=4,col=cs[1],cex=1.5)
text(x=tau2*T/N,y=a*1.14, labels = substitute(tau[1]==t2,list(t2=tau2*T/N)),pos=4,col=cs[2],cex=1.5)
text(x=T,y=a*1.14, labels = substitute(tau[3]>T,list(T=T)),pos=2,col=cs[3],cex=1.5)
dev.off()

 

Questo grafico in PNG grafica è stato creato con R.