This does appear to be Monterey-related, as it works under Ubuntu
library(jsonlite)
example <- jsonlite::fromJSON("https://connect.ceniss.gob.hn/wspublico/API/RUP/GetDatosProgramaByAnio?Id=169&Anio=2019")
class(example)
#> [1] "data.frame"
dim(example)
#> [1] 1 240
According to this S/O post, the error may be due to changes in the macOS SSL infrastructure. While this is being fixed, try
example <- jsonlite::fromJSON("http://connect.ceniss.gob.hn/wspublico/API/RUP/GetDatosProgramaByAnio?Id=169&Anio=2019")
using http, rather than https.