난처한 오류가 발생했습니다. 내가 예를 들면 재현 예는,R 적용 오류 - as.matrix.data.frame()의 오류
##### removes NA'd rows from a dataFrame
wipeNArows<-function(X){
rowsToDelete<-unique(unlist(apply(apply(X,2,is.na),2,which)))
if (length(rowsToDelete)>0){
return (X[-rowsToDelete,])
}
else{
return (X)
}
}
이 기능은 일반적으로 잘 동작 모든 열에서 NA 관찰 함유 dataframe 행을 삭제 다음 함수를 사용하고 :
testFrame<-data.frame(x=rpois(20,10),y=rpois(20,10),z=rpois(20,10))
rowsToDelete<-sample(1:nrow(testFrame),5,FALSE)
testFrame$x[rowsToDelete]<-NA
testFrame
wipeNArows(testFrame) ### removes the rows where NA is encountered
지금 가지고 약 2993 개의 행을 포함하는 데이터 프레임 나는 내가 다음과 같은 오류에 직면 기능을 통해 데이터 프레임을 전달하는 경우 : 나를 위해 응답을
Error in apply(apply(X, 2, is.na), 2, which) :
error in evaluating the argument 'X' in selecting a method for function 'apply': Error in as.matrix.data.frame(X) :
dims [product 14965] do not match the length of object [14974]
감사합니다,
* * * 대신 * 작동하지 않는 예제를 제공 할 수 있습니까? – A5C1D2H2I1M1N2O1R2T1
함수 시작 부분에'browser()'를 삽입하는 것이 좋습니다. 그렇게하면 코드를 단계별로 실행하여 각 요소를 검사하고 버그를 찾아 낼 수 있습니다. –