Not sufficient complete cases for computing neighbors.
library(ggplot2)
library(limma)
library(pheatmap)
library(ggsci)
library(dplyr)
library(DMwR2)
setwd("C:/Users/Administrator/Desktop/AAA")
df=read.table("Dc_original.txt",sep="\t",header=T,check.names=F)
df=as.matrix(df)
rownames(df)=df[,1]
exp=df[,2:ncol(df)]
dimnames=list(rownames(exp),colnames(exp))
df=matrix(as.numeric(as.matrix(exp)),nrow=nrow(exp),dimnames=dimnames)
df=avereps(df)
as.numeric(df)
#df <- log2(df)
len=apply(df,1,function(x)length(which(is.na(x))))
dat_del=df[which(len<ncol(df)*0.8),]
dat_del <- as.data.frame(dat_del)
dat_immupte=knnImputation(dat_del)
运行结果错误：
> dim(dat_del)
[1] 563 117
> dat_immupte=knnImputation(dat_del)
_Error in knnImputation(dat_del) :
Not sufficient complete cases for computing neighbors.
求问怎么解决？