[R] Sum first 3 non zero elements of row

[José Verhoeven]

An embedded and charset-unspecified text was scrubbed...
Name: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130521/a9a7d99b/attachment.pl>