<div dir="ltr"><br><div class="gmail_extra"><br><br><div class="gmail_quote">On Mon, Sep 23, 2013 at 1:19 PM, Peter Carl <span dir="ltr"><<a href="mailto:peter@braverock.com" target="_blank">peter@braverock.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">Here's your comment from below:<br>
<div class="im"><br>
"It is tough to tell with the formatting on the email, but I'll take a<br>
closer look at the script in the sandbox to see if I can tell what is<br>
going on. The idea is that extractObjectiveMeasures will return a matrix<br>
of the objective measures for all optimize.portfolio objects in the<br>
opt.list object. For example, the meanSD row should have NAs under the ETL<br>
and ETL component contribution columns. I am only stitching together the<br>
objective measures, I do not re-calculate StdDev or component StdDev for<br>
the portfolios with ETL as an objective. Basically, I just take whatever<br>
objectives are in the $objective_measures slot of each optimize.portfolio<br>
object. Should I be doing something such that all cells in the matrix have<br>
values? "<br>
<br>
</div>I think so, although I doubt this has been well spelled out before.  The<br>
question is: can we anticipate how to fill in these values given the<br>
information in each object?<br></blockquote><div><br></div><div style>I think we might be able to depending on how the objective measures are calculated on the weights. </div><div style><br></div><div style>One way would be to pick out the objective names, match the name to the function, and then calculate the objectives on the weights. The parameters could be pulled from the $arguments list in each objective. This might be tricky if there are multiple arguments with different arguments. This is likely the simplest solution. If "ES" is an objective name, we could by default calculate it with portfolio_method="component" since the univariate ES also calculated.</div>
<div style><br></div><div style>Another way is to combine all the objectives from each object, try to detect and remove duplicate objectives objects, then pass that portfolio object to constrained_objective to calculate over the weights.<br>
</div><div style><br></div><div style>Not sure which way is better, I'll have to give this some thought and try out a few things.</div><div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">

<br>
When I do this by hand, I'm just calculating for the list of optimal<br>
weights of each objective for each measure.  At that point, I can make<br>
comparisons I couldn't otherwise.<br>
<br>
Note that the objectives can be vastly different, as long as the assets<br>
are the same and the parameters for each of the metrics are the same.<br></blockquote><div><br></div><div style>I could add a check to make sure that the assets and returns are the same in each optimize.portfolio object. I think this will only work if that is the case. It would be nice to have the flexibility to have different assets and returns, but that may not be doable.</div>
<div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<br>
Does that make sense?<br></blockquote><div><br></div><div style>It does make sense, thanks for the feedback.</div><div> </div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">

<div class=""><div class="h5"><br>
pcc<br>
--<br>
Peter Carl<br>
<a href="http://www.braverock.com/peter" target="_blank">http://www.braverock.com/peter</a><br>
<br>
> Peter,<br>
><br>
> Thanks for the feedback, I really appreciate it.<br>
><br>
> see comments in line.<br>
><br>
><br>
> On Sun, Sep 22, 2013 at 4:41 PM, Peter Carl <<a href="mailto:peter@braverock.com">peter@braverock.com</a>> wrote:<br>
><br>
>> Ross,<br>
>><br>
>> I've been working through your vignette to hopefully give you some more<br>
>> detailed feedback, including on your questions from a few days ago.<br>
>> Sorry<br>
>> this has taken so long, but I wanted to spend some focused time on the<br>
>> package.<br>
>><br>
>> I realize that you've got different plot methods for each type, and I<br>
>> appreciate what a hassle it is to keep such methods relatively<br>
>> consistent.<br>
>>  In <a href="http://chart.RiskReturn.DE" target="_blank">chart.RiskReturn.DE</a>, when the function doesn't find anything that<br>
>> fits<br>
>> its defaults:<br>
>> > plot(RiskBudget.DE)<br>
>> Error in plot.window(...) : need finite 'xlim' values<br>
>> In addition: Warning messages:<br>
>> 1: In <a href="http://chart.Scatter.DE" target="_blank">chart.Scatter.DE</a>(object = DE, risk.col = risk.col, return.col =<br>
>> return.col,  :<br>
>>   mean or ES do  not match extractStats output of $objective_measures<br>
>> slot<br>
>> 2: In min(x) : no non-missing arguments to min; returning Inf<br>
>> 3: In max(x) : no non-missing arguments to max; returning -Inf<br>
>><br>
>> It's a risk budget on ETL, so if I tell it that, it works:<br>
>> > plot(RiskBudget.DE, risk.col="ETL", return.col="mean")<br>
>><br>
><br>
> The default is risk.col="ES". Because your objective name is "ETL", you<br>
> need to explicitly do risk.col="ETL".<br>
><br>
><br>
>><br>
>> ...but it doesn't recover well when I try to plot the results in<br>
>> variance<br>
>> space:<br>
>> > plot(RiskBudget.DE, risk.col="StdDev", return.col="mean")<br>
>> Error in plot.window(...) : need finite 'xlim' values<br>
>> In addition: Warning messages:<br>
>> 1: In <a href="http://chart.Scatter.DE" target="_blank">chart.Scatter.DE</a>(object = DE, risk.col = risk.col, return.col =<br>
>> return.col,  :<br>
>>   mean or StdDev do  not match extractStats output of<br>
>> $objective_measures<br>
>> slot<br>
>> 2: In min(x) : no non-missing arguments to min; returning Inf<br>
>> 3: In max(x) : no non-missing arguments to max; returning -Inf<br>
>><br>
>><br>
>> I'm not exactly sure what the issue is here, but maybe it's related:<br>
>> > chart.RiskBudget(RiskBudget.DE, risk.type="percentage", neighbors=5)<br>
>> Error in subsetx[i, riskcols] : incorrect number of dimensions<br>
>> > traceback()<br>
>> 3: points(subsetx[i, riskcols], type = "b", col = "lightblue")<br>
>> 2: chart.RiskBudget.optimize.portfolio(RiskBudget.DE, risk.type =<br>
>> "percentage",<br>
>>        neighbors = 5)<br>
>> 1: chart.RiskBudget(RiskBudget.DE, risk.type = "percentage", neighbors =<br>
>> 5)<br>
>><br>
><br>
> Not sure either what the issue is, but I'll take a look.<br>
><br>
><br>
>> In chart.RiskReturnScatter.RP, it looks like 'rp' is being passed into<br>
>> plot through dots.<br>
>> > plot(EqmETL.RND, risk.col="StdDev", return.col="mean", rp=1000,<br>
>> chart.assets=TRUE)<br>
>> There were 13 warnings (use warnings() to see them)<br>
>> > warnings()<br>
>> Warning messages:<br>
>> 1: "rp" is not a graphical parameter<br>
>> 2: "rp" is not a graphical parameter<br>
>> 3: "rp" is not a graphical parameter<br>
>><br>
><br>
> The 'rp' argument is meant for optimize.portfolio.ROI and<br>
> optimize.portfolio.GenSA objects. Since ROI and GenSA do not return trace<br>
> information like DEoptim or random portfolios, I added this as an option<br>
> to<br>
> generate random portfolios to plot the feasible space. If you are already<br>
> passing in an optimize.portfolio.random object, there is no need to pass<br>
> in<br>
> rp as an argument.<br>
><br>
><br>
>><br>
>><br>
>> > extractWeights(buoys)<br>
>>          Convertible Arbitrage Equity Market Neutral Fixed Income<br>
>> Arbitrage Event Driven CTA Global Global Macro Long/Short Equity<br>
>> MeanSD              0.05000000                 0.050<br>
>> 0.050   0.30000000  0.0500000    0.2000000             0.300<br>
>> MeanmETL            0.05000000                 0.300<br>
>> 0.050   0.05000000  0.2000000    0.3000000             0.050<br>
>> MinSD               0.06042904                 0.300<br>
>> 0.300   0.05234676  0.1735858    0.0636384             0.050<br>
>> MinmETL             0.05000000                 0.300<br>
>> 0.050   0.05000000  0.2000000    0.3000000             0.050<br>
>> EqSD                0.12500000                 0.240<br>
>> 0.200   0.08500000  0.1050000    0.1700000             0.075<br>
>> EqmETL              0.06000000                 0.265<br>
>> 0.165   0.09000000  0.2050000    0.1300000             0.080<br>
>> RB                  0.05200000                 0.410<br>
>> 0.060   0.05200000  0.1438995    0.2220000             0.058<br>
>><br>
>> ...but this doesn't:<br>
>> > extractObjectiveMeasures(buoys)<br>
>>                 mean     StdDev         ES StdDev.contribution1<br>
>> StdDev.contribution2 StdDev.contribution3<br>
>> StdDev.contribution4<br>
>> MeanSD   0.006782814 0.01546759         NA                   NA<br>
>>        NA                   NA                   NA<br>
>> MeanmETL 0.005897789         NA 0.01505626                   NA<br>
>>        NA                   NA                   NA<br>
>> MinSD             NA 0.01009001         NA                   NA<br>
>>        NA                   NA                   NA<br>
>> MinmETL           NA         NA 0.01505626                   NA<br>
>>        NA                   NA                   NA<br>
>> EqSD              NA 0.01113716         NA          0.001763096<br>
>> 0.001565752          0.001886988          0.001258567<br>
>> EqmETL            NA         NA 0.01646509                   NA<br>
>>        NA                   NA                   NA<br>
>> RB       0.005812997         NA         NA                   NA<br>
>>        NA                   NA                   NA<br>
>>          StdDev.contribution5 StdDev.contribution6 StdDev.contribution7<br>
>> StdDev.pct_contrib_StdDev1 StdDev.pct_contrib_StdDev2<br>
>> MeanSD                     NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> MeanmETL                   NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> MinSD                      NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> MinmETL                    NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> EqSD              0.001039908          0.002296903          0.001325947<br>
>>               0.1583075                  0.1405881<br>
>> EqmETL                     NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> RB                         NA                   NA                   NA<br>
>>                      NA                         NA<br>
>> ...snip...<br>
>><br>
>><br>
> It is tough to tell with the formatting on the email, but I'll take a<br>
> closer look at the script in the sandbox to see if I can tell what is<br>
> going<br>
> on. The idea is that extractObjectiveMeasures will return a matrix of the<br>
> objective measures for all optimize.portfolio objects in the opt.list<br>
> object. For example, the meanSD row should have NAs under the ETL and ETL<br>
> component contribution columns. I am only stitching together the objective<br>
> measures, I do not re-calculate StdDev or component StdDev for the<br>
> portfolios with ETL as an objective. Basically, I just take whatever<br>
> objectives are in the $objective_measures slot of each optimize.portfolio<br>
> object. Should I be doing something such that all cells in the matrix have<br>
> values?<br>
><br>
><br>
>> As a consequence, only one portfolio appears in the following plot<br>
>> (MeanSD):<br>
>> > chart.RiskReward(buoys)<br>
>><br>
><br>
> This relates to my comment above about how I am not recalculating<br>
> anything.<br>
> Before the portfolios are plotted in risk-return space, I omit rows that<br>
> have NA values. For example, if you wanted to plot all the portfolios in<br>
> mean-ETL space, all portfolios should have mean and ETL as an objective.<br>
> You could set the multiplier to 0 so it does not affect the optimization,<br>
> but is returned in the $objective_measures slot.<br>
><br>
><br>
>><br>
>> All in all, this is all looking good.  I've got some scripts checked in<br>
>> under sandbox/symposium2013 if you want to follow along.<br>
>><br>
><br>
> I'll take a closer look and follow along, thanks!<br>
><br>
><br>
>><br>
>> pcc<br>
>> --<br>
>> Peter Carl<br>
>> <a href="http://www.braverock.com/peter" target="_blank">http://www.braverock.com/peter</a><br>
>><br>
>><br>
>> _______________________________________________<br>
>> GSoC-PortA mailing list<br>
>> <a href="mailto:GSoC-PortA@lists.r-forge.r-project.org">GSoC-PortA@lists.r-forge.r-project.org</a><br>
>> <a href="http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/gsoc-porta" target="_blank">http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/gsoc-porta</a><br>
>><br>
><br>
<br>
_______________________________________________<br>
GSoC-PortA mailing list<br>
<a href="mailto:GSoC-PortA@lists.r-forge.r-project.org">GSoC-PortA@lists.r-forge.r-project.org</a><br>
<a href="http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/gsoc-porta" target="_blank">http://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/gsoc-porta</a><br>
</div></div></blockquote></div><br></div></div>