-
Notifications
You must be signed in to change notification settings - Fork 3
/
README.Rmd
43 lines (34 loc) · 1.22 KB
/
README.Rmd
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
---
output: github_document
editor_options:
chunk_output_type: console
---
<!-- README.md is generated from README.Rmd. Please edit that file -->
```{r, echo = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "README-"
)
```
[![Project Status: Active – The project has reached a stable, usable state and is being actively developed.](https://www.repostatus.org/badges/latest/active.svg)](https://www.repostatus.org/#active)
[![Travis-CI Build Status](https://travis-ci.org/nevrome/wellspell.addin.svg?branch=master)](https://travis-ci.org/nevrome/wellspell.addin) [![Coverage Status](https://img.shields.io/codecov/c/github/nevrome/wellspell.addin/master.svg)](https://codecov.io/github/nevrome/wellspell.addin?branch=master)
# wellspell.addin
![](https://github.com/nevrome/wellspell.addin/raw/master/inst/gif/mastake.gif)
```{r, echo=FALSE, results='asis'}
zz <- textConnection("rd", "w")
tools::Rd2txt("man/wellspell.Rd", zz)
close(zz)
rd <- gsub("\\*", "**", rd)
rd <- gsub("\\'", "`", rd)
rd <- gsub("\\'", "`", rd)
rd <- gsub(" •", " -", rd)
rd <- gsub(" ", "", rd)
purrr::walk(
rd[4:(grep("_\bU_\bs_\ba_\bg_\be:", rd) - 1)],
function(x) {
cat(x)
cat(" \n")
}
)
```