Skip to content

Instantly share code, notes, and snippets.

@jimbrig
jimbrig / Workbook.Module.txt
Last active May 6, 2025 16:46
GMH Data Model Workbook Module
// --- Workbook Module ---
// Module containing named range definitions for the GMH Data Model Workbook.
/**
* Get Sheet Names of Current Workbook
*/
Workbook.GetSheetNames = TRANSPOSE(SUBSTITUTE(GET.WORKBOOK(1), "[" & GET.WORKBOOK(16) & "]", ""));
/**
* Define SheetNames
@jimbrig
jimbrig / SQLTools.Module.txt
Last active May 6, 2025 16:44
GMH Data Model SQL Tools Module
// --- SQL Module ---
// Module containing Lambdas for generating SQL DDL Statements.
/**
* Generates SQL ENUM statements from header and values
*/
SQLEnum = LAMBDA(header_cell, values_range,
"CREATE TYPE ""survey""." & CHAR(34) & header_cell & CHAR(34) & " AS ENUM (" & CHAR(10) &
TEXTJOIN("," & CHAR(10), TRUE, " '" & FILTER(values_range, values_range <> "") & "'") & CHAR(10) &
");"
@jimbrig
jimbrig / AddressTools.Module.txt
Last active May 6, 2025 16:45
GMH Data Model Address Module
// --- AddressTools Module ---
// Module containing Lambdas for working with Addresses.
/*
* Extract the Street from an Address
*/
AddressStreet = LAMBDA(address, LEFT(address,FIND(",",address)-1));
/*
* Extract the City from an Adderss
@jimbrig
jimbrig / Address.Module.txt
Created May 6, 2025 16:40
GMH Data Model Excel Workbook Modules
/*
* Extract the Street from an Address
*/
AddressStreet = LAMBDA(address, LEFT(address,FIND(",",address)-1));
/*
* Extract the City from an Adderss
*/
AddressCity = LAMBDA(address, TRIM(MID(address,FIND(",",address)+1,FIND(",",address,FIND(",",address)+1)-FIND(",",address)-1)));
@jimbrig
jimbrig / SQL.txt
Last active May 1, 2025 16:22
SQLTools Excel Labs Module (LAMBDAs)
/**
* Generates SQL ENUM statements from header and values
*/
SQLEnum = LAMBDA(header_cell, values_range,
"CREATE TYPE ""survey""." & CHAR(34) & header_cell & CHAR(34) & " AS ENUM (" & CHAR(10) &
TEXTJOIN("," & CHAR(10), TRUE, " '" & FILTER(values_range, values_range <> "") & "'") & CHAR(10) &
");"
);
/**
@jimbrig
jimbrig / registry-optimizer.md
Created April 15, 2025 16:02 — forked from ruvnet/registry-optimizer.md
Ai powered windows 11 registry optimization
@jimbrig
jimbrig / README.md
Created March 14, 2025 17:58 — forked from disler/README.md
Use Meta Prompting to rapidly generate results in the GenAI Age

Meta Prompting

In the Generative AI Age your ability to generate prompts is your ability to generate results.

Guide

Claude 3.5 Sonnet and o1 series models are recommended for meta prompting.

Replace {{user-input}} with your own input to generate prompts.

Use mp_*.txt as example user-inputs to see how to generate high quality prompts.

@jimbrig
jimbrig / favicon_app.R
Created March 12, 2025 13:46 — forked from smach/favicon_app.R
R Shiny app to turn JPGs and PNGs into .ico favicon files. Written mostly by GPT o3-mini-high with help from Claude and Shiny Assistant (and me)
options(shiny.maxRequestSize = 5 * 1024^2) # Limit uploads to 5 MB
library(shiny)
library(magick)
library(base64enc)
library(bslib)
# Helper function to sanitize file names
safeFileName <- function(filename) {
gsub("[^a-zA-Z0-9_.-]", "_", filename)
@jimbrig
jimbrig / app_ollama.R
Created March 12, 2025 13:40 — forked from smach/app_ollama.R
Sample R Shiny app to run local models with an Ollama server. Coded mostly by various LLMs including Posit's Shiny Assistant
# This is a sample R Shiny app chatbot that runs local models with an Ollama server.
# You also need Ollama installed and a ollama server running, plus at least one local model pulled.
# I hard-coded a few local models,
# If you use this, you'll want to hard code yours (including descriptions, or take those out)
# Coded with lots of LLM help + Posit's Shiny Assistant.
library(shiny)
library(shinychat)
library(bslib)
@jimbrig
jimbrig / llm-diagram
Created March 11, 2025 17:19 — forked from david-diviny-nousgroup/llm-diagram
Generate a Mermaid.js diagram using LLM with elmer package to explain code
library(elmer)
library(tidyverse)
library(DiagrammeR)
library(glue)
code <- "starwars %>%
group_by(species) %>%
summarise(
n = n(),
mass = mean(mass, na.rm = TRUE)