Description Usage Arguments Examples
Get total weekly TSS
1 | getWeekTSS(weeklyPlan)
|
weeklyPlan |
(weekPlan) An object with the weekly training plan. If NULL, a new one will be created |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | ##set the run threshold to 4:30
myThreshold <- addThreshold(sport = 'run', metric = 'pace', value = '4:30')
##set the bike threshold to 250
myThreshold <- addThreshold(sport = 'bike', metric = 'power', value = 250, userSettings = myThreshold)
##create a brick session
newSession <- createSession(sports=list('run', 'bike'),
minTargetZ = list(c(20, 30), 60), targetZ = list(c('4:20', '4:40'), 250),
metric = list('pace', 'power'), userSettings = myThreshold, TSS = list(NA, NA),
description = 'making a test session')
# create a new plan
newPlan <- storeSettings(myThreshold)
##add to the plan monday
newPlan <- addSessionToPlan(weeklyPlan = newPlan, session = newSession, day = 'monday')
##get the totalTSS
getWeekTSS(newPlan)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.