Skip to content

Commit

Permalink
space after :
Browse files Browse the repository at this point in the history
  • Loading branch information
helske committed Sep 5, 2024
1 parent 8636263 commit 535a64e
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 2 deletions.
3 changes: 2 additions & 1 deletion R/combine_models.R
Original file line number Diff line number Diff line change
Expand Up @@ -10,7 +10,8 @@
transition_probs <- as.matrix(.bdiag(model$transition_probs))
state_names <- unlist(original_state_names <- model$state_names)
if (length(unique(state_names)) != length(state_names)) {
state_names <- paste(rep(model$cluster_names, model$n_states), state_names, sep = ":")
state_names <- paste0(rep(model$cluster_names, model$n_states),
": ", state_names)
}
dimnames(transition_probs) <- replicate(2, state_names, simplify = FALSE)

Expand Down
2 changes: 1 addition & 1 deletion R/stacked_sequence_plot.R
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
#' Stacked Sequence Plots of Multichannel Sequences and/or Most Probable
#' Paths from Hidden Markov Models
#'
#' Function `stacked_sequence_plot draws stacked sequence plots of sequence
#' Function `stacked_sequence_plot` draws stacked sequence plots of sequence
#' object created with the [TraMineR::seqdef] function or observations and/or most
#' probable paths of model objects of `seqHMM` (e.g., `hmm` and `mhmm`).
#'
Expand Down

0 comments on commit 535a64e

Please sign in to comment.