俳句プログラミングでC# をするならLINQも使いたいですっ！

Hello～! ミョウガです！

今回はC#とLINQを使って俳句を縦書きで出力してみましたよっ！

1. C#とLINQで俳句を縦書きで出力するプログラム

using System;
using System.Collections.Generic;
using System.Linq;

namespace Haiku {
	class Program {
		static void Main( string[] args ) {

			// 俳句をカンマで分割します。
			// 右辺を args.ToList() にすると、コマンドラインから俳句を入力することになります。
			List<string> hHaiku = "初桜,折しも今日は,よき日なり".Split( ',' ).ToList();

			// 要素数が各句の中で最大の文字数の空文字列リストを作成します。
			List<string> vHaiku = Enumerable.Repeat( "", hHaiku.Max( ( hPhrase ) => hPhrase.Length ) ).ToList();

			// 各句において、文字数がvHaiku.Count()になるように不足分を全角スペースでパディングした文字列を
			// char型配列にばらし、クエリ式でchar型文字をそれぞれ文字列に変換して、string型の文字リストを
			// 生成します。そのリストをZipメソッドでそれぞれの要素において、文字を逆順で結合します。
			hHaiku.ForEach( ( hPhrase ) =>
				vHaiku = vHaiku.Zip(
					from hpChar in hPhrase.PadRight( vHaiku.Count(), '　' ).ToCharArray()
					select hpChar.ToString(),
					( first, second ) => second + first		// ←　ここ重要
				).ToList()
			);

			// 文字列のリストを要素ごとに改行して出力します。
			vHaiku.ForEach( Console.WriteLine );

		}
	}
}

using System;

using System.Collections.Generic;

using System.Linq;

namespace Haiku {

class Program {

static void Main( string[] args ) {

// 俳句をカンマで分割します。

// 右辺を args.ToList() にすると、コマンドラインから俳句を入力することになります。

List<string> hHaiku = "初桜,折しも今日は,よき日なり".Split( ',' ).ToList();

// 要素数が各句の中で最大の文字数の空文字列リストを作成します。

List<string> vHaiku = Enumerable.Repeat( "", hHaiku.Max( ( hPhrase ) => hPhrase.Length ) ).ToList();

// 各句において、文字数がvHaiku.Count()になるように不足分を全角スペースでパディングした文字列を

// char型配列にばらし、クエリ式でchar型文字をそれぞれ文字列に変換して、string型の文字リストを

// 生成します。そのリストをZipメソッドでそれぞれの要素において、文字を逆順で結合します。

hHaiku.ForEach( ( hPhrase ) =>

vHaiku = vHaiku.Zip(

from hpChar in hPhrase.PadRight( vHaiku.Count(), '　' ).ToCharArray()

select hpChar.ToString(),

( first, second ) => second + first // ←　ここ重要

).ToList()

);

// 文字列のリストを要素ごとに改行して出力します。

vHaiku.ForEach( Console.WriteLine );

}

※このプログラムは https://gist.github.com/Myoga1012/f8f57b5239f945af569e 及び https://paiza.io/projects/b36V-DRQhLmPnxi2oNMtKg で公開されています（後者はクエリ式をメソッドに変更しています）。

動作としては、以下の通りです。

俳句の文字列をカンマで分割してList<string>型のリスト（hHaiku）にまとめ、各句の中で最も多い文字数を要素数とする空文字リスト（vHaiku）を別に作成します。
hHaikuの各要素において文字数がvHaikuの要素数になるように、PadRightメソッドを使って不足分を全角スペースでパディングします。それを一旦char型配列に変換し、Enumerable.Selectメソッドを使って1文字1文字をstring型に変換します。
2.で作成したリストとvHaikuをEnumerable.Zipメソッドで、各要素同士を結合してvHaikuに代入します。この時、要素の並びを「2.で作成したリスト」→「vHaiku」の順にします。
最後にvHaikuの各要素において、Console.WriteLineメソッドで出力します。

2.で各句にパディング処理をした理由として、Enumerable.Zipは片方のリストの要素数が少ないと、その要素数分のみ適用されないので、要素数を各句の中で最も多い文字数にそろえるためですよっ！

3.で2つのリスト各要素の並びを逆にして結合することで、4.の出力時に右縦書きになりますっ！

paiza.IO上で実行すると、こんな感じです。LINQって便利だな～♪（某クッキングシートのcm風）

ではでは、See youですよっ♪

月	火	水	木	金	土	日
« 4月
			1	2	3	4
5	6	7	8	9	10	11
12	13	14	15	16	17	18
19	20	21	22	23	24	25
26	27	28	29	30

1. C#とLINQで俳句を縦書きで出力するプログラム

関連記事 :

コメントを残す コメントをキャンセル

コメントを残すコメントをキャンセル