你好，有一系列缺失值，想用缺失值最邻近的上面的那个数值和下面那个数值来填充这一系列缺失值，应该怎么处理？

如  数据类似
x  y
1  9
2  9
3  10
4  NA
5  NA
6  12
7  11
8  8
9  NA
10 NA
11 6

填充后想变成
  y
1  9
2  9
3  10
4  11
5  11
6  12
7  11
8  8
9  7
10 7
11 6

用了KNN插值处理，可能因为实际数据缺失值较大所以出现报错
类似，
data_new<-knnImputation(data, k =2,meth='mean', distData = NULL)
报错
Error in knnImputation(data_heartrate, k = 2, meth = "mean", distData = NULL) :
  Not sufficient complete cases for computing neighbors.
In addition: Warning message:
In knnImputation(data_heartrate, k = 2, meth = "mean", distData = NULL) :
  NAs introduced by coercion
这个代码在缺失值较少的时候试过没有问题。请各位大佬建议解决，感谢帮助！