mmp_alldata_update: Returns the mean maximum power updated for a set of training...
In Bolshom/optimumtt: A colection of functions to help cyclists.

Description Usage Arguments Details Value Author(s) Examples

Returns the moving maximum power for a bunch of activities, using the power data second-by-second, from all durations to the length of the training sessions. It adds mean maximum power information from new training sessions, based on an older one.

1	mmp_alldata_update(dates_list_updt, dates_list, power_list_updt, mmp_alldata)

`dates_list_updt`	The dates and time vector from a period of training.
`dates_list`	The older dates and time vector from a period of training.
`power_list_updt`	A list containing the vector power data from a set of training sessions.
`mmp_alldata`	The older mean maximum power data calculated before.

It's good to use with get_power_data() within Golden Cheetah.

It gives the mean maximum power for each activity within the power list.

Natan Freitas Leite.

## The function is currently defined as
function (dates_list_updt, dates_list, power_list_updt, mmp_alldata)
{
    updt = length(which(!(dates_list_updt %in% dates_list))) ==
        0
    if (updt) {
        mmp_alldata_updt = mmp_alldata
    }
    else {
        mmp_updt = list()
        condition = which(!(dates_list_updt %in% dates_list))
        for (i in condition) {
            mmp_updt[[i]] = mmp_act(power_list_updt[[i]])
        }
        mmp_alldata_updt = list()
        l_lu = length(list_updt)
        condition_2 = which((list_updt %in% list))
        for (i in 1:l_lu) {
            if (i %in% condition) {
                mmp_alldata_updt[[i]] = mmp_alldata[[which(list ==
                  list_updt[i])]]
            }
            else {
                mmp_alldata_updt[[i]] = mmp_updt[[i]]
            }
        }
      print(i)
    }
    return(mmp_alldata_updt)
  }

  data(dates_list_updt)
  data(power_list)
  data(mmp_alldata)

  dates_list=dates_list_updt[-431]
  mmp_alldata=mmp_alldata[1:430]

  mmp_sessions=mmp_alldata_update(dates_list_updt,dates_list,power_list_updt,mmp_alldata)
  plot(mmp_sessions[[1]])