RでFizzBuzz その2

はてなキーワードのFizzBuzzの項目を見たら, もっとスマートな(エレガントな)解法があった.
つまり, 出力する文字列(ループごとにnullにリセット)ってものを作っておき, カウンターが3の倍数ならその文字列に"Fizz"をつけたし, カウンターが5の倍数なら"Buzz"をつけたし, 文字列がnullならカウンターの値を文字列変換して出力する(←ここまで1ループ)というものだった。
歪みねぇな.