Commit 75334dfe authored by Gorman Sanisaca, Lillian E's avatar Gorman Sanisaca, Lillian E
Browse files

bug fix if no Type 6 DUPS

parent 7bacbf99
......@@ -170,6 +170,8 @@ if (nrow(dup6)!=0){
dmr_remark$dateFromFLOW<-ifelse(!is.na(dmr_remark$date.y),1,0)
dmr_remark<-dmr_remark[,which(!names(dmr_remark) %in% c("Row.x","Row.y","date.y"))]
}else{
DMR<-DMR[,which(!names(DMR) %in% c("Row"))]
}
removeDFs(NA,c("dup6","remark","table","tabletry"))
#make dmr_flow and dmr_flowstat
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment