diff options
author | Suraj Yerramilli | 2015-04-01 22:46:45 +0530 |
---|---|---|
committer | Suraj Yerramilli | 2015-04-01 22:46:45 +0530 |
commit | 43cdf2a49efab8a9f1ad1234a9a1d346e852d847 (patch) | |
tree | e0296d67fee8ee38252b20eab7032e939a4ffc95 /R/readData.R | |
parent | 05eddf7b3f3ce6af739e56ea484aa1a3846860b1 (diff) | |
download | SysID-R-code-43cdf2a49efab8a9f1ad1234a9a1d346e852d847.tar.gz SysID-R-code-43cdf2a49efab8a9f1ad1234a9a1d346e852d847.tar.bz2 SysID-R-code-43cdf2a49efab8a9f1ad1234a9a1d346e852d847.zip |
fixed the column type bug
Diffstat (limited to 'R/readData.R')
-rw-r--r-- | R/readData.R | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/R/readData.R b/R/readData.R index 149ae46..eac03a5 100644 --- a/R/readData.R +++ b/R/readData.R @@ -148,6 +148,8 @@ read.xls.idframe <- function(file,sheetName,header=TRUE,ninputs=1, # Read from file into an R data.frame dat <- read.xlsx2(file=file,sheetName=sheetName,header=header,...) + l <- as.list(dat) + dat <- as.data.frame(l,as.numeric) # read from dataframe and return idframe object out <- read.idframe(dat,ninputs=ninputs,type=type,Ts = Ts, |