Claude Code uses prompt caching automatically. The default TTL is 5 minutes, with an optional extended 1-hour cache available at extra cost.
To disable:
DISABLE_PROMPT_CACHING=1 # Disables all caching
DISABLE_PROMPT_CACHING_SONNET=1 # Per-model variants also available
| #!/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 | |
| # | |
| # Source: https://gist.github.com/gadenbuie/7bb14b245a45e08173e54bc75ec38790 | |
| set -e |
| #!/usr/bin/env bash | |
| # | |
| # Source: https://gist.github.com/gadenbuie/6a9d1b8088f6bc9154b6c534896bbd25 | |
| set -e | |
| # ============================================================================== | |
| # Color and formatting setup (respects NO_COLOR) | |
| # ============================================================================== |
| # Install and load required packages | |
| # install.packages("gh") | |
| library(gh) | |
| library(dplyr) | |
| library(purrr) | |
| # Get all contributors to a GitHub repository | |
| get_repo_contributors <- function(owner, repo) { | |
| contributors <- gh::gh( | |
| "GET /repos/{owner}/{repo}/contributors", |
| library(shiny) | |
| library(bslib) | |
| library(dplyr) | |
| library(ggplot2) | |
| # Sample cow data | |
| cow_data <- data.frame( | |
| name = c("Bessie", "Daisy", "Buttercup", "Molly", "Clover", "Rosie", "Bella", "Penny", "Lulu", "Mabel"), | |
| breed = c("Holstein", "Jersey", "Angus", "Hereford", "Guernsey", "Simmental", "Holstein", "Jersey", "Angus", "Guernsey"), | |
| milk_per_day = c(28, 25, 0, 0, 27, 0, 30, 24, 0, 26), |
| library(dplyr) | |
| remotes <- gert::git_remote_list() | |
| remotes |> | |
| mutate( | |
| url = sub("git@github.com:", "https://github.com/", url, fixed = TRUE), | |
| url = sub(".git", "", url, fixed = TRUE) | |
| ) |> | |
| purrr::pwalk(function(name, url) { |
| alias_input_from_shiny <- function( | |
| input = "actionLink", | |
| update = NULL, | |
| new_input = NULL, | |
| new_update = NULL | |
| ) { | |
| if (is.null(update)) { | |
| update <- paste0("update", toupper(substr(input, 1, 1)), substring(input, 2)) | |
| } |
| [ | |
| { | |
| "name": "les Escaldes", | |
| "state": "Escaldes-Engordany", | |
| "country": "Andorra", | |
| "latitude": 42.5073, | |
| "longitude": 1.5341, | |
| "timezone": "Europe/Andorra" | |
| }, | |
| { |
library(tidyverse)
library(RSocrata)
library(glue)
library(gt)The NWSS Public SARS-CoV-2 Wastewater Metric Data is sourced from https://data.cdc.gov/Public-Health-Surveillance/NWSS-Public-SARS-CoV-2-Wastewater-Metric-Data/2ew6-ywp6.
| #! /usr/bin/env Rscript | |
| if (!requireNamespace("rlang", quietly = TRUE)) { | |
| stop("`utpr` requires `{usethis}`: install.packages('usethis')") | |
| } | |
| rlang::check_installed(c("usethis", "cli", "docopt")) | |
| ' | |
| A command-line wrapper for `pr_*` helper functions from {usethis}. |