CalculateHyperScore - Failed to connect to the API Server

MetaboAnalyst
1

Hi
I have been trying to perform overrepresentation enrichment analysis using MetaboAnalystR with the KEGG pathway, but I am getting an error related to the connection to the API server.

Here is my code:

> mSet<-InitDataObjects("conc", "msetora", FALSE)
> mSet<-Setup.MapData(mSet, cmpd.vec);
> mSet<-CrossReferencing(mSet, "hmdb");
[1] "Loaded files from MetaboAnalyst web-server."
[1] "1"                                                                              
[2] "Name matching OK, please inspect (and manual correct) the results then proceed."
> mSet<-CreateMappingResultTable(mSet)
[1] "Loaded files from MetaboAnalyst web-server."
> mSet<-SetMetabolomeFilter(mSet, F);
> mSet<-SetCurrentMsetLib(mSet, "kegg_pathway", 2);
> mSet<-CalculateHyperScore(mSet)
[1] "Loaded files from MetaboAnalyst web-server."
[1] "Failed to connect to the API Server!"
[1] "Error! Mset ORA via xialab.ca/api unsuccessful!"

I am not sure if this is an issue with the API server or something with my code, but any help would be appreciated.