テキスト ファイルに多くのシーケンスがあります。「read.fasta」関数を使用してこれらのシーケンスをインポートします。「for ループ」を使用して各シーケンスのヌクレオチド頻度のテーブルを作成し、「write.table」を使用して出力を取得します。ただし、シーケンスごとにファイルを作成します（多くの出力ファイルと各ファイルにはシーケンスのテーブルがあります）。すべてのテーブルを含むファイルを作成するコマンドを検索します。
注: "mydata.txt" は fasta 形式の多くの配列を含むファイルです
file=read.fasta(file="mydata")
for (i in seq_along(file))
{
NucleotidesFrequency=table(file[[i]])
print(NucleotidesFrequency)
write.table(NucleotidesFrequency, paste(i, (".txt"), sep=""),sep="\t")
}