This is a convinience function, internal borrowed from https://github.com/NickWilliamsSanger/treemut/blob/main/R/treemut.R#L68

This is a convinience function, internal borrowed from https://github.com/NickWilliamsSanger/treemut/blob/main/R/treemut.R#L68

add_derived_profile_info(
  profile_df,
  samples = sprintf("s%s", 0:(nchar(profile_df$profile[1]) - 1))
)