Criar seu próprio pacote de R

Criar pacotes é importante para o reuso e compartilhamento de funcionalidades. Vamos utilizar a biblioteca devtools, que a propósito tem uma cheat sheet excelente, além de livros sobre o assunto. Aqui vamos citar apenas os passos necessários para criação de uma biblioteca minimamente. 

Primeiro passo, instalar o pacote devtools (caso não tenha):

install.packages('devtools')

Segundo passo, iniciar um projeto de biblioteca

devtools::create('path/to/folder')

Este comando criará os arquivos DESCRIPTION e NAMESPACE, além da pasta R dentro da sua pasta do projeto. Esta é a estrutura mínima de um pacote. Agora crie um arquivo.R, substituindo arquivo pelo nome que preferir e nele implemente as suas funções

# Uma função bem simples apenas para exemplificar
# '@export
myFunction <- function(x,y)x*y

A documentação do pacote é feita com a biblioteca roxigen2, as suas tags além de permitirem a geração automática da doc também permite-nos lançar mão de recursos da lib devtools que facilitam o processo de criação. Os pacotes devtools e roxygen2 não são obrigatórios para a criação de pacotes, mas facilitam bem o processo. Não escrevo aqui sobre as tags de documentação, segue o link da doc oficial. Contudo é importante falar sobre a tag @export, ela indica para a lib devtools que aquela função marcada deve ser anotada no arquivo NAMESPACE para exportação. As funções que não são anotadas com @export permanecem privadas ao escopo do script. Então utilizamos dois comandos, um para gerar a doc e atualizar NAMESPACE. O seguinte faz o build do pacote.

devtools::document()
devtools::build()

renv & docker

Um projeto pode incluir muita bibliotecas, e estas podem ter n versões. O controle de dependências é fundamental para o correto funcionamento de nossas aplicações. Neste cenário entra o pacote renv . Mas não vamos falar muito sobre ele, e sim mostrar uma solução simples para montar nossas aplicações em containers Docker isolando a aplicação e garantindo que os pacotes corretos serão instalados. Observação importante: Não devemos copiar a pasta renv de dentro do nosso projeto, apenas o arquivo renv.lock.

Knockout.js currency formatter.

Aqui trabalhando com knockout.js, criando um custom binding para manter os valores de inputs em formato de Moeda.

Atualizando Select com Knockout.js

Utilizando knockout.js como atualizar a lista de um select à partir da escolha em outro select? Pra muitos pode ser simples de cara, mas vou adimitir: para mim não foi, fui complicando às coisas ao invés de simplificar, quebrei um pouco a cabeça com isso e não tive bons resultados. Até que, lendo um post de um blog que falava sobre observables computed me veio a iluminação! E resolvi partilhar vai que ajudo alguém. Suponhamos uma aplicação na qual serão escolhidos items, estes itens estão organizados em categorias. Em uma lista seleciono a categoria, e à partir da minha seleção uma segunda lista é abastecida com as opções daquela categoria. Vou ser sincero, Pra começar vejamos uns dados de exemplo:

var produtos = [
 {
  grupo:"higiene pessoal",
  itens:[{'nome':'creme dental','valor':6.95},
                       {'nome':'shampoo','valor':12.49}]
 },
 {
  grupo:"material de limpeza",
  itens:[{'nome':'sabão em pó 2kg','valor':13.80},
                       {'nome':'detergente 500ml','valor':2.80}]
 },
 {
  grupo:"padaria",
  itens:[{'nome':'biscoito de polvilho 500g','valor':4.5},
                       {'nome':'pão de forma integral','valor':8.35}]
 }
];

A seguir nosso html:

<label>Categoria:</label><select data-bind="options:produtos,
      optionsText:'grupo',
      value:categoriaEscolhida,
      optionsCaption:'categoria...'"></select>
    <label>Produto:</label><select data-bind="options:itens,
      optionsText:'nome',
      value:itenEscolhido,
      optionsCaption:'Escolha o item'"></select>

E por último nosso código javascript:

var MarketModel = function(){
 this.produtos = ko.observableArray(produtos);
 this.categoriaEscolhida = ko.observable(this.produtos()[0]);
 this.itens = ko.computed(function(){
  return this.categoriaEscolhida().itens;
 },this);
};

A mágica acontece no observable do tipo computed. Resumidamente, pois a documentação é muito clara, computed é um campo calculado que sempre será atualizado quando as variáveis observáveis das quais ele depende forem atualizadas.Assim, toda vez que categoriaEscolhida for atualizada, itens também será. Simples assim.

Impressão com NodeJS

Esta é uma simples solução para quando temos uma aplicação de Intranet com NodeJS, e que gera documentos que precisam ser impressos, contudo os usuários desta intranet compartilham uma única impressora conectada ao e instalada no servidor.
Vamos utilizar o pacote printer. Para instalar basta

 npm install -g node-gyp
 npm install printer --msvs_version=2013

Continuando com a simplicidade, agora vamos a um exemplo:

var fs = require('fs');
var printer = require("printer");
fs.readFile("teste.pdf", 'utf8', function(err, file){
  if (err) throw err;
  console.log("Trying to print...");
  printer.printDirect({data:file,
      type: 'PDF',
      success:function(jobID){
 console.log("Trabalho enviado à impressora - ID: "+jobID);
      },
      error:function(err){
 console.log(err);
      }
  });
});

Neste exemplo utilizamos um pdf qualquer para ser impresso na impressora configurada como padrão. Existem várias opções customizáveis, acho válido citar que os dados podem vir de um arquivo ou de uma string. Você pode por exemplo utilizar renderizadores de templates em html como handlebars e passar a string diretamente para impressão. Você pode adicionar um parâmetro printer com o nome de uma impressora que não seja a padrão se houver mais de uma conectada ao servidor. Pois então, esta foi uma pequena dica!

Validação Customizada de Formulários com Angular

Angular facilita a organização de nossas aplicações em tudo, inclusive na validação de formulários. Porém nenhum framework existente cobre a necessidade de todos os programadores. Com certeza em algum momento você vai querer adicionar alguma funcionalidade à sua aplicação que não é coberta pelo framework. No presente post eu quero inserir uma validação para cpf de um input em meu formulário e não quebrar a validação de angular e não ter de fazer gambiarras. Vamos lá, faremos isto utilizando directives. Para executar esta tarefa me baseei no Post de Ben Lesh e na documentação oficial. 
O pulo do gato é bem descrito por Ben Lesh, utilizando a função $setValidity pertencente ao ngModelController definimos se o valor de um ngModel de determinado campo é válido ou não. Vale à pena conhecer a documentação de ngModelController.

Vamos ao código:

 
dir.directive("cpfValidate", function(){
 return{
  // iremos utilizar a diretiva como atributo
  restrict: 'A', 
  // o elemento a ser validado deve conter o atributo ng-model
  require: 'ngModel',
  link: function(scope, elem, attr, ctrl) {
   /*
    $parser é um array de funções para sanitizar os dados,
    aqui eu adiciono a minha função de validação.
   */
   ctrl.$parsers.unshift(function(value) {
    /* 
     TestaCPF é uma função qualquer para testar um cpf 
     você pode implementar a sua ou copiar na internet.
    */
    var valid = TestaCPF(value);
    ctrl.$setValidity('cpfValidate', valid);
    // se for válido retorno valid, else retorna undefined.
    return valid ? value : undefined;
   });
  }
 };
});

Estatísticas, R e Java - JRI

Bom neste post, quero apresentar de forma simples como pedir ao R para realizar alguns cálculos e retornar o resultado para uma aplicação em Java.


Vamos ao código:

 Rengine re = new Rengine("--vanilla");
public REXP eval(String c) throws Exception{

 REXP r = rengine.eval(c);

 if(r == null){

 rengine.eval("traceback()");

 throw new Exception("Não teve retorno!!!");

 }

return r;

}

Aqui o que temos é uma função que encapsula a avaliação para o caso.