diff --git a/DESCRIPTION b/DESCRIPTION index 62e5a85..3d83566 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,8 +1,8 @@ Package: biwavelet Type: Package Title: Conduct Univariate and Bivariate Wavelet Analyses -Version: 0.20.13 -Date: 2016-12-27 +Version: 0.20.14 +Date: 2017-02-24 Author: Tarik C. Gouhier, Aslak Grinsted, Viliam Simko Maintainer: Tarik C. Gouhier Description: This is a port of the WTC MATLAB package written by Aslak Grinsted diff --git a/R/plot.biwavelet.R b/R/plot.biwavelet.R index 0a4b508..ac63b80 100644 --- a/R/plot.biwavelet.R +++ b/R/plot.biwavelet.R @@ -238,9 +238,12 @@ plot.biwavelet <- function(x, ncol = 64, fill.cols = NULL, # COI if (plot.coi) { + # polygon(x = c(x$t, rev(x$t)), lty = lty.coi, lwd = lwd.coi, + # y = c(log2(x$coi), + # rep(max(log2(x$coi), na.rm = TRUE), length(x$coi))), + # col = adjustcolor(col.coi, alpha.f = alpha.coi), border = col.coi) polygon(x = c(x$t, rev(x$t)), lty = lty.coi, lwd = lwd.coi, - y = c(log2(x$coi), - rep(max(log2(x$coi), na.rm = TRUE), length(x$coi))), + y = c(log2(x$coi), rep(max(c(log2(x$coi), x$period), na.rm = TRUE), length(x$coi))), col = adjustcolor(col.coi, alpha.f = alpha.coi), border = col.coi) } diff --git a/inst/NEWS.Rd b/inst/NEWS.Rd index 45a504e..32948c5 100644 --- a/inst/NEWS.Rd +++ b/inst/NEWS.Rd @@ -2,6 +2,16 @@ \title{News for Package 'biwavelet'} \encoding{UTF-8} + +\section{Changes in biwavelet version 0.20.14 (2017-02-24)}{ + \subsection{fixed}{ + \itemize{ + \item Fixed \code{plot.biwavelet} so that the COI extends all + the way to the bottom of the plot (max of periods) + } + } +} + \section{Changes in biwavelet version 0.20.13 (2016-12-27)}{ \subsection{fixed}{ \itemize{