Update R analysis. Add script to calculate FASTA metadata.