# \donttest{
op <- options(aemo.cache_dir = tempdir())
try({
# Find equations for the Heywood interconnector thermal limits
g <- aemo_gencon(constraint_id = c("V::S_NIL_TBSE", "V::S_NIL_FCSPS"))
head(g)
})
options(op)
# }
Run the code above in your browser using DataLab