R语言变量间公式计算