2017-01-01から1ヶ月間の記事一覧

2017-01-11

Haskellで組合せ最適化(メモ)

SQLで作成したコードに対応するHaskellコードを作成したあまり、カッコ良く書けていないですが。。。■巡回セールスマン全探索 import Data.List (maximumBy,minimumBy,permutations) import Data.Function (on) -- エッジのデータ型 data Edge = Edge { pat…

2017-01-07

SQLで組合せ最適化(メモ)

http://sqlzoo.net/wiki/SELECT_from_BBC_Tutorial 上記のSQL SERVERで試した■自然数列挙 WITH Input(iStart, iEnd) AS (SELECT 1, 10) , NaturalNumber(n) AS ( SELECT iStart FROM Input UNION ALL SELECT n + 1 FROM NaturalNumber INNER JOIN Input ON N…