diff --git a/SFEtail/SFEtail.R b/SFEtail/SFEtail.R
index bd07310..10dc324 100644
--- a/SFEtail/SFEtail.R
+++ b/SFEtail/SFEtail.R
@@ -35,7 +35,7 @@ px         = i/n
 # DAX
 model_dax  = lm(log(px[1:m]) ~ log(dax_o[1:m]))
 
-log_k_dax  = model$coefficients[1]
+log_k_dax  = model_dax$coefficients[1]
 a_dax      = - model$coefficients[2]
 
 plot(log(dax_o[1:m]), log(px[1:m]))
@@ -44,7 +44,7 @@ abline(model_dax)
 # FTSE 100
 model_ftse = lm(log(px[1:m]) ~ log(ftse_o[1:m]))
 
-log_k_ftse = model$coefficients[1]
+log_k_ftse = mode_ftse$coefficients[1]
 a_ftse     = - model$coefficients[2]
 
 plot(log(ftse_o[1:m]), log(px[1:m]))
@@ -99,4 +99,4 @@ mtext(side = 2, "log i/n" , line = 2.5, cex = 1, xaxs = "i")
 par(mfrow = plotmfrow, mar = plotmar) 
 
 # Remove comment if you want to save plot as jpeg
-# dev.print(jpeg, file="SFEtail.jpg", width = 500, height = 375, quality = 100)
\ No newline at end of file
+# dev.print(jpeg, file="SFEtail.jpg", width = 500, height = 375, quality = 100)