おじさんブログ：SSブログ

	ブログをはじめるログイン

2013年11月｜ 2013年12月｜2014年01月ブログトップ
前の10件 | 次の10件

1次、2次元配列のマージソート方法　 [VB]

マージソート

クイックソートよりかなり優れたソート方法です。元のデータの並び方が悪いと、クイックソートの効率はバブルソート並みに悪化します。マージソートはそのようなことが無いので効率よくソートを行うことのできるアルゴリズムです。

大まかな名がとしては以下の手順となります。

全体を2分割
それぞれをさらに2分割
全てのブロックが1になるまで繰り返す
分割完了したら、隣同士のブロックを整列しながら併合
さらに隣同士をマージ
全体が1つになるまで繰り返す

配列のソートアルゴリズムに関しては、いろいろな場所で紹介されている。ただし1次元配列の場合がほとんどで、2次元配列の場合のサンプルコードは見つけられなかった。

そこで1次および2次元配列のマージソートソフトを作成したので、ここに残しておく。

1次元配列のマージソート

2次元配列のマージソート

注意：元となる２次元配列ar(x, y)のyの要素数はソートするデータ要素数に+1しておくこと

ソースコード

2013-12-12 00:33 nice!(0) コメント(0) トラックバック(0)

WrapAffine 密なアフィン変換概要　 [OpenCV]

入力と種強くフォーアットは画像で、ワープ処理は、これらの画像hピクセルが隙間なく密に詰まっていることを仮定している。これは出力画像が滑らかかつ自然に見えるようにするための補間処理を行うこと。

◆画像処理効果

処理前

処理後

サイズ変更(0.7)

角度変更(-45°) ＆ボーダーモード変更

BORDER_CONSTANT

BORDER_REPLICATE

BORDER_REFLECT

BORDER_WRAP

以下に制作したWrapAffineクラスのソースを示す。

WrapAffine.h

WrapAffine.cpp

ソースコード

参考サイト

http://opencv.jp/opencv-2svn/cpp/geometric_image_transformations.html#cv-warpaffine

2013-12-11 00:10 nice!(0) コメント(0) トラックバック(0)

VBオブジェットのnull判定　 [VB]

C/C++のつもりで以下のコードを書いたがコンパイルできない。

dim obj as ArrayList

If obj = Nothing Then

Return

End If

いろいろ調べた結果、以下の書式で書くとOKとなることが判明。。。

If obj Is Nothing Then

Return

End If

ちょっとしたことだけど、この程度の違いは言語側で吸収してほしいものだ。何かしら理由があるのでしょうけどね！

2013-12-10 00:23 nice!(0) コメント(0) トラックバック(0)

CSVファイルを読込みArrayListに保存する　 [VB]

ArrayListを利用することで、列数の定まっていないファイルの読み込みが可能となる。このソースコードでは列の区切りを “,”固定となっているが、Split(strLine, ",")を書き換えることでスペースやタブ区切りに変更することは容易である。先に区切り文字を判別する方法もあるが、今回は対応しない。

関数呼び出し側とエラー処理