# Computed using the Mathematica program that I contributed to this sequence 1 2 2 6 3 8 4 12 5 16 6 18 7 20 8 22 9 26 10 36 11 42 12 44 13 100 14 120 15 124 16 162 17 168 18 174 19 192 20 218 21 272 22 278 23 338 24 364 25 380 26 392 27 502 28 512 29 532 30 560 31 594 32 614 33 698 34 790 35 814 36 838 37 922 38 938 39 1072 40 1082 41 1092 42 1102 43 1146 44 1182 45 1256 46 1354 47 1360 48 1484 49 1508 50 1566 51 1662 52 1690 53 1720 54 1844 55 1912 56 2010 57 2068 58 2114 59 2116 60 2160 61 2300 62 2494 63 2574 64 2582 65 2620 66 3002 67 3112 68 3158 69 3196 70 3500 71 3582 72 3598 73 3682 74 3780 75 3856 76 3968 77 4254 78 4308 79 4376 80 4472 81 4518 82 4800 83 4928 84 5100 85 5124 86 5280 87 5292 88 5416 89 5538 90 5672 91 5740 92 6500 93 6510 94 6558 95 6928 96 7154 97 7318 98 7354 99 7570 100 7712