[WebScrapping] Calculadora Geográfica INPE

Olá pessoal!

Tudo bem?

Eu precisava converter umas coordenadas e resolvi tentar resolver meu problema através da Calculadora Geográfica do INPE. Eu inspecionei o Network das requisições, e vi que a conversão ocorre através de duas requisições do tipo POST em sequência, intercaladas por dois GETs. Tentei implementar essa sequência, bem como variações dela e, finalmente, só o POST final e não tive muito sucesso.

Eu esperava terminar conseguindo pegar essa tabelinha do resultado da conversão, mas não consigo chegar nela nem por um decreto.

Alguém teria alguma ideia do que pode estar acontecendo? Qual seria a maneira ‘correta’ para fazer essas requisições?

Agradeço qualquer ajuda ou orientação.

library(httr)
library(tidyverse)
library(xml2)

url <- 'http://www.dpi.inpe.br/calcula/result.php?X=$ptx;Y=$pty;DATUM=$dat;PRJIN=$prjin;TYCORD=$typecoord'

dados <- list(
  'proj_out' = 'utm',
  'DATUM_OUT' = 1,
  'Y' = 22.5,
  'X' = 46.8,
  'DATUM' = 1,
  'PRJIN' = 'latlong_gd',
  'TYCORD' = 'latlong_gd',
  'Avan%E7ar' = 'Avan%E7r'
)

foo <- POST(url = url, body = dados, encode = 'form', 
            add_headers(.headers = c('Connection' = 'Keep-Alive')))

foo %>% 
  content() %>% 
  xml_find_first(xpath = '//frame[@name="canvas"]')
#> {xml_missing}
#> <NA>

Created on 2021-10-30 by the reprex package (v2.0.0)