diff --git a/DESCRIPTION b/DESCRIPTION index caf82af..748cafc 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: SpaTopic Type: Package Title: Topic Inference to Identify Tissue Architecture in Multiplexed Images -Version: 1.1.0.9000 +Version: 1.1.0.9900 Date: 2024-04-22 Authors@R: person("Xiyu", "Peng", email = "pansypeng124@gmail.com", role = c("aut", "cre"),comment = c(ORCID = "0000-0003-4232-0910")) @@ -23,7 +23,7 @@ Suggests: SeuratObject (>= 4.9.9.9086), doParallel (>= 1.0), VignetteBuilder: knitr -RoxygenNote: 7.2.3 +RoxygenNote: 7.3.1 Encoding: UTF-8 LazyData: true URL: https://github.com/xiyupeng/SpaTopic diff --git a/R/Gibbs_sampler.R b/R/Gibbs_sampler.R index 73a85da..c791bc0 100644 --- a/R/Gibbs_sampler.R +++ b/R/Gibbs_sampler.R @@ -147,6 +147,14 @@ SpaTopic_inference<-function(tissue, ntopics, sigma = 50, region_radius = 400, k return(NULL) } + if(any(is.na(itr_df$image)) | + any(is.na(itr_df$X)) | + any(is.na(itr_df$Y)) | + any(is.na(itr_df$type)) ){ + stop("Please make sure you have no NA in your input dataset!") + return(NULL) + } + itr_df$X<-as.numeric(itr_df$X) itr_df$Y<-as.numeric(itr_df$Y) itr_df$type<-as.factor(itr_df$type) diff --git a/R/SpaTopic-package.R b/R/SpaTopic-package.R index 1b273fa..0919523 100644 --- a/R/SpaTopic-package.R +++ b/R/SpaTopic-package.R @@ -21,12 +21,10 @@ #' #' @author Xiyu Peng \email{pansypeng124@gmail.com} #' -#' @docType package -#' #' @keywords package #' #' @importFrom Rcpp sourceCpp #' #' @useDynLib SpaTopic -NA +"_PACKAGE" diff --git a/docs/404.html b/docs/404.html index c976931..b40c631 100644 --- a/docs/404.html +++ b/docs/404.html @@ -7,8 +7,8 @@ Page not found (404) • SpaTopic - - + + GNU General Public License • SpaTopicGNU General Public License • SpaTopic @@ -10,7 +10,7 @@ SpaTopic - 1.1.0.9000 + 1.1.0.9900