diff options
| author | Suraj Yerramilli | 2015-06-03 13:30:15 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2015-06-03 13:30:15 +0530 |
| commit | e729a99049105bf72b79c6d07493fc83146bf84d (patch) | |
| tree | f53f138a8110e1dbc4941256f9ec6e82e7cc9ea7 /R | |
| parent | 1f707ee4da5e7a8c589e65b73d4f6d624f6d0b06 (diff) | |
| download | SysID-R-code-e729a99049105bf72b79c6d07493fc83146bf84d.tar.gz SysID-R-code-e729a99049105bf72b79c6d07493fc83146bf84d.tar.bz2 SysID-R-code-e729a99049105bf72b79c6d07493fc83146bf84d.zip | |
Correction in NULL checking condition
Diffstat (limited to 'R')
| -rw-r--r-- | R/nonparam.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/nonparam.R b/R/nonparam.R index c9a081e..81ca580 100644 --- a/R/nonparam.R +++ b/R/nonparam.R @@ -100,7 +100,7 @@ spa <- function(data,WinSize=NULL){ # Non-parametric Estimation of Spectral Densities - # WOSA and Hanning window - if(WinSize==NULL){ + if(is.null(WinSize)){ M <- min(dim(temp,1),30) } else{ M <- WinSize |