Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/hendersontrent/rcatch22
R package for calculation of 22 CAnonical Time-series CHaracteristics
https://github.com/hendersontrent/rcatch22
machine-learning r time-series
Last synced: 28 days ago
JSON representation
R package for calculation of 22 CAnonical Time-series CHaracteristics
- Host: GitHub
- URL: https://github.com/hendersontrent/rcatch22
- Owner: hendersontrent
- Created: 2021-04-01T00:49:47.000Z (over 3 years ago)
- Default Branch: main
- Last Pushed: 2024-10-03T00:20:54.000Z (about 1 month ago)
- Last Synced: 2024-10-10T18:40:14.927Z (28 days ago)
- Topics: machine-learning, r, time-series
- Language: C
- Homepage:
- Size: 5.12 MB
- Stars: 22
- Watchers: 1
- Forks: 8
- Open Issues: 0
-
Metadata Files:
- Readme: README.Rmd
Awesome Lists containing this project
README
---
output: rmarkdown::github_document
---
# Rcatch22 
[](https://www.r-pkg.org/pkg/Rcatch22)
[](https://www.r-pkg.org/pkg/Rcatch22)
[](https://zenodo.org/badge/latestdoi/353530083)
R package for the calculation of [22 CAnonical Time-series CHaracteristics](https://github.com/DynamicsAndNeuralSystems/catch22). The package is an efficient implementation that calculates time-series features coded in C.
```{r, include = FALSE}
knitr::opts_chunk$set(
comment = NA, fig.width = 7, fig.height = 5, cache = FALSE)
```
## Installation
You can install the stable version of `Rcatch22` from CRAN using the following:
```{r eval = FALSE}
install.packages("Rcatch22")
```
You can install the development version of `Rcatch22` from GitHub using the following:
```{r eval = FALSE}
devtools::install_github("hendersontrent/Rcatch22")
```
You might also be interested in a related R package called [`theft`](https://github.com/hendersontrent/theft) (Tools for Handling Extraction of Features from Time series) which provides standardised access to `Rcatch22` and 5 other feature sets (including 3 feature sets from Python libraries) for a total of ~1,200 features. `theft` also includes extensive functionality for processing and analysing time-series features, including automatic time-series classification, top performing feature identification, and a range of statistical data visualisations.
## Wiki
Please open the included vignette within an R environment or visit the detailed [`Rcatch22` Wiki](https://time-series-features.gitbook.io/catch22/r) for information and tutorials.
## Computational performance
With features coded in C, `Rcatch22` is highly computationally efficient, scaling nearly linearly with time-series size. Computation time in seconds for a range of time series lengths is presented below.
```{r, message = FALSE, warning = FALSE, echo = FALSE}
library(dplyr)
library(purrr)
library(ggplot2)
library(microbenchmark)
library(Rcatch22)
set.seed(123)
lengths <- c(10^1, 10^2, 10^3, 10^4, 10^5)
generate_sims <- function(n){
tmp <- c(cumsum(rnorm(n, mean = 0, sd = 1)))
sim <- as.data.frame(summary(microbenchmark(catch22_all(tmp), times = 10, unit = "s"))) %>%
dplyr::select(c(mean)) %>%
mutate(ts_length = n)
return(sim)
}
sims <- lengths %>%
purrr::map_df(~ generate_sims(n = .x))
```
```{r, message = FALSE, warning = FALSE, echo = FALSE, fig.keep = TRUE}
# Draw graphic
sims %>%
ggplot() +
geom_smooth(aes(x = ts_length, y = mean), formula = y ~ x, method = "lm",
se = FALSE, size = 1.15, colour = "#1f78b4") +
geom_point(aes(x = ts_length, y = mean), size = 3.5, colour = "#1f78b4") +
labs(x = "Time series length",
y = "Computation time (s)") +
scale_x_log10(limits = c(1e1, 1e5),
breaks = scales::trans_breaks("log10", function(x) 10^x),
labels = scales::trans_format("log10", scales::math_format(10^.x))) +
scale_y_log10(breaks = scales::trans_breaks("log10", function(x) 10^x),
labels = scales::trans_format("log10", scales::math_format(10^.x))) +
theme_bw() +
theme(panel.grid.minor = element_blank(),
legend.position = "bottom",
axis.text = element_text(size = 12))
```
## catch24
An option to include the mean and standard deviation as features in addition to `catch22` is available through setting the `catch24` argument to `TRUE`:
```{r, eval = FALSE}
features <- catch22_all(x, catch24 = TRUE)
```
## Citation
A DOI is provided at the top of this README. Alternatively, the package can be cited using the following:
```{r, echo = FALSE}
citation("Rcatch22")
```
Please also cite the original *catch22* paper:
* [Lubba et al. (2019). catch22: CAnonical Time-series CHaracteristics.](https://link.springer.com/article/10.1007/s10618-019-00647-x/)