[11659] | 1 | using System;
|
---|
| 2 | using System.Diagnostics;
|
---|
| 3 | using System.Linq;
|
---|
| 4 | using Microsoft.VisualStudio.TestTools.UnitTesting;
|
---|
| 5 |
|
---|
| 6 | namespace HeuristicLab.Problems.GrammaticalOptimization.Test {
|
---|
| 7 | [TestClass]
|
---|
| 8 | public class TestInstances {
|
---|
| 9 | [TestMethod]
|
---|
| 10 | public void TestGrammarFromString() {
|
---|
| 11 | {
|
---|
| 12 | var g = Grammar.FromString(@"
|
---|
| 13 |
|
---|
| 14 | G(S):
|
---|
| 15 | S -> aA | bB
|
---|
| 16 | A -> a | aA
|
---|
| 17 | B -> Bb | b
|
---|
| 18 | ");
|
---|
| 19 | Assert.AreEqual('S', g.SentenceSymbol);
|
---|
| 20 | Assert.AreEqual(2, g.TerminalSymbols.Count());
|
---|
| 21 | Assert.AreEqual(3, g.NonTerminalSymbols.Count());
|
---|
| 22 | Assert.IsTrue(g.TerminalSymbols.All(s => new char[] { 'a', 'b' }.Contains(s)));
|
---|
| 23 | Assert.IsTrue(g.NonTerminalSymbols.All(s => new char[] { 'S', 'A', 'B' }.Contains(s)));
|
---|
| 24 |
|
---|
| 25 | Assert.AreEqual(2, g.GetAlternatives('S').Count());
|
---|
| 26 | Assert.AreEqual(2, g.GetAlternatives('A').Count());
|
---|
| 27 | Assert.AreEqual(2, g.GetAlternatives('B').Count());
|
---|
| 28 |
|
---|
[11730] | 29 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "aA"));
|
---|
| 30 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "bB"));
|
---|
| 31 | Assert.IsTrue(g.GetAlternatives('A').Any(s => s.ToString() == "aA"));
|
---|
| 32 | Assert.IsTrue(g.GetAlternatives('A').Any(s => s.ToString() == "a"));
|
---|
| 33 | Assert.IsTrue(g.GetAlternatives('B').Any(s => s.ToString() == "Bb"));
|
---|
| 34 | Assert.IsTrue(g.GetAlternatives('B').Any(s => s.ToString() == "b"));
|
---|
[11659] | 35 |
|
---|
[11730] | 36 | Assert.AreEqual(2, g.MinPhraseLength(new Sequence("S")));
|
---|
| 37 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("S")));
|
---|
| 38 | Assert.AreEqual(1, g.MinPhraseLength(new Sequence("A")));
|
---|
| 39 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("A")));
|
---|
| 40 | Assert.AreEqual(1, g.MinPhraseLength(new Sequence("B")));
|
---|
| 41 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("B")));
|
---|
[11659] | 42 | }
|
---|
| 43 |
|
---|
| 44 | {
|
---|
| 45 | var g = Grammar.FromString(@"
|
---|
| 46 |
|
---|
| 47 | G(S):
|
---|
| 48 | S -> sS
|
---|
| 49 | ");
|
---|
| 50 | Assert.AreEqual('S', g.SentenceSymbol);
|
---|
| 51 | Assert.AreEqual(1, g.TerminalSymbols.Count());
|
---|
| 52 | Assert.AreEqual(1, g.NonTerminalSymbols.Count());
|
---|
| 53 | Assert.IsTrue(g.TerminalSymbols.All(s => new char[] { 's' }.Contains(s)));
|
---|
| 54 | Assert.IsTrue(g.NonTerminalSymbols.All(s => new char[] { 'S' }.Contains(s)));
|
---|
| 55 |
|
---|
| 56 | Assert.AreEqual(1, g.GetAlternatives('S').Count());
|
---|
| 57 |
|
---|
[11730] | 58 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "sS"));
|
---|
[11659] | 59 |
|
---|
[11730] | 60 | Assert.AreEqual(short.MaxValue, g.MinPhraseLength(new Sequence("S")));
|
---|
| 61 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("S")));
|
---|
[11659] | 62 | }
|
---|
| 63 |
|
---|
| 64 | {
|
---|
| 65 | var g = Grammar.FromString(@"
|
---|
| 66 |
|
---|
| 67 | G(S):
|
---|
| 68 | S->sss|sS");
|
---|
| 69 | Assert.AreEqual('S', g.SentenceSymbol);
|
---|
| 70 | Assert.AreEqual(1, g.TerminalSymbols.Count());
|
---|
| 71 | Assert.AreEqual(1, g.NonTerminalSymbols.Count());
|
---|
| 72 | Assert.IsTrue(g.TerminalSymbols.All(s => new char[] { 's' }.Contains(s)));
|
---|
| 73 | Assert.IsTrue(g.NonTerminalSymbols.All(s => new char[] { 'S' }.Contains(s)));
|
---|
| 74 |
|
---|
| 75 | Assert.AreEqual(2, g.GetAlternatives('S').Count());
|
---|
| 76 |
|
---|
[11730] | 77 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "sss"));
|
---|
| 78 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "sS"));
|
---|
[11659] | 79 |
|
---|
[11730] | 80 | Assert.AreEqual(3, g.MinPhraseLength(new Sequence("S")));
|
---|
| 81 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("S")));
|
---|
| 82 | Assert.AreEqual(4, g.MinPhraseLength(new Sequence("sS")));
|
---|
| 83 | Assert.AreEqual(7, g.MinPhraseLength(new Sequence("sSS")));
|
---|
| 84 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("sSS")));
|
---|
| 85 | Assert.AreEqual(3, g.MaxPhraseLength(new Sequence("sss")));
|
---|
| 86 | Assert.AreEqual(3, g.MinPhraseLength(new Sequence("sss")));
|
---|
[11659] | 87 | }
|
---|
| 88 |
|
---|
| 89 | {
|
---|
| 90 | var g = Grammar.FromString(@"
|
---|
| 91 |
|
---|
| 92 | G(S):
|
---|
| 93 | S->T|TS
|
---|
| 94 | T-> a..z
|
---|
| 95 | ");
|
---|
| 96 | Assert.AreEqual('S', g.SentenceSymbol);
|
---|
| 97 | Assert.AreEqual(26, g.TerminalSymbols.Count());
|
---|
| 98 | Assert.AreEqual(2, g.NonTerminalSymbols.Count());
|
---|
| 99 | Assert.IsTrue(g.NonTerminalSymbols.All(s => new char[] { 'S', 'T' }.Contains(s)));
|
---|
| 100 |
|
---|
| 101 | Assert.AreEqual(2, g.GetAlternatives('S').Count());
|
---|
| 102 |
|
---|
[11730] | 103 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "T"));
|
---|
| 104 | Assert.IsTrue(g.GetAlternatives('S').Any(s => s.ToString() == "TS"));
|
---|
[11659] | 105 |
|
---|
[11730] | 106 | Assert.AreEqual(1, g.MinPhraseLength(new Sequence("S")));
|
---|
| 107 | Assert.AreEqual(short.MaxValue, g.MaxPhraseLength(new Sequence("S")));
|
---|
| 108 | Assert.AreEqual(1, g.MinPhraseLength(new Sequence("T")));
|
---|
| 109 | Assert.AreEqual(1, g.MaxPhraseLength(new Sequence("T")));
|
---|
[11659] | 110 | }
|
---|
| 111 |
|
---|
| 112 | }
|
---|
| 113 |
|
---|
| 114 | [TestMethod]
|
---|
| 115 | public void TestRoyalSymbolProblem() {
|
---|
| 116 | var p = new RoyalSymbolProblem();
|
---|
| 117 | Console.WriteLine(p.Grammar);
|
---|
| 118 |
|
---|
| 119 | Assert.AreEqual(1, p.Evaluate("ab"));
|
---|
| 120 | Assert.AreEqual(0, p.Evaluate("bb"));
|
---|
| 121 | Assert.AreEqual(2, p.Evaluate("aa"));
|
---|
| 122 | Assert.AreEqual(3, p.Evaluate("aaa"));
|
---|
| 123 | }
|
---|
| 124 |
|
---|
| 125 |
|
---|
| 126 | [TestMethod]
|
---|
| 127 | public void TestRoyalPairProblem() {
|
---|
| 128 | var p = new RoyalPairProblem();
|
---|
| 129 | Console.WriteLine(p.Grammar);
|
---|
| 130 |
|
---|
| 131 | Assert.AreEqual(1, p.Evaluate("ab"));
|
---|
| 132 | Assert.AreEqual(0, p.Evaluate("bb"));
|
---|
| 133 | Assert.AreEqual(0, p.Evaluate("aa"));
|
---|
| 134 | Assert.AreEqual(0, p.Evaluate("aaa"));
|
---|
| 135 | Assert.AreEqual(2, p.Evaluate("aba"));
|
---|
| 136 | Assert.AreEqual(2, p.Evaluate("abba"));
|
---|
| 137 | Assert.AreEqual(3, p.Evaluate("abab"));
|
---|
| 138 | }
|
---|
| 139 |
|
---|
| 140 | [TestMethod]
|
---|
| 141 | public void TestSantaFeAntProblem() {
|
---|
| 142 | var p = new SantaFeAntProblem();
|
---|
| 143 | Console.WriteLine(p.Grammar);
|
---|
| 144 |
|
---|
| 145 | // one possible optimal solution: if-food-ahead (move) ( left left if-food-ahead (move) (right)) move right
|
---|
| 146 | Assert.AreEqual(89, p.Evaluate("?(m)(ll?(m)(r))mr"));
|
---|
| 147 | }
|
---|
| 148 |
|
---|
| 149 | [TestMethod]
|
---|
| 150 | public void TestRoyalRoadProblem() {
|
---|
| 151 | var p = new RoyalRoadProblem();
|
---|
| 152 | Console.WriteLine(p.Grammar);
|
---|
| 153 |
|
---|
| 154 | }
|
---|
| 155 | [TestMethod]
|
---|
| 156 | public void TestPalindromeProblem() {
|
---|
| 157 | Assert.AreEqual("aba", PalindromeProblem.LongestPalindromicSubstring("aba"));
|
---|
| 158 | Assert.AreEqual("aba", PalindromeProblem.LongestPalindromicSubstring("aaba"));
|
---|
| 159 | Assert.AreEqual("aba", PalindromeProblem.LongestPalindromicSubstring("abaa"));
|
---|
| 160 | Assert.AreEqual("aabaa", PalindromeProblem.LongestPalindromicSubstring("aaaabaa"));
|
---|
| 161 | Assert.AreEqual("aabaa", PalindromeProblem.LongestPalindromicSubstring("aabaaaa"));
|
---|
| 162 | Assert.AreEqual("baaaab", PalindromeProblem.LongestPalindromicSubstring("aabaaaab"));
|
---|
| 163 |
|
---|
| 164 |
|
---|
| 165 | var p = new PalindromeProblem();
|
---|
| 166 | Console.WriteLine(p.Grammar);
|
---|
| 167 |
|
---|
| 168 | Assert.AreEqual(1, p.Evaluate("a"));
|
---|
| 169 | Assert.AreEqual(2, p.Evaluate("aa"));
|
---|
| 170 | Assert.AreEqual(3, p.Evaluate("aaa"));
|
---|
| 171 | Assert.AreEqual(3, p.Evaluate("aba"));
|
---|
| 172 | Assert.AreEqual(3, p.Evaluate("baba"));
|
---|
| 173 | Assert.AreEqual(3, p.Evaluate("abab"));
|
---|
| 174 | Assert.AreEqual(5, p.Evaluate("babab"));
|
---|
| 175 | }
|
---|
| 176 | [TestMethod]
|
---|
| 177 | public void TestHardPalindromeProblem() {
|
---|
| 178 | var p = new HardPalindromeProblem();
|
---|
| 179 | Console.WriteLine(p.Grammar);
|
---|
| 180 |
|
---|
| 181 | Assert.AreEqual(1 + 1, p.Evaluate("a"));
|
---|
| 182 | Assert.AreEqual(2 + 1, p.Evaluate("aa"));
|
---|
| 183 | Assert.AreEqual(3 + 1, p.Evaluate("aaa"));
|
---|
| 184 | Assert.AreEqual(3 + 2, p.Evaluate("aba"));
|
---|
| 185 | Assert.AreEqual(3 + 2, p.Evaluate("baba"));
|
---|
| 186 | Assert.AreEqual(3 + 2, p.Evaluate("abab"));
|
---|
| 187 | Assert.AreEqual(5 + 2, p.Evaluate("babab"));
|
---|
| 188 | Assert.AreEqual(5 + 3, p.Evaluate("bacab"));
|
---|
| 189 | }
|
---|
| 190 |
|
---|
| 191 | [TestMethod]
|
---|
| 192 | public void TestEvenParityProblem() {
|
---|
| 193 | var p = new EvenParityProblem();
|
---|
| 194 | Console.WriteLine(p.Grammar);
|
---|
| 195 |
|
---|
| 196 | // a | b | c | d | res
|
---|
| 197 | // 0 | 0 | 0 | 0 | 1
|
---|
| 198 | // 0 | 0 | 0 | 1 | 0
|
---|
| 199 | // 0 | 0 | 1 | 0 | 0
|
---|
| 200 | // 0 | 0 | 1 | 1 | 1
|
---|
| 201 | // 0 | 1 | 0 | 0 | 0
|
---|
| 202 | // 0 | 1 | 0 | 1 | 1
|
---|
| 203 | // 0 | 1 | 1 | 0 | 1
|
---|
| 204 | // 0 | 1 | 1 | 1 | 0
|
---|
| 205 | // 1 | 0 | 0 | 0 | 0
|
---|
| 206 | // 1 | 0 | 0 | 1 | 1
|
---|
| 207 | // 1 | 0 | 1 | 0 | 1
|
---|
| 208 | // 1 | 0 | 1 | 1 | 0
|
---|
| 209 | // 1 | 1 | 0 | 0 | 1
|
---|
| 210 | // 1 | 1 | 0 | 1 | 0
|
---|
| 211 | // 1 | 1 | 1 | 0 | 0
|
---|
| 212 | // 1 | 1 | 1 | 1 | 1
|
---|
| 213 |
|
---|
| 214 |
|
---|
| 215 | Assert.AreEqual(8, p.Evaluate("a"));
|
---|
| 216 | Assert.AreEqual(8, p.Evaluate("b"));
|
---|
| 217 | Assert.AreEqual(8, p.Evaluate("c"));
|
---|
| 218 | Assert.AreEqual(8, p.Evaluate("d"));
|
---|
| 219 |
|
---|
| 220 | Assert.AreEqual(8, p.Evaluate("a*b")); // a and b
|
---|
| 221 | Assert.AreEqual(8, p.Evaluate("a+b")); // a or b
|
---|
| 222 | Assert.AreEqual(8, p.Evaluate("!a*b+a*!b")); // a xor b
|
---|
| 223 | Assert.AreEqual(8, p.Evaluate("!(a*b)+(a*!b)")); // a xor b
|
---|
| 224 | Assert.AreEqual(16, p.Evaluate("a^b^c^d")); // a xor b
|
---|
| 225 | }
|
---|
| 226 |
|
---|
| 227 | [TestMethod]
|
---|
| 228 | public void TestSymbolicRegressionPoly10Problem() {
|
---|
| 229 | var p = new SymbolicRegressionPoly10Problem();
|
---|
| 230 | Console.WriteLine(p.Grammar);
|
---|
| 231 |
|
---|
| 232 | Assert.AreEqual(0.00319925877644673, p.Evaluate("a"), 1.0E-7);
|
---|
| 233 | Assert.AreEqual(0.00632775454329686, p.Evaluate("b"), 1.0E-7);
|
---|
| 234 | Assert.AreEqual(0.00569030954291292, p.Evaluate("c"), 1.0E-7);
|
---|
| 235 | Assert.AreEqual(3.32317092313123E-05, p.Evaluate("d"), 1.0E-7);
|
---|
| 236 | Assert.AreEqual(0.000562538829174826, p.Evaluate("e"), 1.0E-7);
|
---|
| 237 | Assert.AreEqual(3.29458942533772E-06, p.Evaluate("f"), 1.0E-7);
|
---|
| 238 | Assert.AreEqual(0.000193866006166768, p.Evaluate("g"), 1.0E-7);
|
---|
| 239 | Assert.AreEqual(2.83339004096246E-05, p.Evaluate("h"), 1.0E-7);
|
---|
| 240 | Assert.AreEqual(0.00291584574914239, p.Evaluate("i"), 1.0E-7);
|
---|
| 241 | Assert.AreEqual(0.00504038616701691, p.Evaluate("j"), 1.0E-7);
|
---|
| 242 |
|
---|
| 243 | Assert.AreEqual(0.252718466940018, p.Evaluate("a*b"), 1.0E-7);
|
---|
[11730] | 244 | Assert.AreEqual(0.290635611728845, p.Evaluate("c*d"), 1.0E-7);
|
---|
| 245 | Assert.AreEqual(0.25737325167716, p.Evaluate("e*f"), 1.0E-7);
|
---|
| 246 |
|
---|
[11659] | 247 | Assert.AreEqual(0.00173739472363473, p.Evaluate("b*c"), 1.0E-7);
|
---|
| 248 | Assert.AreEqual(3.15450564064128E-05, p.Evaluate("d*e"), 1.0E-7);
|
---|
| 249 |
|
---|
[11730] | 250 | Assert.AreEqual(0.0943358163760454, p.Evaluate("a*g*i"), 1.0E-7);
|
---|
| 251 | Assert.AreEqual(0.116199534934045, p.Evaluate("c*f*j"), 1.0E-7);
|
---|
| 252 |
|
---|
[11747] | 253 | Assert.AreEqual(0.824522210419616, p.Evaluate("a*b+c*d+e*f"), 1E-7);
|
---|
[11730] | 254 |
|
---|
[11747] | 255 |
|
---|
[11659] | 256 | Assert.AreEqual(1.0, p.Evaluate("a*b+c*d+e*f+a*g*i+c*f*j"), 1.0E-7);
|
---|
| 257 | }
|
---|
[11865] | 258 |
|
---|
| 259 | [TestMethod]
|
---|
| 260 | public void TestRoyalTreeProblem() {
|
---|
| 261 | var p = new RoyalTreeProblem(7);
|
---|
| 262 | Console.WriteLine(p.Grammar);
|
---|
| 263 |
|
---|
| 264 | // examples from The Royal Tree Problem, a Benchmark for Single and Multi-population Genetic Programming (Punch, Zongker, Goodman)
|
---|
| 265 | Assert.AreEqual(4, p.Evaluate("ax"), 1.0E-7);
|
---|
| 266 | Assert.AreEqual(384.0, p.Evaluate("cbaxaxbaxaxbaxax"), 1.0E-7);
|
---|
| 267 | Assert.AreEqual(128.66, p.Evaluate("cbaxaxbaxaxbxx"), 1.0E-7);
|
---|
| 268 | Assert.AreEqual(64.66, p.Evaluate("cbaxaxxx"), 1.0E-7);
|
---|
| 269 |
|
---|
| 270 | }
|
---|
[12893] | 271 |
|
---|
| 272 | //[TestMethod]
|
---|
| 273 | //public void GenerateDataForPoly10() {
|
---|
| 274 | // var p = new SymbolicRegressionPoly10Problem();
|
---|
| 275 | //
|
---|
| 276 | // // complete a sentence n times and observe rewards
|
---|
| 277 | // var incompleteSequence = new ReadonlySequence("a*b+c*d+e*f+E");
|
---|
| 278 | // var options =
|
---|
| 279 | // int n = 100000;
|
---|
| 280 | // for (int i = 0; i < n; i++) {
|
---|
| 281 | // var s = new Sequence(incompleteSequence);
|
---|
| 282 | // }
|
---|
| 283 | //}
|
---|
[11659] | 284 | }
|
---|
| 285 | }
|
---|