desc <- suppressWarnings(readLines("DESCRIPTION"))
regex <- "(^Version:\\s+)(\\d+\\.\\d+\\.\\d+)"
loc <- grep(regex, desc)
ver <- gsub(regex, "\\2", desc[loc])
verbadge <- sprintf('<a href="https://img.shields.io/badge/Version-%s-orange.svg"><img src="https://img.shields.io/badge/Version-%s-orange.svg" alt="Version"/></a></p>', ver, ver)
````

[![Project Status: Active - The project has reached a stable, usable state and is being actively developed.](http://www.repostatus.org/badges/0.1.0/active.svg)](http://www.repostatus.org/#active)
[![Build Status](https://travis-ci.org/trinker/textreport.svg?branch=master)](https://travis-ci.org/trinker/textreport)
[![Coverage Status](https://coveralls.io/repos/trinker/textreport/badge.svg?branch=master)](https://coveralls.io/r/trinker/textreport?branch=master)
`r verbadge`

<img src="inst/textreport_logo/r_textreport.png" width="120" alt="textreport Logo">  


**textreport** automatically generates visual, descriptive reports for text data.  

The following code generated [this](https://dl.dropboxusercontent.com/u/61803503/textreport.html) visual, descriptive report.

```r
textreport::report(presidential_debates_2012, c("person", "time"))

textreport can also produce a text based, table report instead by using:

textreport::report(presidential_debates_2012, c("person", "time"), tables.only = TRUE)

Installation

To download the development version of textreport:

Download the zip ball or tar ball, decompress and run R CMD INSTALL on it, or use the pacman package to install the development version:

if (!require("pacman")) install.packages("pacman")
pacman::p_load_gh("trinker/textreport")

Contact

You are welcome to: submit suggestions and bug-reports at: https://github.com/trinker/textreport/issues send a pull request on: https://github.com/trinker/textreport/ * compose a friendly e-mail to: tyler.rinker@gmail.com



trinker/textreport documentation built on June 1, 2019, 1:47 a.m.