(use gauche.uvector) (define vct (list->vector '("abc" "def" ("hello" 123))) ) (print (vector? vct)) ;;=> #t (print vct) ;;=> #(abc def (hello 123)) (print (vector-ref vct 0)) ;;=> abc (print (vector-ref vct 2)) ;;=> (hello 123) (define vc…

「はてなブックマーク - 人生を書き換える者すらいた。: 人材獲得作戦・４ 試験問題ほか」の「startから距離で塗りつぶして、あとはgoalから距離が減る方向に辿る(koizuka)」を参考に解いてみました。 maze_string = "**************************\n" + "*S* …

Dijkstraのアルゴリズムの FigureSP03-01をRubyで書いてみました。 Infinity = 9999 class Node attr_reader :status, :node_distance, :temporary_distance, :decision_distance, :id, :parent, :nodes def initialize(id, distance, parent) @id = id @nod…

常に子よりも親が大きい（小さい）値の二分木をヒープという。 今度はヒープを使ったソート、ヒープソートをやってみます。 def heap(array,n) if n > 0 parent = (n - 1) / 2 # 親の位置 if array[n] > array[parent] tmp = array[n] array[n] = array[pare…

常に子よりも親が大きい（小さい）値の二分木をヒープという。2分木を配列で表現すると各要素の位置関係は n の親は n - 1 / 2 n の左の子は 2 * n + 1 n の右の子は 2 * (n + 1) となる。 0 | +--+--+ 1 2 | | +-+-+ +-+-+ | | | | 3 4 5 6 [0,1,2,3,4,5,6]…