>>1です。
詩趣は違いますがR言語でEYCL1&3周辺の[A,G,T,C]の頻度を表す円グラフと棒グラフで表すコードを
書ける方がおりましたら、お願いします。

可能ならば、カウントを開始する位置にコメントを挿入して、開始位置が解る様にお願い致します。
同様に、終了位置にもコメントを挿入して、終了位置が解るようにお願い致します。