decomposes an expanded state into the state name and cycle_in_state. If the state is not a tunnel, it will return cycle_in_state=1

tunnel2state(tunnel_state)

Arguments

tunnel_state

the name of the tunnel state

Value

list consisting of the name of the state and it's cycle_in_state value

Examples

tunnel2state("sick_tnl5")
#> $state
#> [1] "sick"
#> 
#> $cycle_in_state
#> [1] 5
#>