seeBarcode: Create illustrative barcodes

Description Usage Arguments Details Value Author(s) Examples

View source: R/seeBarcode.R

Description

This function plots an illustrative barcode consisting of vertical bands in four colours corresponding to the DNA bases adenine (A), cytosine (C), guanine (G) and thiamine (T).

Usage

1
seeBarcode(seq, col = c("green", "blue", "black", "red"))

Arguments

seq

A single sequence of class ‘DNAbin’.

col

A character vector of length 4 giving colours to represent A, G, C and T respectively.

Details

Green, blue, black and red are the standard colours representing A, G, C and T respectively.

Value

Plots an illustrative barcode.

Author(s)

Samuel Brown <s_d_j_brown@hotmail.com>

Examples

1
2
3
4
5
6
7
graphics::layout(matrix(1:6, ncol=1))
graphics::par(mar=c(0.5, 0, 0.5, 0))
data(woodmouse)
seeBarcode(woodmouse[1,])
seeBarcode(woodmouse[1,], col=c("pink", "orange", "steelblue", "yellow"))
seeBarcode(woodmouse[1,], col=c("black", "white", "white", "black"))
apply(woodmouse[1:3,], MARGIN=1, FUN=seeBarcode)

boopsboops/spider documentation built on May 6, 2019, 8:49 a.m.