r语言怎么计算IV值