wch

#!/bin/bash
#
# Installs the latest RStudio daily desktop build for OSX/macOS and Ubuntu(amd64)
#
# https://support.rstudio.com/hc/en-us/articles/203842428-Getting-the-newest-RStudio-builds

set -e

install_macos_daily() {
    REDIRECT_URL="https://www.rstudio.org/download/latest/daily/desktop/mac/RStudio-latest.dmg"

wch

#!/usr/bin/env Rscript

# WebSocket Key-Value Store Server with ID scoping
#
# This server provides a WebSocket-based key-value store with publish/subscribe
# functionality. All operations are scoped by an application ID, allowing multiple
# independent applications to use the same server concurrently.
#
# COMMUNICATION PROTOCOL (JSON):
# ==============================

wch

#!/bin/bash

# Rebase with Prettier - Automatically reformat files with prettier during rebase
#
# USAGE:
#   ./rebase-prettier-exec.sh
#
# BEFORE RUNNING:
#   - Make sure you're on the branch you want to rebase (e.g., your feature branch)
#   - This script will rebase your current branch onto origin/main

wch

#!/usr/bin/env python
# pyright: strict

# Usage:
#   python extract.py [-o output.txt] [-m model] [-c chunk_size] [-r overlap] [-q] <file_path> "<extraction_prompt>"

import argparse
import sys
from pathlib import Path
from typing import Generator

wch

OPENAI_API_KEY=<Paste API key here>
ANTHROPIC_API_KEY=<Paste API key here>

wch

// ===================================================================
// XMLHttpRequestShim - shim for XMLHttpRequest
// This assumes the XMLHttpRequest types from lib.dom.d.ts are available
//
// Based on https://github.com/apple502j/xhr-shim
// ===================================================================

const sHeaders = Symbol("headers");
const sRespHeaders = Symbol("response headers");
const sAbortController = Symbol("AbortController");

wch

Keybase proof

I hereby claim:

• I am wch on github.
• I am winston (https://keybase.io/winston) on keybase.
• I have a public key ASDHlMPPG3dP3sRwu8Y3TZ2nJY9au2IYwL7DWX4mjKgWWwo

To claim this, I am signing this object:

wch

import * as sass from "./sass.default.js";

console.log(sass.info);
console.log(1);
const res = sass.compileString(`
.box {
  width: 10px + 15px;
}
`)
console.log(2);

wch

# Calculate the probability of a collision if `n` items are randomly drawn (with
# replacement) from a set with `total` number of items.
collision_prob <- function(n, total) {
  prob_no_collision <- 1
  # Do this in a loop instead of prod(numerators)/prod(denominators), because
  # that method is prone to result in a loss of precision due to rounding.
  for (i in seq(0, n-1)) {
    prob_no_collision <- prob_no_collision * (total - i) / total
  }
  1 - prob_no_collision

wch