PrintOGSeqs: Print OG Sequences
In MAGNAMWAR: A Pipeline for Meta-Genome Wide Association

Description Usage Arguments Value Examples

Print all protein sequences and annotations in a given OG

1	PrintOGSeqs(after_ortho, OG, fasta_dir, out_dir = NULL, outfile = "none")

`after_ortho`	output from FormatAfterOrtho
`OG`	name of OG
`fasta_dir`	directory to fastas
`out_dir`	complete path to output directory
`outfile`	name of file that will be written to

A fasta file with all protein sequences and ids for a given OG

## Not run: 
OG <- 'OG5_126968'
dir <- system.file('extdata', 'fasta_dir', package='MAGNAMWAR')
dir <- paste(dir,'/',sep='')

PrintOGSeqs(after_ortho_format, OG, dir)

## End(Not run)