Skip to contents

This function create simple example using progression_table

Usage

create_example(
  progression_table,
  reps = c(3, 5, 10),
  volume = c("intensive", "normal", "extensive"),
  type = c("grinding", "ballistic"),
  ...
)

Arguments

progression_table

Progression table function

reps

Numeric vector. Default is c(3, 5, 10)

volume

Character vector. Default is c("intensive", "normal", "extensive")

type

Character vector. Type of max rep table. Options are grinding (Default) and ballistic

...

Extra arguments forwarded to progression_table

Value

Data frame with the following structure

type

Type of the set and rep scheme

reps

Number of reps performed

volume

Volume type of the set and rep scheme

Step 1

First progression step %1RM

Step 2

Second progression step %1RM

Step 3

Third progression step %1RM

Step 4

Fourth progression step %1RM

Step 2-1 Diff

Difference in %1RM between second and first progression step

Step 3-2 Diff

Difference in %1RM between third and second progression step

Step 4-3 Diff

Difference in %1RM between fourth and third progression step

Examples

create_example(progression_RIR)
#> # A tibble: 18 × 10
#>    type      reps volume Step …¹ Step …² Step …³ Step …⁴ Step …⁵ Step …⁶ Step …⁷
#>    <chr>    <dbl> <chr>    <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>
#>  1 grinding     3 inten…    83.3    85.7    88.2    90.9    2.38    2.52    2.67
#>  2 grinding     3 normal    81.1    83.3    85.7    88.2    2.25    2.38    2.52
#>  3 grinding     3 exten…    79.0    81.1    83.3    85.7    2.13    2.25    2.38
#>  4 grinding     5 inten…    79.0    81.1    83.3    85.7    2.13    2.25    2.38
#>  5 grinding     5 normal    76.9    79.0    81.1    83.3    2.02    2.13    2.25
#>  6 grinding     5 exten…    75.0    76.9    79.0    81.1    1.92    2.02    2.13
#>  7 grinding    10 inten…    69.8    71.4    73.2    75.0    1.66    1.74    1.83
#>  8 grinding    10 normal    68.2    69.8    71.4    73.2    1.59    1.66    1.74
#>  9 grinding    10 exten…    66.7    68.2    69.8    71.4    1.51    1.59    1.66
#> 10 ballist…     3 inten…    71.4    75.0    79.0    83.3    3.57    3.95    4.38
#> 11 ballist…     3 normal    68.2    71.4    75.0    79.0    3.25    3.57    3.95
#> 12 ballist…     3 exten…    65.2    68.2    71.4    75.0    2.96    3.25    3.57
#> 13 ballist…     5 inten…    65.2    68.2    71.4    75.0    2.96    3.25    3.57
#> 14 ballist…     5 normal    62.5    65.2    68.2    71.4    2.72    2.96    3.25
#> 15 ballist…     5 exten…    60.0    62.5    65.2    68.2    2.50    2.72    2.96
#> 16 ballist…    10 inten…    53.6    55.6    57.7    60.0    1.98    2.14    2.31
#> 17 ballist…    10 normal    51.7    53.6    55.6    57.7    1.85    1.98    2.14
#> 18 ballist…    10 exten…    50.0    51.7    53.6    55.6    1.72    1.85    1.98
#> # … with abbreviated variable names ¹​`Step 1`, ²​`Step 2`, ³​`Step 3`, ⁴​`Step 4`,
#> #   ⁵​`Step 2-1 Diff`, ⁶​`Step 3-2 Diff`, ⁷​`Step 4-3 Diff`

# Create example using specific reps-max table and k value
create_example(
  progression_RIR,
  max_perc_1RM_func = max_perc_1RM_modified_epley,
  kmod = 0.0388
)
#> # A tibble: 18 × 10
#>    type      reps volume Step …¹ Step …² Step …³ Step …⁴ Step …⁵ Step …⁶ Step …⁷
#>    <chr>    <dbl> <chr>    <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>   <dbl>
#>  1 grinding     3 inten…    83.8    86.6    89.6    92.8    2.81    3.01    3.23
#>  2 grinding     3 normal    81.1    83.8    86.6    89.6    2.64    2.81    3.01
#>  3 grinding     3 exten…    78.6    81.1    83.8    86.6    2.48    2.64    2.81
#>  4 grinding     5 inten…    78.6    81.1    83.8    86.6    2.48    2.64    2.81
#>  5 grinding     5 normal    76.3    78.6    81.1    83.8    2.33    2.48    2.64
#>  6 grinding     5 exten…    74.1    76.3    78.6    81.1    2.19    2.33    2.48
#>  7 grinding    10 inten…    68.2    70.1    72.0    74.1    1.86    1.96    2.07
#>  8 grinding    10 normal    66.5    68.2    70.1    72.0    1.76    1.86    1.96
#>  9 grinding    10 exten…    64.8    66.5    68.2    70.1    1.67    1.76    1.86
#> 10 ballist…     3 inten…    70.1    74.1    78.6    83.8    4.03    4.52    5.11
#> 11 ballist…     3 normal    66.5    70.1    74.1    78.6    3.62    4.03    4.52
#> 12 ballist…     3 exten…    63.2    66.5    70.1    74.1    3.26    3.62    4.03
#> 13 ballist…     5 inten…    63.2    66.5    70.1    74.1    3.26    3.62    4.03
#> 14 ballist…     5 normal    60.3    63.2    66.5    70.1    2.96    3.26    3.62
#> 15 ballist…     5 exten…    57.6    60.3    63.2    66.5    2.69    2.96    3.26
#> 16 ballist…    10 inten…    50.8    52.8    55.1    57.6    2.08    2.26    2.46
#> 17 ballist…    10 normal    48.8    50.8    52.8    55.1    1.92    2.08    2.26
#> 18 ballist…    10 exten…    47.1    48.8    50.8    52.8    1.78    1.92    2.08
#> # … with abbreviated variable names ¹​`Step 1`, ²​`Step 2`, ³​`Step 3`, ⁴​`Step 4`,
#> #   ⁵​`Step 2-1 Diff`, ⁶​`Step 3-2 Diff`, ⁷​`Step 4-3 Diff`