<html><head></head><body><div style="color:#000; background-color:#fff; font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:16px"><div id="yiv6964271854"><div id="yui_3_16_0_ym19_1_1464619607056_86171"><div style="color:#000;background-color:#fff;font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:16px;" id="yui_3_16_0_ym19_1_1464619607056_86170"><div id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222592" dir="ltr"><span id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_351209">buenas tardes les envío este mensaje de ayuda porque ya le batalle mucho y no he podido hacerlo lo que necesito, tengo una tabla como la que pongo en el archivo anexo ejemplo he estado utilizando la instrucción cast de reshape2 para generar algo como lo que sigue </span></div><div id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222592" dir="ltr"><span><br></span></div><div id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222592" dir="ltr"><table border="1" cellpadding="0" cellspacing="0" width="581" style="border-collapse: collapse;width:434pt" id="yui_3_16_0_ym19_1_1464619607056_86516">
<colgroup id="yui_3_16_0_ym19_1_1464619607056_86517"><col width="83" span="7" style="width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86518">
</colgroup><tbody id="yui_3_16_0_ym19_1_1464619607056_86519"><tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86520">
<td height="19" width="83" style="min-height:14.4pt;width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86521">Suma de evento</td>
<td colspan="2" width="166" style="mso-ignore:colspan;width:124pt" id="yui_3_16_0_ym19_1_1464619607056_86522">Etiquetas de
columna</td>
<td width="83" style="width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86523"></td>
<td width="83" style="width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86524"></td>
<td width="83" style="width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86525"></td>
<td width="83" style="width:62pt" id="yui_3_16_0_ym19_1_1464619607056_86526"></td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86527">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86528">Etiquetas de fila</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86529">2000</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86530">2001</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86531">2002</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86532">2003</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86533">2004</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86534">Total general</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86535">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86536">D</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86537">2</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86538">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86539">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86540">4</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86541">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86542">11</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86543">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86544"> AU</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86545">2</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86546">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86547">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86548">1</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86549"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86550">5</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86551">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86552"> CA</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86553"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86554">1</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86555"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86556"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86557"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86558">1</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86559">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86560"> GV</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86561"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86562">1</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86563"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86564">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86565">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86566">5</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86567">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86568">F</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86569">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86570">4</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86571">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86572">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86573">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86574">14</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86575">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86576"> AU</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86577">1</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86578"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86579"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86580"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86581">2</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86582">3</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86583">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86584"> CA</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86585">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86586">3</td>
<td id="yui_3_16_0_ym19_1_1464619607056_86587"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86588"></td>
<td id="yui_3_16_0_ym19_1_1464619607056_86589"></td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86590">4</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86591">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86592"> GV</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86593">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86594">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86595">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86596">3</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86597">1</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86598">7</td>
</tr>
<tr height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86599">
<td height="19" style="min-height:14.4pt" id="yui_3_16_0_ym19_1_1464619607056_86600">Total general</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86601">5</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86602">7</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86603">2</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86604">7</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86605">4</td>
<td align="right" id="yui_3_16_0_ym19_1_1464619607056_86606">25</td>
</tr></tbody></table></div><div></div><div id="yui_3_16_0_ym19_1_1464619607056_86173"> </div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602" dir="ltr">donde se obtiene la suma de los eventos en función del tipo y grupo por cada año, lo que he logrado es obtener solo la cuenta de reglones</div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602" dir="ltr"><br></div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602" dir="ltr">de antemano mil gracias, </div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602" dir="ltr"><br></div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602">Saludos </div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602">Enrique RAMOS</div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602">Oficina de confiabilidad</div><div class="yiv6964271854signature" id="yiv6964271854yui_3_16_0_ym19_1_1464012794136_222602">LAPEM-CFE</div></div></div></div></div></body></html>