## Not run:
# #(For complete demo see parameterTestMACD.R)
# tPD2<-setParameterDistribution(tPD2, strat, component.type='indicator', component.label='FastSMA',
# distribution=list(nFast=(10:30)), label='nFast')
# tPD2<-setParameterDistribution(tPD2, strat, component.type='indicator', component.label='SlowSMA',
# distribution=list(nSlow=(20:40)), label='nSlow')
# tPD2<-setParameterDistribution(tPD2, strat, component.type='signal', component.label='go.long',
# distribution=list(relationship=c('gt', 'gte')), label='sig1.gtgte')
# ## End(Not run)
Run the code above in your browser using DataLab