Skip to content

Instantly share code, notes, and snippets.

View alekrutkowski's full-sized avatar

Alek Rutkowski alekrutkowski

17 followers · 18 following
View GitHub Profile
@alekrutkowski
alekrutkowski / README.md
Last active October 22, 2026 09:08
Generator of a shiny app from a data.table -- time-series explorer; USE R PACKAGE https://github.com/alekrutkowski/tsShinyApp INSTEAD

write_ts_shiny_app

write_ts_shiny_app() generates a ready-to-run Shiny time-series explorer from a data.table.

Given a suitable input data.table, the function creates:

my-ts-app/
├── app.R
└── data.rds
@alekrutkowski
alekrutkowski / clipboard_to_qr.ps1
Created August 24, 2026 11:42
Windows clipboard contents ➜ QR code (SVG)
# clipboard-qr-v5.ps1
#
# Self-contained clipboard-to-QR utility for PowerShell 7 on Windows.
# No modules, package repositories, proxy access, or network connection needed.
#
# The QR encoder is implemented directly in this script and writes an SVG file.
# It uses QR Code Model 2, byte mode with UTF-8 ECI, error-correction level L,
# and mask pattern 0.
# Made by GPT-5.6 Extra High
@alekrutkowski
alekrutkowski / examples.md
Last active July 2, 2026 14:56
R functions for translating 3D functions or 3D points into ASCII STL code (https://docs.github.com/en/get-started/writing-on-github/working-with-advanced-formatting/creating-diagrams#creating-stl-3d-models)

Visualising a function

f <- function(x, y) {
  r <- sqrt(x^2 + y^2)
  ifelse(r == 0, 10, 10*sin(r) / r)
}

stl_md_surface <- functionToSTL(
 f,
@alekrutkowski
alekrutkowski / build_windows_binary.R
Created June 23, 2026 07:59
R function to compile a tar.gz source R package into a zip compiled/binary R windows package
build_windows_binary <- function(src_tar_gz,
out_dir = dirname(normalizePath(src_tar_gz, winslash = "/", mustWork = TRUE)),
lib = file.path(tempdir(), "r-win-bin-lib"),
install_deps = FALSE,
dep_fields = c("Depends", "Imports", "LinkingTo"),
repos = {
r <- getOption("repos")
if (is.null(r) || identical(unname(r["CRAN"]), "@CRAN@")) {
c(CRAN = "https://cloud.r-project.org")
} else {
@alekrutkowski
alekrutkowski / Show-SelectizeDialog.ps1
Last active June 11, 2026 18:17
Show-SelectizeDialog PowerShell Function – inspired by selectize.js
# For usage instructions scroll down
function Show-SelectizeDialog {
[CmdletBinding()]
param(
[Parameter(Mandatory)]
[AllowEmptyCollection()]
[object[]] $Items,
[string] $DisplayProperty,
@alekrutkowski
alekrutkowski / monty_hall.md
Created April 24, 2026 15:16
Monty Hall problem simulation in R
@alekrutkowski
alekrutkowski / lambdas.md
Last active April 14, 2026 08:21
Useful Excel lambda functions

See also https://github.com/alekrutkowski/ExcelLambdaTools

Convert 1-column range monthly dates in the format yyyy-mm, e.g. 2023-11, to 2-column range:

  • 1st column: year number if it's January, otherwise empty
  • 2nd column: the 3-character month code, e.g. "Nov"
=LAMBDA(rng,
 LET(
@alekrutkowski
alekrutkowski / R_logo.txt
Last active January 16, 2026 10:14
R language logo (https://www.r-project.org/logo/) as ASCII art
###############
#####################################
##################################################
########################################################
############################ ###############
##################### ##########
################### #######
################# ################################### ######
################# ###################################### #####
############### ####################################### #####
@alekrutkowski
alekrutkowski / _README.md
Last active November 7, 2025 10:50
Chrome/Edge addon/extension to translate the current web page to a pre-set language when the addon's icon is clicked
@alekrutkowski
alekrutkowski / app.R
Created November 6, 2025 15:05
R/Shiny app similar to Google Translate whole page translation (when you paste a URL)
#### Prerequisites -- in Linux terminal:
# Once:
# pipx install libretranslate
# Run in the background:
# libretranslate
#### Test:
# Open the following page in a web browser
# (but first modify your.shiny-server.domain and your_translate_app_name):
# https://your.shiny-server.domain/your_translate_app_name/?url=https://example.com/&from=en&to=fr