波形っぽい画像をつくる

新しい研究室のホームページのトップにいれる絵を考えて、研究室らしいということでシークエンスデータをいれてみようと考えました。
適当な実験データをもってこようかとしたのですが、思うようなものがなく、人工的につくってみることにしました。
遺伝子のエキソン、イントロン構造をRを使って書く方法です。