<div dir="ltr">Hola Carlos!<div><br></div><div>Funciona perfecto, muchas gracias.</div><div><br></div><div>Solo cambié una cosa. <br></div><div><br></div><div>Corriendo tal cual lo pasaste, el resultado es el siguiente:</div><div><br></div><div><div><img src="cid:ii_jvy50cy50" alt="image.png" width="495" height="182"><br></div></div><div><br></div><div>Pero sacando IDPACIENTE del group by:</div><div><br></div><div>transferencias<-becas_modalidades %>%<br>group_by(PROVINCIA,Modalidad) %>% <b><font color="#ff0000">---saco IDPACIENTE del group by</font></b><br>summarize(dinero = sum(PRELIQUIDACION), <br>cuenta= n()) %>%<br>arrange(desc(cuenta))<br></div><div><br></div><div>El resultado queda así, que es como lo necesito.</div><div><br></div><div><div><img src="cid:ii_jvy532qc1" alt="image.png" width="482" height="180"><br></div></div><div><br></div><div>Muchas gracias nuevamente! Saludos, Juan.</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">El lun., 20 may. 2019 a las 19:16, Carlos Ortega (<<a href="mailto:cof@qualityexcellence.es">cof@qualityexcellence.es</a>>) escribió:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr"><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">Hola,</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">Sería de esta forma:</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">transferencias<-becas_modalidades %>%<br>
group_by(PROVINCIA,Modalidad, <b>IDCLIENTE</b>) %>%<br>
summarize(</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"> dinero = sum(PRELIQUIDACION), <br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"> <b>cuenta= n() </b><br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"> ) %>%<br>
arrange(desc(<b>cuenta</b>))</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"><br></div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">Saludos,</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small">Carlos Ortega</div><div class="gmail_default" style="font-family:verdana,sans-serif;font-size:small"><a href="http://www.qualityexcellence.es" target="_blank">www.qualityexcellence.es</a><br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">El lun., 20 may. 2019 a las 21:53, juan manuel dias (<<a href="mailto:juamadias@gmail.com" target="_blank">juamadias@gmail.com</a>>) escribió:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Hola,<br>
Tengo un data set con información de transferencias monetarias por paciente<br>
provincia y modalidad de atención. Necesito hacer en una misma operación<br>
una suma de dinero por provincia y modalidad y a su vez una cuenta de<br>
pacientes por provincia y modalidad.<br>
<br>
Esto funciona bien:<br>
<br>
transferencias<-becas_modalidades %>%<br>
group_by(PROVINCIA,Modalidad) %>%<br>
summarize(dinero = sum(PRELIQUIDACION))%>%<br>
arrange(desc(dinero))<br>
<br>
Pero esto no:<br>
<br>
transferencias<-becas_modalidades %>%<br>
group_by(PROVINCIA,Modalidad) %>%<br>
summarize(dinero = sum(PRELIQUIDACION),(cuenta=count(IDPACIENTE)))%>%<br>
arrange(desc(dinero))<br>
<br>
str(becas_modalidades)<br>
<br>
$ IDPACIENTE : int<br>
$ IDINSTITUCION : int<br>
$ BECAUTILIZADA : int<br>
$ PRELIQUIDACION: int ...<br>
$ ANO : int<br>
$ MES : int<br>
$ NOMBRE : Factor w/ 87 levels<br>
$ PROVINCIA : Factor w/15 levels<br>
$ localidad : Factor w/ 63 levels<br>
$ municipio : Factor w/ 43 levels<br>
$ Año : int<br>
$ Modalidad : Factor w/ 7 levels<br>
<br>
Muchas gracias!<br>
<br>
[[alternative HTML version deleted]]<br>
<br>
_______________________________________________<br>
R-help-es mailing list<br>
<a href="mailto:R-help-es@r-project.org" target="_blank">R-help-es@r-project.org</a><br>
<a href="https://stat.ethz.ch/mailman/listinfo/r-help-es" rel="noreferrer" target="_blank">https://stat.ethz.ch/mailman/listinfo/r-help-es</a><br>
</blockquote></div><br clear="all"><br>-- <br><div dir="ltr" class="gmail-m_-8549756846953351679gmail_signature"><span style="font-family:verdana,sans-serif">Saludos,</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif">Carlos Ortega</span><br style="font-family:verdana,sans-serif">
<span style="font-family:verdana,sans-serif"><a href="http://www.qualityexcellence.es" target="_blank">www.qualityexcellence.es</a></span></div>
</blockquote></div>