🌟 Advent of Code (AoC) 2020 🌟

Dag: 3
Språk: Swift
Lösning: GitHub

Nu tror jag konfigurationen för hjälpbiblioteket är uppsatt på "rätt sätt", d.v.s. det går att git-clone repo för lösningarna och bara kör "swift run" för den dag man till testa. Swift verkar i praktiken förutsätta att man använder git.

Hur gör ni andra med tester? Både förra året med Rust och nu med Swift passar jag på att lära mig de inbyggda funktionerna för unit-tester genom att skriva sådana med exemplen man får i texten "swift test" kör testet (input.txt är min input och test.txt är det man får som exempel).

Dag: 3
Språk: JavaScript

Brist på tid, så fortsätter med JavaScript. Använder inte alla nya fancy saker (alltså saker som tillkommit de senaste 15 åren...), så blir väl i princip C i JS... Men i gengäld förhoppningsvis relativt läsbart. Och säga vad man vill om JS, men det är väldigt enkelt att jobba i.

Testar genom att skapa en testInput.txt med exemplet man får från sidan. Tyvärr blir det formaterat lite annorlunda än input.txt när man kopierar och klistrar in (olika antal tecken för radbryt), så mapWidth i övningen nedan kräver lite modifiering. (Och ja, det går så klart att fixa, men...)

(function () {
        fetchInput();

    async function fetchInput() {
        var response = await fetch('input.txt');
        var text = await response.text();
        calculatePartOne(text);
        calculatePartTwo(text);
    }

    function calculatePartOne(text) {
        var res = calculateSlope(text, 3, 1);
        console.log("res: " + res);
    }

    function calculatePartTwo(text) {
        var res = calculateSlope(text, 1, 1) *
            calculateSlope(text, 3, 1) *
            calculateSlope(text, 5, 1) *
            calculateSlope(text, 7, 1) *
            calculateSlope(text, 1, 2);
        console.log("res: " + res);
    }

    function calculateSlope(text, right, down) {
        var lines = text.split('\n');
        var nrOfTrees = 0;
        var mapWidth = lines[0].length;
        var actualRight = right / down;
        for (var i = 0; i < lines.length; i++) {
            if (lines[i].length > 0) {
                if (lines[i][(i * actualRight) % mapWidth] == "#") {
                    nrOfTrees++;
                }
            }
        }
        return nrOfTrees;
    }
}
)();

Dag: 3
Språk: c#

EDIT; Städade upp koden en hel del.

static async Task Main(string[] args)
{
  var lines = await File.ReadAllLinesAsync("input.txt");
  var t = new int[5];
  for (int i = 1; i < lines.Length; i++)
  {
    var l = lines[i];
    var n = l.Length;
    if (l[i % n] == '#') { t[0]++; }
    if (l[(i * 3) % n] == '#') { t[1]++; }
    if (l[(i * 5) % n] == '#') { t[2]++; }
    if (l[(i * 7) % n] == '#') { t[3]++; }
    if (i % 2 == 0) { if (l[(i / 2) % n] == '#') { t[4]++; } }
  }
  Console.WriteLine(t[1]);
  Console.WriteLine(t.Aggregate(1L, (a, b) => a * b));
}

Nej skamvrån för mig, trots att @Yoshman varnade för långa heltal och jag envisas med hård typning så använda jag int...

Hade gärna varit med men har för mycket jobb, 12h framför datorn får räcka.

Hehe, ja om man ändå vore så klipsk.

Personligen brukar jag köra på något språk jag aldrig använt, blir nog Rust denna gång. Men sparar det till julledigheten.

Dag: 3
Språk: Powershell
Lösning: GitHub

Det här var ju inte det minsta invecklat alls. Känner mig rätt nöjd med hur jag använde argument-splatting för Part 2, annars så var det ett väldigt rakt upp och ner problem att bara lösa.

En sak som störde mig lite är att det inte verkar går att göra mer än en sak åt gången i en for-loop i PowerShell? T.ex. i C kan man göra detta:

for (row = 0, col = 0; row < rowCount; row += rowSlope, col += colSlope) {
        /* ... */
}

Genom att använda ,-operatorn kan man göra fler än en grej i initierings- och itereringsstegen.

Hittar inget motsvarande sätt att inkrementera två variabler i en for-loop. Så jag skrev om det som en while-loop istället i Powershell (vilket egentligen blev rätt snyggt) men jag undrar om det finns något sätt att göra motsvarande i PS.

Edit: Man kan tydligen göra detta med subexpression-operatorn $()! Källa

static async Task Main(string[] args)
{
  var lines = await File.ReadAllLinesAsync("input.txt");
  var t = new int[5];
  for (int i = 1; i < lines.Length; i++)
  {
    var l = lines[i];
    var n = l.Length;
    if (l[i % n] == '#') { t[0]++; }
    if (l[(i * 3) % n] == '#') { t[1]++; }
    if (l[(i * 5) % n] == '#') { t[2]++; }
    if (l[(i * 7) % n] == '#') { t[3]++; }
    if (i % 2 == 0) { if (l[(i / 2) % n] == '#') { t[4]++; } }
  }
  Console.WriteLine(t[1]);
  Console.WriteLine(t.Aggregate(1L, (a, b) => a * b));
}

Borde inte den där skippa första raden? (Rad 0?) Hur funkar ens den koden? Är det 1-indexerat på något vänster?

Annars, intressant lösning eftersom loopen är skriven på ett sånt sätt att du bara behöver iterera över indatat en gång. Fast det fimpar du ju tyvärr genom att läsa in hela filen på en gång längst upp i koden. Du skulle kunna iterera rad för rad istället och spara RAM på det.

Uppgiften kollar inga träd på första raden, inte mitt påhitt...

Bra poäng med att inte läsa in hela filen i ram, det ska jag såklart göra :), brydde mig inte allt för mycket om prestandan.

Update; Tar ungefär dubbelt så lång (0.5ms istället för 0.25ms) tid när jag streamar rad för rad, men visst, minnessnålt

Dag: 3
Språk: Powershell
Lösning:

$geo = Get-Content "input.txt";
$width = $geo[0].ToCharArray().Count;
$height = $geo.Count;


# Day 3-1

$ystep = 1;
$xstep = 3;
$trees = 0;
$ypos = 0;
$xpos = 0;

while ($ypos -lt $height) {
    $lineArray = $geo[$ypos];
    if ($lineArray[$xpos] -eq "#") {
        $trees++;
    }

    $ypos += $ystep;
    $xpos += $xstep;

    if ($xpos -ge $width) {
        $xpos -= $width;
    }
}

Write-Host "Day3-1: $trees trees";

# Day 3-2

$ysteps = @(1,1,1,1,2);
$xsteps = @(1,3,5,7,1);
$trees = ,0 * $ysteps.Count;

for ($i = 0; $i -lt $ysteps.Count; $i++) {
    $ypos = 0;
    $xpos = 0;

    while ($ypos -lt $height) {
        $lineArray = $geo[$ypos].ToCharArray()
        if ($lineArray[$xpos] -eq "#") {
            $trees[$i]++;
        }
    
        $ypos += $ysteps[$i];
        $xpos += $xsteps[$i];

        if ($xpos -ge $width) {
            $xpos -= $width;
        }
    }
}

$trees | % {$ans = 1} {$ans *= $_}

Write-Host "Day3-2: $ans";

Detta har jag glömt bort. Ska se hur långt jag orkar försöka. Ser att jag i alla fall kommer palla dag 1.

class Program
    {
        static List<string> lines = File.ReadAllLines("input.csv").ToList();
        static char[,] input = new char[lines.Count, lines[0].Length];
        static void Main(string[] args)
        {
            for (int i = 0; i < lines.Count; i++)
            {
                string temp = lines[i];
                for (int j = 0; j < lines[0].Length; j++)
                    input[i, j] = temp[j];
            }
            double result = TreesMan(1, 3);
            double result2= result * TreesMan(1, 1) * TreesMan(1, 5) * TreesMan(1, 7) * TreesMan(2, 1);
            Console.WriteLine($"Del 1: {result}\nDel 2: {result2}");
            Console.ReadLine();
        }
        static public double TreesMan(int row, int column)
        {
            int rowCheck = 0;
            int colCheck = 0;
            double count = 0;

            for (int j = 0; j < input.GetLength(0); j++)
            {
                rowCheck += row;
                colCheck += + column;
                if (rowCheck >= input.GetLength(0))
                    break;
                if (colCheck >= input.GetLength(1))
                    colCheck += - input.GetLength(1);
                if (input[rowCheck, colCheck] == '#')
                    count++;
            }
            return count;
        }

    }

TACK!

Jag slog mig blodig mot hur i helskotta jag skulle få till en gridmap över alla värden som jag kunde anropa på ett bra sätt och sprang djupt ner i ett hål av att försöka få en List<char[]> (vilket inte ens verkar finnas?) följt av typ en string[] som bestod av char[] men du petade mig i rätt riktning.

Hade inte en aning om char[,] men lär aldrig glömma den nu! Lärde mig även skillnaden på List.Count och List.Lenght.

Hade nära nog exakt samma logik som dig för själva hittandet av alla träd men min input var bara blaj.

Fortsätta gärna posta dina lösningar så vi mindre begåvade kan ta del av dom

Med det sagt postar jag inte min lösning eftersom det enda som skiljer är variabelnamnen i logiken, så likt var det

Dag: 3
Språk: Clojure

(def input (clojure.string/split-lines (slurp "input.txt")))
(defn count-trees [m right down]
  (def width (count (nth m 0)))
  (:trees
   (reduce
    (fn [acc row]
      (def valid? (= 0 (mod (:y acc) down)))
      {:x (if valid? (mod (+ (:x acc) right) width) (:x acc))
       :y (inc (:y acc))
       :trees (+ (:trees acc) (if (and valid? (= \# (nth row (:x acc)))) 1 0))})
    {:x 0 :y 0 :trees 0} m)))
(println "Part 1 :" (count-trees input 3 1))
(println "Part 2 :" (reduce * 1 (map (fn [slope] (count-trees input (nth slope 0) (nth slope 1)))
                                     [[1 1] [3 1] [5 1] [7 1] [1 2]])))

Pillade med Clojure en del för ett par år sedan. I teorin är det väldigt vettigt för multicore-programmering, i praktiken är prestanda inte Clojures bästa gren... Så har inte blivit något och man måste hålla igång ett språk, vissa saker fanns kvar i bakhuvudet men de flesta detaljerna är borta.

Blir bara Swift hädanefter detta år. Är svårt att hitta tiden dock

Dagens var ändå lite klurigare än de tidigare. Mest i mängd kod då, det mesta var ju bara massa if-satser.

Dag 4, Python
Nu blev det ingen one-liner, men hyfsat kompakt

import re
ds = [{}]
for line in [line.strip() for line in open("input")]:
    if not line: ds.append({})
    for k,v in [item.split(':') for item in line.split()]:
        ds[-1][k] = v

n = {'byr' : lambda v : 1920 <= int(v) and int(v) <= 2002,
     'iyr' : lambda v : 2010 <= int(v) and int(v) <= 2020,
     'eyr' : lambda v : 2020 <= int(v) and int(v) <= 2030,
     'hgt' : lambda v : ((v[-2:] == 'in' and 59 <= int(v[:-2]) and int(v[:-2]) <= 76) or
                         (v[-2:] == 'cm' and 150 <= int(v[:-2]) and int(v[:-2]) <= 193)),
     'hcl' : lambda v : re.match('#[0-9a-fA-F]{6}',v),
     'ecl' : lambda v : v in ['amb', 'blu', 'brn', 'gry', 'grn', 'hzl', 'oth'],
     'pid' : lambda v : re.match('^\d{9}$', v)}

print([sum([all([k in d for k n]) and 
                  all([n[k](d[k]) for k in n]) if v else True
            for d in ds])
       for v in [False, True]])