Função cut_text em parse_dje_tjsp retorna N.A em alguns casos.

[GigioR]

A função cut_text dentro da função parse_dje_tjsp está retornando valores nulos para alguns casos.
O diário de justiça eletrônico (dje) usado foi do dia 02/10/2017, caderno 18, do TJSP, e os valores nules são os dos Distribuidores Criminais das cidades de Brodowski e Descalvado.

[...]
            lim_inf <- text %>%
            break_text(y$valor[distribuidor[i]])
          points <- text %>%
            stringr::str_sub(lim_inf, -1) %>%
            break_text(y$valor[distribuidor[i]:(distribuidor[i]+1)])
          r[i] <- stringr::str_sub(stringr::str_sub(text, lim_inf, -1),
                                   points[1], points[2])

[...]

O trecho de código acima é possivelmente onde está o erro que faz retornar valores nulos.
Em distribuidor[i] tem um valor mas em distribuidor[i] +1 não tem valor, fazendo com que points só tenha uma posição, que é a points[1]. Como points[2] não tem valor, r[i] é nulo.
r[i] é o texto com todos os processos do Distribuidor da iteração.
points[1] é o nome do Distribuidor e points[2] é o próximo ponto a ser analisado para retornar o valor em r[i].

Passando por parâmetro a posição 21 da variável breaks teremos:
Saída de points[1]: "\nDistribuidor Criminal\n"
Saída de points[2]: "\n2° Vara\n"

O caso acima é um caso de sucesso.

Passando por parâmetro a posição 28 da variável breaks teremos:
Saída de points[1]: "\nDistribuidor Criminal\n"
Saída de points[2]: "\nNA\n"

O caso acima é um caso de falha.

É complicado explicar o erro que existe nessa função. Mas no geral, a função gera um data_frame de processos separados por cidades e distribuidores (Cívil ou Criminal) e com esse erro faltam aproximadamente 20 processos numa tabela com mais de 6500 processos.

[GigioR]

Correção: os valores que estão sendo retornados não são valores nulos, são valores omissos.