Issue in getUniprotIDs()

[DingyinPhD]

Hi, thanks for developing such a great package.

I've encountered an issue when using the getUniprotIDs() function.
Here is my command:

library(drugTargetInteractions)
library(tidyverse)
library(ggplot2)
library(DT)
library(UniProt.ws)

# Prepare Working Environment
chembldb <- system.file("extdata", "chembl_sample.db", package="drugTargetInteractions")
resultsPath <- system.file("extdata", "results", package="drugTargetInteractions")
config <- genConfig(chemblDbPath=chembldb, resultsPath=resultsPath)

# Query Drug-Target Annotation
keys <- c("ENSG00000120088", "ENSG00000135441", "ENSG00000120071")
res_list100 <- getUniprotIDs(taxId=9606, kt="ENSEMBL", keys=keys, seq_cluster="UNIREF100") 

The problem is, I've been stuck here for several hours, and there's still no progress.

> res_list100 <- getUniprotIDs(taxId=9606, kt="ENSEMBL", keys=keys, seq_cluster="UNIREF100") 
  |                                                                                                                                  |   0%

Could you please provide guidance on solving this issue ?

Thank you