运行KEGG和GSEA时报错

KEGG<-enrichKEGG(gene=gene.df$ENTREZID,   organism = 'hsa',pvalueCutoff = 0.05)Reading KEGG annotation online:fa

KEGG<-enrichKEGG(gene=gene.df$ENTREZID, organism = 'hsa',pvalueCutoff = 0.05)

Reading KEGG annotation online:

fail to download KEGG data...

Error in download.KEGG.Path(species) :

'species' should be one of organisms listed in 'http://www.genome.jp/kegg/catalog/org_list.html'...

In addition: Warning message:

In utils::download.file(url, quiet = TRUE, method = method, ...) :

URL 'https://rest.kegg.jp/link/hsa/pathway': status was 'Failure when receiving data from the peer'

KEGG<-gseKEGG(gene_fc, organism = "ssc", keyType = "kegg", exponent = 1,n minGSSize = 10, maxGSSize = 500, eps = 1e-10, pvalueCutoff = 0.05,n pAdjustMethod = "BH", verbose = TRUE, use_internal_data = FALSE,n seed = FALSE, by = "fgsea")

Reading KEGG annotation online:

fail to download KEGG data...

Error in download.KEGG.Path(species) :

'species' should be one of organisms listed in 'http://www.genome.jp/kegg/catalog/org_list.html'...

In addition: Warning message:

In utils::download.file(url, quiet = TRUE, method = method, ...) :

URL 'https://rest.kegg.jp/link/hsa/pathway': status was 'Failure when receiving data from the peer'

解决方法：（参考https://blog.csdn.net/weixin_54434521/article/details/125227194）

install.packages("R.utils")nR.utils::setOption("clusterProfiler.download.method",'auto')