powered by
mvpa.min.AP(mets,epoch)
sed.min.AP
lit.min.AP
data(second.by.second) mets <- second.by.second.data$mets mvpa.min.AP(mets,epoch=1) # summarize by date tapply(second.by.second.data$mets, second.by.second.data$date,mvpa.min.AP,epoch=1)
Run the code above in your browser using DataLab