很复杂的数据处理，能不能用R脚本实现，比较长，各位大神进来看看

别止爱樱桃

2017-6-15 15:58 上传
点击文件名下载附件


表1.zip (134.95 KB, 下载次数: 2)

2017-6-15 17:15 上传

点击文件名下载附件

如表1所示，以第一行数据为例，每隔16个数（列）会出现一个QC，总共7个QC，先以第一行QC-1和QC-2中间的数为例，我们先利用QC-1的序号（1）和第一行QC-1的值（108979.3）和QC-2的序号 （18）和第一行QC-2的值（81569.4），将序号数当做X,QC的值当做Y，利用两对（X,Y）求出Y=aX+b的a，b，这样就可以得到一个一元一次函数，QC-1和QC-2之间的所有数据在知道序号数（X）的情况下，先利用得到的一元一次函数求Y，再将表中现有的数据除以一一对应的Y值，例如序号3下的数据就除以利用序号3得到的Y。QC-2和QC-3之间处理也是一样，先求一元一次函数，再把QC-2和QC-3的数据除以根据函数得到的对应Y值，以此类推，QC-6和QC-7之间的所有数除以利用QC-6和QC-7得到的函数计算得到的对应Y值。处理完一行后，后面的所有行都进行这样的处理。R脚本能不能实现这样的数据计算？麻烦给出具体的代码，谢谢各位大神。