# Make a four-state ordered character costmatrix:
ordered_costmatrix <- make_costmatrix(
min_state = "0",
max_state = "3",
character_type = "ordered"
)
# Find length of shortest spanning tree of costmatrix:
find_costmatrix_minimum_span(costmatrix = ordered_costmatrix)
# Make a four-state unordered character costmatrix:
unordered_costmatrix <- make_costmatrix(
min_state = "0",
max_state = "3",
character_type = "unordered"
)
# Find length of shortest spanning tree of costmatrix:
find_costmatrix_minimum_span(costmatrix = unordered_costmatrix)
# Make a four-state irreversible character costmatrix:
irreversible_costmatrix <- make_costmatrix(
min_state = "0",
max_state = "3",
character_type = "irreversible"
)
# Find length of shortest spanning tree of costmatrix:
find_costmatrix_minimum_span(costmatrix = irreversible_costmatrix)
# Make a four-state Dollo character costmatrix:
dollo_costmatrix <- make_costmatrix(
min_state = "0",
max_state = "3",
character_type = "dollo"
)
# Find length of shortest spanning tree of costmatrix:
find_costmatrix_minimum_span(costmatrix = dollo_costmatrix)
Run the code above in your browser using DataLab