Create a workout Plan

Source: R/create_plan.R

create_plan() creates a linear progression workout-plan.

create_plan(start_date, time_span, training_days, workouts, exercise_stats)

Arguments

start_date

PLACEHOLDER
time_span

PLACEHOLDER
training_days

PLACEHOLDER
workouts

PLACEHOLDER
exercise_stats

PLACEHOLDER

Value

dataframe

Examples

 create_plan(
   start_date = lubridate::today(),
   time_span = 12,
   training_days = c(1, 3, 5),
   workouts = example_workouts <- c(
     dplyr::tibble(
       exercise = c("benchpress", "squat", "deadlift")
     ),
     dplyr::tibble(
       exercise = c("overhead_press", "squat", "deadlift")
     )
   ),
   exercise_stats = dplyr::tibble(
     exercise = c("benchpress", "squat", "overhead_press", "deadlift"),
     increase = c(1, 2.5, 1, 2.5),
     starting_weight = c(20, 40, 20, 60)
   )
 )
#> # A tibble: 36 × 3
#>    date       training_nr training            
#>    <date>           <int> <list>              
#>  1 2021-11-05           1 <grouped_df [3 × 6]>
#>  2 2021-11-08           2 <grouped_df [3 × 6]>
#>  3 2021-11-10           3 <grouped_df [3 × 6]>
#>  4 2021-11-12           4 <grouped_df [3 × 6]>
#>  5 2021-11-15           5 <grouped_df [3 × 6]>
#>  6 2021-11-17           6 <grouped_df [3 × 6]>
#>  7 2021-11-19           7 <grouped_df [3 × 6]>
#>  8 2021-11-22           8 <grouped_df [3 × 6]>
#>  9 2021-11-24           9 <grouped_df [3 × 6]>
#> 10 2021-11-26          10 <grouped_df [3 × 6]>
#> # … with 26 more rows