| commit | 6290fdd1d8c316159110bafcbf31bc8f711eb3d1 | [log] [tgz] |
|---|---|---|
| author | Hao Zhu <haozhu233@gmail.com> | Tue Oct 24 00:10:32 2017 -0400 |
| committer | Hao Zhu <haozhu233@gmail.com> | Tue Oct 24 00:10:32 2017 -0400 |
| tree | 6d42f692a15da4a50b473c0c27ea86db61e522ed | |
| parent | 0a7f47c466c3895542f6cdbae438ab42a450216b [diff] [blame] |
fix checks & update vignette
diff --git a/R/spec_tools.R b/R/spec_tools.R index bd27df4..f62f9e3 100644 --- a/R/spec_tools.R +++ b/R/spec_tools.R
@@ -58,8 +58,8 @@ #' @param begin Smallest degree to rotate. Default is 0 #' @param end Largest degree to rotate. Default is 359. #' @export -spec_angle <- function(x) { - x <- round(rescale(x, c(0, 359))) +spec_angle <- function(x, begin, end) { + x <- round(rescale(x, c(begin, end))) x[is.na(x)] <- 0 return(x) }