Testing ‘access_rmd()’ output

Testing ‘access_rmd()’ output

Accessibility checks for output created with the ‘access_rmd() function’

Rich Leyshon

03 Dec 2021

Adapted R Markdown

This R Markdown template has been adapted using the ‘accessrmd’ package. This template has a different header and HTML structure to the standard R markdown template. This is to improve the accessibility of the knitted HTML documents for screen readers.

For more help in using R Markdown see (R Studio’s Rmarkdown guidance)[http://rmarkdown.rstudio.com].

Clicking the Knit button will generate a document including typed content and the output of any R code chunks. For example:

summary(cars)
     speed           dist       
 Min.   : 4.0   Min.   :  2.00  
 1st Qu.:12.0   1st Qu.: 26.00  
 Median :15.0   Median : 36.00  
 Mean   :15.4   Mean   : 42.98  
 3rd Qu.:19.0   3rd Qu.: 56.00  
 Max.   :25.0   Max.   :120.00  

Plots

Vapor Pressure of Mercury as a Function of Temperature

In the above chunk, echo=FALSE was used to hide the R code that produced the plot from the knitted HTML document. message=FALSE was also used to stop messages being knitted to the HTML output.

A tabset to test

Section 1

Sample text. Testing bold.

Section 2

More Sample text

x <- as.data.frame(rnorm(300))
plt <- ggplot(x, aes(x[, 1])) + geom_density()
access_img(
  plt,
  alt = "Density plot of a sample taken from a normal distribution",
  ht = 500)
img derived from inline R code.
Saving 6.67 x 6.67 in image

Density plot of a sample taken from a normal distribution

Section 3

Yet more sample text

# some code comments to check
vec <- c(runif(100))
# Some output to check
summary(vec)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
0.02629 0.30154 0.57140 0.53833 0.79368 0.99099 

The next header cancels the tabset

There doesn’t appear to be an accordion feature native to Rmarkdown.