<div dir="ltr">You mean<div><br></div><div><font face="monospace, monospace">x.dt[, y := y.dt[.SD, on=.(date), roll=TRUE, x.y]]<br></font></div><div><br></div><div>?</div></div><div class="gmail_extra"><br><div class="gmail_quote">On Wed, Feb 14, 2018 at 3:18 PM, Bernstein, Elliot J <span dir="ltr"><<a href="mailto:EJBernstein@wellington.com" target="_blank">EJBernstein@wellington.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">





<div lang="EN-US" link="blue" vlink="purple">
<div class="m_-6727534616222707685WordSection1">
<p class="MsoNormal">How do I execute a rolling join when one table has groups, and the other does not? For example:<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">x.dt <- as.data.table(<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">  expand.grid(date = seq(as.Date("2017-01-01"), as.Date("2017-12-31"), "days"),<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">              group = c("A", "B")<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">  )<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">x.dt[, x := rnorm(.N)]<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">setkey(x.dt, group, date)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New""><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">y.dt <- data.table(date = seq(as.Date("2017-01-01"), as.Date("2017-12-31"), "months"))<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">y.dt[, y := month(date)]<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">setkey(y.dt, date)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New""><u></u> <u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">result <- y.dt[x.dt, roll = TRUE]<u></u><u></u></span></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">The last line fails because “group” is part of the key in x.dt, but not y.dt:<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">Error in bmerge(i, x, leftcols, rightcols, io, xo, roll, rollends, nomatch,  :
<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-family:"Courier New"">  typeof x.date (double) != typeof i.group (integer)<u></u><u></u></span></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">I would like the value of y in each row of the result to be the month number (from y.dt), regardless of the value of the group column.<u></u><u></u></p>
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">Thanks.<span class="HOEnZb"><font color="#888888"><u></u><u></u></font></span></p><span class="HOEnZb"><font color="#888888">
<p class="MsoNormal"><u></u> <u></u></p>
<p class="MsoNormal">- Elliot<span style="font-size:10.0pt"><u></u><u></u></span></p>
<p class="MsoNormal"><u></u> <u></u></p>
</font></span></div>
</div>

<br>______________________________<wbr>_________________<br>
datatable-help mailing list<br>
<a href="mailto:datatable-help@lists.r-forge.r-project.org">datatable-help@lists.r-forge.<wbr>r-project.org</a><br>
<a href="https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/datatable-help" rel="noreferrer" target="_blank">https://lists.r-forge.r-<wbr>project.org/cgi-bin/mailman/<wbr>listinfo/datatable-help</a><br></blockquote></div><br></div>