symulacje

Idź do spisu treści

Menu główne

8.14

Kody rozszerzone > Rozdział 8

##########################################################################################
###                                                                      
Paweł i Gaweł – różne podejście do ryzyka                                                                  ###
##########################################################################################


D=1000; S=44000; L=0.07; K=0.16
KP=0; KG=0; lsP=0; lsG=0
for (i in 1:480)
{

KP=KP+KP*L/12+D; KG=KG+KG*K/12+D
if (KP>=1.2*S)
{lsP=lsP+1 ; KP=KP-S}
if (KG>=0)
{lsG=lsG+1 ; KG=KG-S}
print(KG); print(lsP)

}
KP
KG
lsP
lsG

 
 
Wróć do spisu treści | Wróć do menu głównego