Mercurial > repos > deepakjadmin > toolpadel3
comparison removeduplecate.R @ 0:2928e8312b5f draft
Uploaded
author | deepakjadmin |
---|---|
date | Thu, 14 Jan 2016 07:35:42 -0500 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:2928e8312b5f |
---|---|
1 args <- commandArgs(TRUE) | |
2 | |
3 | |
4 res1 <- read.csv(args[1]) | |
5 #res11 <- duplicated(res1[,1:length(res1) - 1]) | |
6 res11 <- duplicated(res1[,1]) | |
7 result <- res1[!res11,] | |
8 names1 <- result[,1] | |
9 rownames(result) <- names1 | |
10 result$Name <- NULL | |
11 write.csv(result,file=args[2]) |