Mercurial > repos > deepakjadmin > padel_descriptors_test1
view testpadel/tool3/removeduplecate.R @ 16:cddbcb5467b9 draft
Deleted selected files
author | deepakjadmin |
---|---|
date | Thu, 07 Jan 2016 01:09:32 -0500 |
parents | ed12998b2014 |
children |
line wrap: on
line source
args <- commandArgs(TRUE) res1 <- read.csv(args[1]) #res11 <- duplicated(res1[,1:length(res1) - 1]) res11 <- duplicated(res1[,1]) result <- res1[!res11,] names1 <- result[,1] rownames(result) <- names1 result$Name <- NULL write.csv(result,file=args[2])