The first and most commonly used example demonstrating the value of the BrailleR package to a blind user is the creation of a histogram.

```
=rnorm(1000)
xVI(hist(x))
```

```
This is a histogram, with the title: Histogram of x
"x" is marked on the x-axis.
Tick marks for the x-axis are at: -3, -2, -1, 0, 1, 2, and 3
There are a total of 1000 elements for this variable.
Tick marks for the y-axis are at: 0, 50, 100, 150, and 200
It has 13 bins with equal widths, starting at -3 and ending at 3.5 .
The mids and counts for the bins are:
mid = -2.75 count = 6
mid = -2.25 count = 19
mid = -1.75 count = 38
mid = -1.25 count = 103
mid = -0.75 count = 148
mid = -0.25 count = 198
mid = 0.25 count = 190
mid = 0.75 count = 148
mid = 1.25 count = 79
mid = 1.75 count = 51
mid = 2.25 count = 14
mid = 2.75 count = 5
mid = 3.25 count = 1
```

The VI() command actually calls the VI.histogram() command as the hist() command creates an object of class “histogram”.

The VI() command has added to the impact of issuing the hist() command as the actual graphic is generated for the sighted audience. The blind student can read from the text description so that they can interpret the information that the histogram offers the sighted world.

The above example showed the standard implementation of the hist() function. The hist() function of the graphics package does not store the additional arguments that improve the visual attractiveness. The solution (perhaps temporary) is to mask the original function with one included in the BrailleR package that calls the graphics package function, and then adds extra detail for any added plotting arguments.

This is best illustrated using the example included in the BrailleR::hist() function.

`example(hist)`

```
hist> x=rnorm(1000)
hist> # the stamdard hist function returns
hist> MyHist=graphics::hist(x, xlab="random normal values", main="Example histogram (graphics package)")
```

```
hist> MyHist
$breaks
[1] -3.5 -3.0 -2.5 -2.0 -1.5 -1.0 -0.5 0.0 0.5 1.0 1.5 2.0 2.5 3.0 3.5
$counts
[1] 1 7 19 47 91 132 208 206 147 73 51 13 3 2
$density
[1] 0.002 0.014 0.038 0.094 0.182 0.264 0.416 0.412 0.294 0.146 0.102 0.026
[13] 0.006 0.004
$mids
[1] -3.25 -2.75 -2.25 -1.75 -1.25 -0.75 -0.25 0.25 0.75 1.25 1.75 2.25
[13] 2.75 3.25
$xname
[1] "x"
$equidist
[1] TRUE
attr(,"class")
[1] "histogram"
hist> # while this version returns
hist> MyHist=hist(x, xlab="random normal values", main="Example histogram (BrailleR package)")
```

```
hist> MyHist
$breaks
[1] -3.5 -3.0 -2.5 -2.0 -1.5 -1.0 -0.5 0.0 0.5 1.0 1.5 2.0 2.5 3.0 3.5
$counts
[1] 1 7 19 47 91 132 208 206 147 73 51 13 3 2
$density
[1] 0.002 0.014 0.038 0.094 0.182 0.264 0.416 0.412 0.294 0.146 0.102 0.026
[13] 0.006 0.004
$mids
[1] -3.25 -2.75 -2.25 -1.75 -1.25 -0.75 -0.25 0.25 0.75 1.25 1.75 2.25
[13] 2.75 3.25
$xname
[1] "x"
$equidist
[1] TRUE
$main
[1] "Example histogram (BrailleR package)"
$xlab
[1] "random normal values"
$ExtraArgs
$ExtraArgs$main
[1] "Histogram of x"
$ExtraArgs$xlab
[1] "x"
$ExtraArgs$ylab
[1] "Frequency"
$ExtraArgs$sub
[1] ""
$NBars
[1] 14
$par
$par$xaxp
[1] -3 3 6
$par$yaxp
[1] 0 200 4
$xTicks
[1] -3 -2 -1 0 1 2 3
$yTicks
[1] 0 50 100 150 200
attr(,"class")
[1] "Augmented" "histogram"
hist> # The VI() method then uses the extra information stored
hist> VI(MyHist)
This is a histogram, with the title: Histogram of x
"x" is marked on the x-axis.
Tick marks for the x-axis are at: -3, -2, -1, 0, 1, 2, and 3
There are a total of 1000 elements for this variable.
Tick marks for the y-axis are at: 0, 50, 100, 150, and 200
It has 14 bins with equal widths, starting at -3.5 and ending at 3.5 .
The mids and counts for the bins are:
mid = -3.25 count = 1
mid = -2.75 count = 7
mid = -2.25 count = 19
mid = -1.75 count = 47
mid = -1.25 count = 91
mid = -0.75 count = 132
mid = -0.25 count = 208
mid = 0.25 count = 206
mid = 0.75 count = 147
mid = 1.25 count = 73
mid = 1.75 count = 51
mid = 2.25 count = 13
mid = 2.75 count = 3
mid = 3.25 count = 2
```

The VI() function is partially reliant on the use of the hist() function that is included in the BrailleR package. If a histogram is created using a command that directly links to the original hist() command found in the graphics package, then the VI() command’s output will not be as useful to the blind user. This mainly affects the presentation of the title and axis labels; it should not affect the details of the counts etc. within the histogram itself.

This behaviour could arise if the histogram is sought indirectly. If for example, a function offers (as a side effect) to create a histogram, the author of the function may have explicitly stated use of the hist() function from the graphics package using graphics::hist() instead of hist(). Use of graphics::hist() will bypass the BrailleR::hist() function that the VI() command needs. This should not create error messages.