Script R para contar dias de operacao por acao durante o ano (liquedez)