[模型]拉格朗日插值法

简介: [模型]拉格朗日插值法

image.png

1 拉格朗日插值法的适用场景

拉格朗日插值法主要用于对样本点较少的数据的补全处理。对于 总体样本数较多的数据,可以在插值点的附近选取若干个合适的节点(不宜过多) 用于拉格朗日插值多项式的构建。

拉格朗日插值法主要用于对样本点较少的数据的补全处理,是由于当多项式的阶数较大时,可能会出现龙格现象

龙格现象:

龙格现象是指,在区间内取等距插值点,运用插值多项式进行逼近时,逼近多项式在区间两端会发生震荡,并且随着插值次数增高,震荡现象也会严重,因而逼近误差也会增大。

[1]寿媛,陈豫眉.利用MQ拟插值解决高次插值所出现的龙格现象[J].洛阳师范学院学报,2016,35(05):6-9.DOI:10.16594/j.cnki.41-1302/g4.2016.05.002.

image.png

图片来源:数值计算之 插值法(3)多项式插值法的解,范德蒙矩阵,龙格现象

解决龙格现象可以使用分段线性插值,利用分区间的低阶多项式对被插值函数进行良好地逼近。

2 拉格朗日插值法的基本原理

image.png

[1] 林昌华,杨岩.拉格朗日插值法在工程设计及CAD中的应用[J].重庆理工大学学报(自然科学),2013,27(12):34-37.

$y = p(x)$
$p(x)$
$f(x)$
$f(x_{i}) = p(x_{i}), i = 1, 2, 3, \cdots, n$

3 拉格朗日插值多项式的构建

使用拉格朗日插值法对数据进行补全,一列一列数据进行补全。

image.png

x i x_{i}xi 对应位置的 y i y_{i}yi 为缺失值,该x i x_{i}xi 跳过

x i x_{i}xi 为已知数据对应的位置

x i x_{i}xi 如何取值根据实际情况而定

image.png

$f(x)$
$n+1$
$(x_{0}, y_{0}), (x_{1}, y_{1}), \cdots, (x_{n}, y_{n})$
$x_{i}$
$1, 2, \cdots, n+1$
$y_{i}$
$f(x)$


image.png

image.png


$n+1$
$L_{j}(x)$
$$L_{j}(x)=\prod_{i=0, i \neq j}^{n} \frac{x-x_{i}}{x_{j}-x_{i}}=\frac{x-x_{0}}{x_{j}-x_{0}} \cdots \frac{x-x_{j-1}}{x_{j}-x_{j-1}} \frac{x-x_{j+1}}{x_{j}-x_{j+1}} \cdots \frac{x-x_{n}}{x_{j}-x_{n}}$$
$L(x)$
$$L (x)=\sum_{j=0}^{n} y_{j}L_{j}(x)$$

求出的拉格朗日插值多项式

5 拉格朗日插值法补全数据实现

测试数据:

「1 - 副本.xlsx」

「1(存在从第一行开始连续缺失数据).xlsx」

5.1 Python 实现

代码参考自:

[1]赵莉,孙娜,李丽萍,崔杰.拉格朗日插值法在数据清洗中的应用[J].辽宁工业大学学报(自然科学版),2022,42(02):102-105+117.DOI:10.15916/j.issn1674-3261.2022.02.007.

方法一:

1.对于表格第一行的缺失值和最后一行的缺失值无法进行填补

2.对于从第一行开始缺失的数据,且从第一行开始连续缺失的数据的个数大于k,无法进行缺失值填补。

import numpy as np
import pandas as pd
# 引入拉格朗日插值法所需的方法
from scipy.interpolate import lagrange
# 文件读取
data = pd.read_excel('./1.xlsx')
# 字符串表示的空值预处理
def fun(x):
  if (x=='—' or x=='NULL' or x=='NA'): return np.nan
  else: return x
data = data.applymap(fun)
# 生成拉格朗日插值
def interpolate_columns(data_col, missing_val_idx, k=2):
  """
  data_col: 需要进行缺失值填补的列
  missing_val_idx: 数据缺失的单元格在该列对应的索引
  k: 缺失值前后取值的个数, 默认为2个,防止出现龙格现象
  return: 返回拉格朗日插值
  """
  # 防止取缺失值前后的非缺失值时下标越界
  # 向缺失值前取值的个数,默认为 k
  f_k = k
  # 如果缺失值前还有的数值个数小于 k
  # 更改取值个数
  if(missing_val_idx < k): f_k = missing_val_idx
  # 向缺失值后取值的个数,默认为 k
  b_k = k
  # 如果缺失值后还有的数值个数小于 k
  # 更改取值个数
  if((data_col.size-missing_val_idx-1) < k): b_k = data_col.size-missing_val_idx-1
  # 获取二者的较小值
  if(f_k <= b_k): k = f_k
  else: k = b_k
  # 取出当前缺失值位置前后 k 个值
  y = data_col[ 
    list(range(missing_val_idx-k, missing_val_idx))  + list(range(missing_val_idx+1, missing_val_idx+1+k)) 
  ]
  # 去除空值
  y = y[ y.notnull() ]
  # 生成拉格朗日插值函数
  f = lagrange(y.index, list(y))
  # 计算并返回缺失值将要填补的数据值
  return f(missing_val_idx)
# 遍历数据表
# 每列
for i in data.columns[2:]:
  # 遍历每列中的每个单元格
  for j in range(data[i].size):
    # 如果单元格为空
    # 进行拉格朗日插值
    if data[i].isnull()[j]:
      data[i][j] = interpolate_columns(data[i], j)
data


image.png

image.png


方法二:

对于从第一行开始缺失的数据,且从第一行开始连续缺失的数据的个数大于k,无法进行缺失值填补。且后面的缺失值的填补会受到前面无法填补的缺失值的影响(如果向前取值,无法填补的缺失值在取值范围内)。

from cmath import isnan
import numpy as np
import pandas as pd
# 引入构建拉格朗日插值多项式所需的方法
from scipy.interpolate import lagrange
# 文件读取
data = pd.read_excel('./1.xlsx')
# 字符串表示的空值预处理
def fun(x):
  if (x=='—' or x=='NULL' or x=='NA'): return np.nan
  else: return x
data = data.applymap(fun)
# 拉格朗日插值法填补缺失数据
def interpolate_columns(data_col, missing_val_idx, k=2):
  """
  data_col: 需要进行缺失值填补的列
  missing_val_idx: 数据缺失的单元格在该列对应的索引
  k: 缺失值前后取值的个数, 默认为向前向后取2个, 防止出现龙格现象
  return: 返回缺失值的拉格朗日插值
  """
  # 防止取缺失值前后的非缺失值时下标越界
  # 向缺失值前取值的个数,初始值为 k
  f_k = k
  # 如果缺失值前还有的数值个数小于 k
  # 更改取值个数
  if(missing_val_idx < k): 
    f_k = missing_val_idx
  # 向缺失值后取值的个数,初始值为 k
  b_k = k
  # 如果缺失值后还有的数值个数小于 k
  # 更改取值个数
  if((data_col.size-missing_val_idx) < k): 
    b_k = data_col.size-missing_val_idx-1
  # 从缺失值位置开始, 向前取 f_k 个数, 向后取 b_k 个数
  y = data_col[missing_val_idx-f_k : missing_val_idx+b_k+1]
  # print(y)
  # 去除空值
  y = y[ y.notnull() ]
  # 生成拉格朗日插值多项式
  f = lagrange(y.index, list(y))
  # 使用生成的拉格朗日插值多项式计算并返回缺失值将要填补的数据值
  return f(missing_val_idx)
# 遍历数据表
# 按列进行遍历
for i in data.columns[2:]:
  # 遍历每列中的每个单元格
  for j in range(data[i].size):
    # 如果单元格为空
    # 进行拉格朗日插值
    if data[i].isnull()[j]:
      data[i][j] = interpolate_columns(data[i], j)
data


image.png

image.png


采用循环取值的方法,向前向后取非空值,直到数值个数达到指定的个数或循环遍历完数据集。会照成连续缺失的数值的填补值一致。

# 用于保存取出的非缺失值
y = []
# 开始向前取非缺失值的位置
start_idx = missing_val_idx
# 已取非缺失值的个数计数
cnt = 0
while (True):
  # 已取非缺失值的个数达到指定个数
  if (cnt == f_k): break
  # 当前将要取的值的位置
  start_idx -= 1
  # 达到数据集的边界退出
  if (start_idx < 0): break
  # 当前值为空值跳过
  if (isnan(data_col[start_idx])): continue
  y.append(data_col[start_idx])
  cnt += 1
# 保证取出的数据值的相对位置与原来的位置一致
y.reverse()
# 开始向后取非缺失值的位置
start_idx = missing_val_idx
# 已取非缺失值的个数计数
cnt = 0
while (True):
  if (cnt == b_k): break
  start_idx += 1
  if (start_idx >= data_col.size): break
  if (isnan(data_col[start_idx])): continue
  y.append(data_col[start_idx])
  cnt += 1
print(y)
y = pd.Series(y)

image.png

6 插值效果验证

选取部分正常数据(已有给定的未缺失数据)作为测试集,使用已构建的拉格朗日插值多项式对测试集进行插值,结合实际数据,对测试集的插值进行误差检测。选取均方误差(MSE)、均方根误差(RMSE)以及平均绝对百分比误差(MAPE)作为评价指标。

误差越小,插值效果越好。

image.png

7 拉格朗日插值法算法流程图


image.png

image.png

image.png

相关文章
|
5月前
高等数学II-知识点(3)——广义积分、定积分几何应用、定积分求曲线弧长、常微分方程、可分离变量的微分方程、一阶微分方程-齐次方程、一阶线性微分方程
高等数学II-知识点(3)——广义积分、定积分几何应用、定积分求曲线弧长、常微分方程、可分离变量的微分方程、一阶微分方程-齐次方程、一阶线性微分方程
43 0
|
6月前
R语言非线性方程数值分析生物降解、植物生长数据:多项式、渐近回归、米氏方程、逻辑曲线、Gompertz、Weibull曲线(下)
R语言非线性方程数值分析生物降解、植物生长数据:多项式、渐近回归、米氏方程、逻辑曲线、Gompertz、Weibull曲线
|
6月前
|
算法
R语言非线性方程数值分析生物降解、植物生长数据:多项式、渐近回归、米氏方程、逻辑曲线、Gompertz、Weibull曲线(上)
R语言非线性方程数值分析生物降解、植物生长数据:多项式、渐近回归、米氏方程、逻辑曲线、Gompertz、Weibull曲线
|
6月前
|
数据采集
R语言用线性模型进行臭氧预测: 加权泊松回归,普通最小二乘,加权负二项式模型,多重插补缺失值
R语言用线性模型进行臭氧预测: 加权泊松回归,普通最小二乘,加权负二项式模型,多重插补缺失值
|
算法 定位技术
最优化方法(最速下降、牛顿法、高斯牛顿法、LM算法)
最优化方法(最速下降、牛顿法、高斯牛顿法、LM算法)
654 0
最优化方法(最速下降、牛顿法、高斯牛顿法、LM算法)
曲线拟合-最小二乘法
线性最小二乘法及matlab例程
最优化理论(二)拉格朗日乘子法
最优化理论(二)拉格朗日乘子法
177 0