Retrieves a summary of the critical power model in a tidy way. Mainly for internal use.

summary_cp(
.data,
time_to_exhaustion_column,
model,
method,
critical_speed = FALSE
)

## Arguments

.data |
A data frame containing a power output column and their respective time-to-exhaustion. |

time_to_exhaustion_column |
The name of the time-to-exhaustion column. This value has to be in seconds. Default to `"TTE"` . |

model |
The `nls` or `lm` object derived in one of the `method_` functions. |

method |
The method for estimating critical power. It can be one of `c("3-hyp", "2-hyp", "linear", "1/time")` . |

critical_speed |
A boolean to specify whether the estimation of critical speed is being performed, instead of critical power. Default to `FALSE` . |

## Value

a tibble