Displaying 1 result from an estimated 1 matches for "131c124".
Did you mean:
131124
2004 Jul 28
1
read.table() and NULL for colClasses
...< void <- sapply(colClasses, FUN=identical, "NULL") |
< sapply(colClasses, FUN=is.null)
< # If all (data) columns are NULL, return empty data frame.
< if (sum(!void) <= 1*rlabp)
< return(data.frame())
< what[void] <- list(NULL)
131c124
< nlines <- length(data[[which(!void)[1]]])
---
> nlines <- length(data[[1]])
161c154
< for (i in (1:cols)[!known & !void]) {
---
> for (i in 1:cols) {
171,178d163
< # Skipped row names equals row.names=NULL.
< if (rlabp) {
< if (void[1])...