error in QueryNet

Hi

i was running the example but ran into this error, "innatedb" did not work either.

pls advise. thank you.

> dataSet<-PrepareInputList(dataSet,"#Entrez  logFC
+ 4495  61.12
+ 4496  51.06
+ 4499  23.79
+ 6354  21.04
+ 6369  19.76", "hsa", "gene", "entrez");
trying URL 'https://www.omicsnet.ca/OmicsNet/resources/data/hsa/entrez.rds'
Content type 'unknown' length 686040 bytes (669 KB)
==================================================
downloaded 669 KB

Preparing input list with the type of gene completed.
> dataSet<-QueryNet(dataSet, "gene", "innate")
gene gene innate direct FALSE 
We are going to query the data table: hsa_innate from ppi database..
Error in if (dataSet$ppiZero) { : argument is of length zero