diff dfhlp.R @ 6:b8f70d8216b3 draft

planemo upload for repository https://github.com/workflow4metabolomics/lcmsmatching.git commit b3a4e34cf9356447ae3507cc6fe2ff6a1f24afbc-dirty
author prog
date Mon, 27 Mar 2017 06:27:29 -0400
parents 3afe41d3e9e7
children
line wrap: on
line diff
--- a/dfhlp.R	Thu Mar 16 08:15:11 2017 -0400
+++ b/dfhlp.R	Mon Mar 27 06:27:29 2017 -0400
@@ -44,21 +44,6 @@
 		df[c(not.cols, cols)]
 	}
 
-	##############
-	# READ TABLE #
-	##############
-
-	df.read.table <- function(file, sep = "", header = TRUE, remove.na.rows = TRUE, check.names = TRUE, stringsAsFactors = TRUE, trim.header = FALSE, trim.values = FALSE, fileEncoding = "") {
-
-		# Call built-in read.table()
-		df <- read.table(file, sep = sep, header = header, check.names = check.names, stringsAsFactors = stringsAsFactors, fileEncoding = fileEncoding)
-
-		# Clean data frame
-		df <- df.clean(df, trim.colnames = trim.header, trim.values = trim.values, remove.na.rows = remove.na.rows)
-
-		return(df)
-	}
-
 	#################
 	# READ CSV FILE #
 	#################