Quebra captcha do sistema e-SAJ por áudio.
if (!require(devtools)) install.packages('devtools')
devtools::install_github('decryptr/captchaSajAudio')
library(captchaSajAudio)
arq <- system.file('exemplo.mpg', package = 'captchaSajAudio')
decifrar(arq)