My family had newer computers that I used before this but the first computer that was MINE was one of these Commodore XTs that I salvaged from my Dad's shelf of spare parts and busted computers
Randy Boyes
@randy.pub
470 followers 547 following 393 posts
Analytics at @presage.group | PhD Epidemiology | Wolfe Island Volunteer Firefighter | #julialang #python #rstats | publications at www.randy.pub | GitHub @rdboyes
![[grossed out] --dangerously-skip-permissions
[interested] auto mode](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreic55bdcbgjbn2ost4vqgnelavotkabhf4djy5pjuik3n7salenlra)
![function solve(line: string, bat_length: number) {
const arr = line.split("").map(function (char: string) {
return Number(char);
});
let end: number = arr.length - bat_length + 1;
let start: number = 0;
let digits: number[] = [];
while (digits.length < bat_length) {
const selected = Math.max(...arr.slice(start, end));
digits.push(selected);
end += 1;
start += 1 + arr.slice(start, end).indexOf(selected);
}
return digits
.reverse()
.map(function (n, i) {
return n * 10 ** i;
})
.reduce((a, b) => {
return a + b;
}, 0);
}
console.log(
require("fs")
.readFileSync("data/2025/3.txt", "utf-8")
.split(/\r?\n/)
.filter((line) => line.trim().length > 0)
.map(function (line: string) {
return [solve(line, 2), solve(line, 12)];
})
.reduce(function (a, b) {
return [a[0] + b[0], a[1] + b[1]];
}),
);](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreiguiw3f25b5gl5t2usqsebbfgkmulqaz5ywg3sufsz35q7hyp3rnq)
![var input_matrix = require("fs")
.readFileSync("data/2025/4.txt", "utf-8")
.split(/\r?\n/)
.filter((line) => line.trim().length > 0)
.map(function (line: string) {
return line.split("").map(function (char) {
if (char == "@") {
return 1;
} else {
return 0;
}
});
});
var count = 0;
var remove = [];
var exit = false;
while (exit == false) {
for (const target of remove) {
input_matrix[target[0]][target[1]] = 0;
}
var remove = [];
for (var i = 1; i < input_matrix.length - 1; i++) {
for (var j = 1; j < input_matrix.length - 1; j++) {
if (
input_matrix[i - 1]
.slice(j - 1, j + 2)
.concat(
input_matrix[i].slice(j - 1, j + 2),
input_matrix[i + 1].slice(j - 1, j + 2),
)
.reduce((a, b) => {
return a + b;
}, 0) <= 4
) {
if (input_matrix[i][j] == 1) {
count++;
remove.push([i, j]);
}
}
}
}
if (remove.length == 0) {
exit = true;
}
}
console.log(count);](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreicvj3id64a43rroadtecprreznncjbvcgnvdsc25ekqmvyiqzzf4m)
![const range = (start: number, stop: number): number[] =>
Array.from({ length: 1 + stop - start }, (_, i) => start + i);
function chunkString(str: string, length: number) {
return str.match(new RegExp(".{1," + length + "}", "g"));
}
const divisors = (num: number) =>
[...Array(num)].map((x, i) => i).filter((x) => num % x === 0);
function solve(id_range: string): number {
const arr_range = id_range.split("-");
const possibles = range(Number(arr_range[0]), Number(arr_range[1]));
const ans = possibles
.map(function (element: number): number {
let id_string = `${element}`;
const checks: number[] = divisors(id_string.length).map((num) => {
return new Set(chunkString(id_string, num)).size;
});
if (Math.min(...checks) == 1) {
return element;
} else {
return 0;
}
})
.reduce((a, b) => {
return a + b;
}, 0);
return ans;
}
console.log(
require("fs")
.readFileSync("data/2025/2.txt", "utf-8")
.split(",")
.map(function (id_range: string) {
return solve(id_range);
})
.reduce((a, b) => {
return a + b;
}, 0),
);](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreidp2p5ferqbjmivb7rn2i6cwlrvnyzvi3ikab36earezakwqkdspm)
![Typescript solution to advent 2025 day 1. Code: class Dial {
current: number = 50;
zeros: number = 0;
pass_zero: number = 0;
turn(s: string): void {
if (s[0] == "R") {
this.current += Number(s.substring(1));
if (this.current >= 100) {
this.pass_zero += Math.trunc(this.current / 100);
this.current = this.current % 100;
}
} else {
if (this.current == 0) {
this.pass_zero -= 1;
}
this.current -= Number(s.substring(1));
if (this.current <= 0) {
this.pass_zero += -Math.trunc(this.current / 100) + 1;
this.current = 100 + (this.current % 100);
}
}
if (this.current == 0 || this.current == 100) {
this.zeros += 1;
this.current = 0;
}
}
}
var p1 = new Dial();
require("fs")
.readFileSync("data/2025/1.txt", "utf-8")
.split(/\r?\n/)
.forEach(function (line: string) {
p1.turn(line);
});
console.log(p1.zeros);
console.log(p1.pass_zero);](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreienupynbsg3lshxcxg4u4haqgzpvdyn2stgg7netyvpb5uvevi5me)
![Code to recreate a data visualization showing the medal progress at the 2018 olympics, reproduced below:
using TidierPlots, TidierFiles, TidierData, DataFrames, Dates
wo = read_csv("data/bump (1).csv")
wo_plot = @chain wo begin
@mutate total = gold + silver + bronze
transform(:date => ByRow(x -> 1 + (x-Date("2018-02-10")).value) => :day)
@group_by date
@mutate rank = 1:n()
@ungroup
end
top5 = @chain wo_plot begin
@filter country in ["NED", "GER", "CAN", "USA", "NOR"]
end
final = @chain top5 begin
@filter day == 16
end
ggplot(wo_plot) +
geom_point(@aes(x = day, y = rank, group = country), alpha = .4, size = 15, color = :lightgrey) +
geom_line(@aes(x = day, y = rank, group = country), alpha = .4, linewidth = 6, color = :lightgrey) +
geom_point(data = top5, @aes(x = day, y = rank, color = country), size = 15, alpha = 0.5) +
geom_line(data = top5, @aes(x = day, y = rank, color = country), linewidth = 6, alpha = 0.5) +
geom_point(data = top5, @aes(x = day, y = rank), color = :white, size = 5) +
scale_y_reverse() +
lims(y = c(0.5, 10.5), x = c(0, 18)) +
labs(title = "Pyongchang 2018 Olympic Winter Games",
subtitle = "Countries ranked by overall medals after each competition day",
x = "Competition Days with Medals", y = "Rank") +
scale_color_manual(values = c(:red, :black, :orange, :green, :blue)) +
guides(color = :none) +
theme_minimal() +
theme(
xgridstyle = :solid,
xgridcolor = :lightgray,
xgridvisible = true,
xticks = 1:16,
yticks = 1:10,
leftspinevisible = false,
bottomspinevisible = false,
titlealign = :left,
titlesize = 24,
subtitlesize = 16
)](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreiducjpjc7n2rtbbuho42y6qnlcvqpex6kwnosctssvssqemvsb4zy)
![Julia source code example:
# One-liner if you're willing to write column names as symbols
count_ones(data, c...) = combine(data, [c...] .=> x -> sum(x .== 1) .=> [c...])
count_ones(mtcars, :VS, :Carb)
# 1×2 DataFrame
# Row │ VS Carb
# │ Int64 Int64
#─────┼──────────────
# 1 │ 14 7
# macro version to allow unquoted names
macro count_ones(data, c...)
return Expr(:call, :count_ones, data, (Meta.quot.(c))...)
end
@count_ones(mtcars, VS, Carb)
# 1×2 DataFrame
# Row │ VS Carb
# │ Int64 Int64
#─────┼──────────────
# 1 │ 14 7](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreicf2ppjey5vw3e2jinabihzovg3tlp6fx7kkxpyweud6ikdifamuy)
![data = readlines("data/5.txt")
div = findall(data .== "")[1]
to_int(x) = parse.(Int, x)
rules = to_int.(split.(data[1:(div-1)], "|"))
pages = to_int.(split.(data[(div+1):end], ","))
check_rules(p, rl) = ifelse(
any([r ⊆ p && !all(p ∩ r .== r) for r in rl]),
0, p[ceil(Int, end / 2)])
p1 = sum(check_rules.(pages, (rules,)))
println("Part 1: $p1")
rulesort(x, y) = [x, y] in rules
p2 = sum(check_rules.(sort.(pages, lt=rulesort), (rules,))) - p1
println("Part 1: $p2")](https://cdn.bsky.app/img/feed_thumbnail/plain/did:plc:2h5e6whhbk5vnnerqqoi256k/bafkreia5zczlqins5ozooyjiowtu3coompypsgmh4c4lhka6mrl6f26cqy)
