Skip to content

Instantly share code, notes, and snippets.

@mutolisp
Created August 8, 2018 05:07
Show Gist options
  • Save mutolisp/c7afd8ca830f6804456dc6a24abf36dd to your computer and use it in GitHub Desktop.
Save mutolisp/c7afd8ca830f6804456dc6a24abf36dd to your computer and use it in GitHub Desktop.
mothur wrapper example
mothurDir <- '~/Downloads/mothur/'
fastaFile <- './1060501B_cut3_without_N.fas'
phylipFile <- paste(strsplit(fastaFile, '.fas')[1], '.phylip.dist', sep='')
listFile <- paste(strsplit(fastaFile, '.fas')[1], '.phylip.fn.list', sep='')
mothur(mothurDir, subfunc='dist.seqs',
fasta=fastaFile, calc='onegap', cutoff=0.03, countends=F, output='lt')
mothur(mothurDir, subfunc='cluster',
phylip=phylipFile,
method='furthest',cutoff=0.03)
mothur(mothurDir, subfunc='bin.seqs',
list=listFile, fasta=fastaFile)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment