6.2 R语言构建追涨杀跌量化交易模型