jrosell’s gists

CEXT-Dan / OBRC.CPP

Last active April 24, 2026 09:26

The One Billion Row Challenge

	#define WIN32_LEAN_AND_MEAN // Exclude rarely-used stuff from Windows headers
	// Windows Header Files
	#include <windows.h>
	#include "tchar.h"
	#include <iostream>
	#include <string>
	#include <format>
	#include <mutex>
	#include <unordered_map>
	#include <execution>

JosiahParry / ggplots-in-for-loops-dont-work.R

Created October 16, 2025 15:32

	library(ggplot2)

	all_plots <- list()

	m <- as.matrix(penguins[,3:6])

	for (i in 1:ncol(m)) {
	gg <- ggplot(penguins, aes(bill_len, m[,i])) +
	geom_point() +
	labs(title = sprintf("Column %i", i))

jrosell / compute-risk-ratio-risk-difference.R

Last active September 26, 2025 07:36

Methods for computing Risk Ratio and Risk Difference.

	stopifnot(requireNamespace("rlang"))
	rlang::check_installed("pak")
	pkgs <- rlang::chr(
	"tidymodels",
	"marginaleffects",
	"parameters",
	"modelbased",
	"dplyr",
	"stringr",
	"tibble",

dgkf / cols.R

Last active September 12, 2025 18:26

dplyr at home

	#' Column selector for `[` and `[[`
	#'
	#' @param ... Column names provided as `character` or `symbol` (could be
	#' extended to allow other inputs!)
	#' @return A `numeric` vector of column indices to select
	#'
	#' @examples
	#' mtcars[cols(cyl, wt)] \|> head()
	#'
	#' mtcars[cols(mpg:wt)] \|> head()

thyngster / ga4CookieParser.js

Created April 12, 2025 06:01

GA4 COOKIES PARSER

	/**
	* Parses GA4 cookies using a measurement ID without polluting the global namespace
	* @param {string} measurementId - GA4 measurement ID (e.g., 'G-XXXXXXXX')
	* @returns {Object\|null} Parsed GA4 cookie data or null if cookies not found
	*/
	function parseGA4Cookies(measurementId) {
	function getCookieValue(name) {
	const match = document.cookie.match('(^\|;)\\s' + name + '\\s=\\s*([^;]+)');
	return match ? match.pop() : null;
	}

andrewheiss / words_per_constitution_article.R

Last active March 17, 2025 13:16

	library(tidyverse)
	library(gutenbergr)

	constitution_raw <- gutenberg_download(5)

	constitution <- constitution_raw \|>
	slice(36:546) \|>
	filter(text != "") \|>
	mutate(text_lc = str_to_lower(text)) \|>
	mutate(is_article = str_starts(text_lc, "article")) \|>

skkzsh / alert.org

Last active November 19, 2024 16:59

org-mode syntax

Note

Tip

dceddia / bench.sh

Created November 15, 2024 18:30

Language benchmarks

	#!/bin/bash

	# Function to measure execution time
	measure_time() {
	start_time=$(date +%s.%N)
	"$@"
	end_time=$(date +%s.%N)
	execution_time=$(echo "$end_time - $start_time" \| bc)
	echo "Execution time: $execution_time seconds"
	}

jrosell / starwars-intro.R

Created October 30, 2024 14:57

	library(magick)
	library(lofifonts) # remotes::install_github('coolbutuseless/lofifonts')
	library(purrr)

	bitmap_text_coords("Hello", font = 'unifont') \|>
	head()

	text <- glue::glue("It is a period of civil war.
	Rebel spaceships, striking
	from a hidden base, have won

natzir / fuzzy-booster-by-natzir-mlforseo.ipynb

Created October 10, 2024 08:13

Fuzzy Booster by Natzir - MLforSEO

Sorry, something went wrong. Reload?

Sorry, we cannot display this file.

Sorry, this file is invalid so it cannot be displayed.

	library(tidyverse)
	library(gutenbergr)

	constitution_raw <- gutenberg_download(5)

	constitution <- constitution_raw \|>
	slice(36:546) \|>
	filter(text != "") \|>
	mutate(text_lc = str_to_lower(text)) \|>
	mutate(is_article = str_starts(text_lc, "article")) \|>

Jordi Rosell jrosell