diff options
Diffstat (limited to 'R/cds_functions_generic.R')
| -rw-r--r-- | R/cds_functions_generic.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/cds_functions_generic.R b/R/cds_functions_generic.R index d6623bd0..cdab10ae 100644 --- a/R/cds_functions_generic.R +++ b/R/cds_functions_generic.R @@ -640,7 +640,7 @@ tweakcurves <- function(index, tradedate=Sys.Date()){ }
epsilon[i] <- optimize(f, c(-0.15, 0.15), index, tol=1e-6)$minimum
index$portfolio <- tweakportfolio(index$portfolio, epsilon[i], forward.tweak=forward.tweak)
- cat("tweak = ", epsilon[i], "\n")
+ loginfo(paste("tweak =", epsilon[i]))
}
return( list(portfolio=index$portfolio, basis=epsilon) )
}
|