Skip to content

Commit

Permalink
Spelling corrections
Browse files Browse the repository at this point in the history
  • Loading branch information
brews committed Jul 9, 2019
1 parent 9a69667 commit ec6f0d8
Show file tree
Hide file tree
Showing 3 changed files with 8 additions and 8 deletions.
6 changes: 3 additions & 3 deletions NEWS.md
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ Changes in this minor release:

* Change to `sea` objects, added `event_years`.

* Added function `percent_scarred()` for calculating timeseries of number trees recording, scarred, and the percentage.
* Added function `percent_scarred()` for calculating time series of number trees recording, scarred, and the percentage.

* Update to `sample_depth()` to account for single-series fhx objects

Expand Down Expand Up @@ -69,7 +69,7 @@ Changes in this minor release:

* Added `year_range()` to give (min, max) years for an `fhx` object.

* Updated `composite()` to include a filter for number of events. This necesitates fixes in other functions (e.g. `plot_demograph()`).
* Updated `composite()` to include a filter for number of events. This necessitates fixes in other functions (e.g. `plot_demograph()`).

* Added `summary()` function for fhx and intervals objects.

Expand Down Expand Up @@ -160,7 +160,7 @@ Changes in this patch:

* In `get_ggplot()` the `legend` argument is now `plot_legend` to avoid clash with common functions.

* In `fhx$rings` and all functions, `type` arugment is now `rec_type` to avoid clash with `type` function. `rec_type` is short for "record_type".
* In `fhx$rings` and all functions, `type` argument is now `rec_type` to avoid clash with `type` function. `rec_type` is short for "record_type".

* Can now read FHX files with a single series (closes bug #43).

Expand Down
6 changes: 3 additions & 3 deletions R/sea.R
Original file line number Diff line number Diff line change
Expand Up @@ -34,8 +34,8 @@ run_sea <- function(x, key, years_before=6, years_after=4,
#'
#' @details Superposed epoch analysis (SEA) helps to evaluate fire-climate
#' relationships in studies of tree-ring fire history. It works by compositing the values of
#' an annual timeseries or climate reconstruction for the fire years provided (\code{key}) and both positive and
#' negative lag years. Bootstrap resampling of the timeseries is performed to evaluate the statistical
#' an annual time series or climate reconstruction for the fire years provided (\code{key}) and both positive and
#' negative lag years. Bootstrap resampling of the time series is performed to evaluate the statistical
#' significance of each year's mean value. Users interpret the departure of the actual event year
#' means from the simulated event year means. Note that there is no rescaling of the climate time series 'x'.
#'
Expand Down Expand Up @@ -97,7 +97,7 @@ sea <- function(x, event, nbefore=6, nafter=4, event_range=TRUE, n_iter=1000) {
# set up
rnames <- as.numeric(rownames(x))
if (all(as.character(seq(length(rnames))) == rnames)) {
warning("`x` arg for `sea()` could be missing rownames - be sure that timeseries years are rownames")
warning("`x` arg for `sea()` could be missing rownames - be sure that time series years are rownames")
}
event.cut <- rnames[rnames %in% event]
if (length(event.cut) <= 0) {
Expand Down
4 changes: 2 additions & 2 deletions man/sea.Rd

Some generated files are not rendered by default. Learn more about how customized files appear on GitHub.

0 comments on commit ec6f0d8

Please sign in to comment.