diff --git a/DESCRIPTION b/DESCRIPTION index 9e3f4a5..164aa78 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -2,7 +2,7 @@ Type: Package Package: ERPM Title: Exponential Random Partition Models Version: 0.2.0 -Date: 2024-03-27 +Date: 2024-05-03 Authors@R: c( person("Marion", "Hoffman", , "marion.hoffman.31@gmail.com", role = c("cre", "aut", "cph"), comment = c(ORCID = "0000-0002-0741-7760")), diff --git a/R/functions_Metropolis.R b/R/functions_Metropolis.R index 8d4953a..0e04806 100644 --- a/R/functions_Metropolis.R +++ b/R/functions_Metropolis.R @@ -52,6 +52,7 @@ #' # set parameter values for each of these effects #' parameters <- c(-0.2, 0.2, -0.1, 0.5) #' +#' \donttest{ #' # generate simulated sample, by setting the desired additional parameters for the #' # Metropolis sampler and choosing a starting point for the chain (first.partition) #' nsteps <- 100 @@ -71,7 +72,6 @@ #' return.all.partitions = TRUE) #' #' -#' \donttest{ #' # or: simulate an estimated model #' partition <- c(1,1,2,2,2,3) # the partition already defined for the (previous) estimation #' nsimulations <- 1000 diff --git a/man/draw_Metropolis_single.Rd b/man/draw_Metropolis_single.Rd index c3aac6a..b2979c9 100644 --- a/man/draw_Metropolis_single.Rd +++ b/man/draw_Metropolis_single.Rd @@ -78,6 +78,7 @@ objects[[1]] <- list(name = "friendship", object = friendship) # set parameter values for each of these effects parameters <- c(-0.2, 0.2, -0.1, 0.5) +\donttest{ # generate simulated sample, by setting the desired additional parameters for the # Metropolis sampler and choosing a starting point for the chain (first.partition) nsteps <- 100 @@ -97,7 +98,6 @@ sample <- draw_Metropolis_single(theta = parameters, return.all.partitions = TRUE) -\donttest{ # or: simulate an estimated model partition <- c(1,1,2,2,2,3) # the partition already defined for the (previous) estimation nsimulations <- 1000