Skip to content

Commit

Permalink
Add DOI badge
Browse files Browse the repository at this point in the history
  • Loading branch information
villegar committed Jul 8, 2021
1 parent 5abd19e commit b57a5e7
Show file tree
Hide file tree
Showing 2 changed files with 11 additions and 26 deletions.
17 changes: 9 additions & 8 deletions README.Rmd
Original file line number Diff line number Diff line change
@@ -1,15 +1,15 @@
---
output:
pdf_document:
extra_dependencies: ["float"]
github_document:
pandoc_args: --webtex
# --webtex=https://latex.codecogs.com/png.latex?%5Cdpi{150}
pdf_document:
extra_dependencies: ["float"]
header-includes:
- \usepackage[default]{sourcesanspro}
- \usepackage[T1]{fontenc}
bibliography: inst/references/references.bib
cls: inst/references/proceedings-of-the-royal-society-a.csl
bibliography: documentation/codos/inst/references/references.bib
cls: documentation/codos/inst/references/proceedings-of-the-royal-society-a.csl
---
<!-- README.md is generated from README.Rmd. Please edit that file -->

Expand All @@ -25,12 +25,13 @@ knitr::opts_chunk$set(
```

# CO<sub>dos</sub>: CO<sub>2</sub> Correction Tools
<!-- <img src="inst/images/logo.png" alt="logo" align="right" height=200px/> -->
<!-- <img src="documentation/codos/inst/images/logo.png" alt="logo" align="right" height=200px/> -->

<!-- badges: start -->
`r if(!knitr::is_latex_output()) badger::badge_devel("special-uor/codos", "yellow")`
`r if(!knitr::is_latex_output()) badger::badge_cran_release("codos", "black")`
`r if(!knitr::is_latex_output()) badger::badge_github_actions("special-uor/codos")`
`r if(!knitr::is_latex_output()) badger::badge_doi("10.5281/zenodo.5083309", "blue")`
<!-- badges: end -->

## Installation
Expand Down Expand Up @@ -226,8 +227,8 @@ exp_mod <- nls(vpd ~ a * exp(kTmp * Tmp - kMI * MI),
```

Summary statistics:
```{r, echo = FALSE}
df <- read.csv("inst/extdata/df.csv")
```{r, echo = FALSE, eval = FALSE}
df <- read.csv("documentation/codos/inst/extdata/df.csv")
# Linear approximation
lmod <- lm(log(vpd) ~ Tmp + MI, data = df)
# Non-linear model
Expand All @@ -239,7 +240,7 @@ exp_mod <- nls(vpd ~ a * exp(kTmp * Tmp - kMI * MI),
control = list(maxiter = 200))
```

```{r}
```{r, eval = FALSE}
summary(exp_mod)
coefficients(exp_mod)
```
Expand Down
20 changes: 2 additions & 18 deletions README.md
Original file line number Diff line number Diff line change
Expand Up @@ -7,14 +7,15 @@

# CO<sub>dos</sub>: CO<sub>2</sub> Correction Tools

<!-- <img src="inst/images/logo.png" alt="logo" align="right" height=200px/> -->
<!-- <img src="documentation/codos/inst/images/logo.png" alt="logo" align="right" height=200px/> -->

<!-- badges: start -->

[![](https://img.shields.io/badge/devel%20version-0.0.1-yellow.svg)](https://github.com/special-uor/codos)
[![](https://www.r-pkg.org/badges/version/codos?color=black)](https://cran.r-project.org/package=codos)
[![R build
status](https://github.com/special-uor/codos/workflows/R-CMD-check/badge.svg)](https://github.com/special-uor/codos/actions)
[![](https://img.shields.io/badge/doi-10.5281/zenodo.5083309-blue.svg)](https://doi.org/10.5281/zenodo.5083309)
<!-- badges: end -->

## Installation
Expand Down Expand Up @@ -250,24 +251,7 @@ Summary statistics:

``` r
summary(exp_mod)
#>
#> Formula: vpd ~ a * exp(kTmp * Tmp - kMI * MI)
#>
#> Parameters:
#> Estimate Std. Error t value Pr(>|t|)
#> a 4.589148 0.019843 231.3 <2e-16 ***
#> kTmp 0.061108 0.000174 351.2 <2e-16 ***
#> kMI 0.870229 0.002585 336.7 <2e-16 ***
#> ---
#> Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
#>
#> Residual standard error: 2.241 on 60291 degrees of freedom
#>
#> Number of iterations to convergence: 8
#> Achieved convergence tolerance: 7.419e-06
coefficients(exp_mod)
#> a kTmp kMI
#> 4.58914835 0.06110768 0.87022950
```

### Corrected `mi` from reconstructed `mi`
Expand Down

0 comments on commit b57a5e7

Please sign in to comment.