add

xjsun1221 · Feb 11, 2021 · 2403bc6 · 2403bc6
1 parent 52f6e87
commit 2403bc6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/0_geo_download.R b/R/0_geo_download.R
@@ -66,7 +66,7 @@ geo_download <-  function(gse,by_annopbrobe = T,simpd=T,colon_remove = F){
   #(3)提取芯片平台编号
   gpl <- eSet[[1]]@annotation
   re = list(exp=exp,pd=pd,gpl=gpl)
-  if(is.null(dim(exp))){
+  if(is.null(dim(exp)) | nrow(exp)==0){
     warning("exp is empty")
   } else if (any(exp<0)) {
     warning("nagtive values detected")