先日本棚をあさっていたところ, かなり昔に購入した「システムトレード」という本が出てきた. ペラペラめくっているとなんだかよく分からないことばかり書いてあってほぼ斜め読みだったが, 巻末に破産確率シミュレーターの概要と, そのVBAのコードが載っていたのでRで書いてみたくなった. モチベーションとしては, あまりにも古い資料のコードを最近の言語でアップデートしたいというのがある. 今どきExcel VBAで市場分析してる人いないと思うので. コード コードは以下になります. Git にうpしておきました. Github #----破産確率関数 risk_of_ruin <- function( accuracy, payoff_ratio, mgt = 1, start_capital, fixed_percent_risked, ruin_point_drawdown, unit_of_