Displaying 1 result from an estimated 1 matches for "00060_00003".
2013 Jan 09
4
select partial name and full name columns
...ader = TRUE, separator =
"\t")
{
DVdatatmp <- as.matrix(read.table(file, sep = "\t", fill = TRUE,
comment.char = "#", as.is = TRUE, stringsAsFactors = FALSE, na.strings =
"NA"))
DVdatatmper <- as.matrix(DVdatatmp[ , c("datetime",
grep("^_00060_00003", colnames(DVdatatmp)))])
retval <- as.data.frame(DVdatatmper, colClasses = c("character"), fill =
TRUE, comment.char = "#", stringsAsFactors = FALSE)
if (ncol(retval) == 2) {
names(retval) <- c("dateTime", "value")
}
else if (ncol(retval) == 3) {...