when I execute below codes, it returns 503. it worked a few days before. could you help on this? thank you.
id_exposure <- c("ieu-b-4846", "ieu-b-4850", "met-d-ApoB", "met-d-Total_C", "ukb-a-290" )
library(TwoSampleMR)
options(ieugwasr_api = 'gwas-api.mrcieu.ac.uk/')
#options(ieugwasr_api = 'https://api.opengwas.io/api')
exposure_dat <- mv_extract_exposures(id_exposure,
opengwas_jwt = "<my jwt>")