loop_summary {LoopDetectR}

Summary of a loop list

Description

Summarizes the loops in a loop list by their length and sign, returns an overview table of the numbers of all, negative and positive loops divided by their lengths.

Usage

loop_summary(loop_list, column_val = "length")

Arguments

loop_list

List of loops as dataframe with columns length, sign.

column_val

String indicating the orientation of the summary table. By default, rows of the results table are the sign of the loops, columns are loop lengths. If column_val is set to "sign", columns and rows are exchanged.

Details

Lengths are abbreviated by len_1, len_2, len_3 etc., signs are abbreviated by pos for positive, neg for negative loops. The table contains entries for each loop length from 1 to the maximal loop length encountered in the table, and zeros are filled in if no loops of a certain length exist in the table.

Examples

#sample Jacobian matrix of a system with 4 variables
jac_matrix <- rbind(c(-1,0,0,-1),c(1,-1,0,1),c(0,1,-1,0),c(0,0,1,-1))
#find the feedback loops of the system
loop_list <- find_loops(jac_matrix,10)
#loop summary table
loop_sum_tab <- loop_summary(loop_list)