gadenbuie

library(dplyr)

remotes <- gert::git_remote_list()

remotes |> 
  mutate(
    url = sub("[email protected]:", "https://github.com/", url, fixed = TRUE),
    url = sub(".git", "", url, fixed = TRUE)
  ) |> 
  purrr::pwalk(function(name, url) {

gadenbuie

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))
  }

gadenbuie

[
  {
    "name": "les Escaldes",
    "state": "Escaldes-Engordany",
    "country": "Andorra",
    "latitude": 42.5073,
    "longitude": 1.5341,
    "timezone": "Europe/Andorra"
  },
  {

gadenbuie

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.

gadenbuie

#! /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}.

gadenbuie

library(tidyverse)

bsf <- pkgnet::FunctionReporter$new()
bsf$set_package("bslib")
bsf$calculate_default_measures()

bslib_fns <-

gadenbuie

# https://shiny.posit.co/blog/posts/bslib-dashboards/#hello-dashboards

library(shiny)
library(bslib)
library(ggplot2)


# Setup -------------------------------------------------------------------

data(penguins, package = "palmerpenguins")

gadenbuie

Installing package into ‘/Users/garrick/Library/R/arm64/4.3/library’
(as ‘lib’ is unspecified)
trying URL 'https://cran.rstudio.com/src/contrib/httpuv_1.6.10.tar.gz'
Content type 'application/x-gzip' length 1875497 bytes (1.8 MB)
==================================================
downloaded 1.8 MB

* installing *source* package ‘httpuv’ ...
** package ‘httpuv’ successfully unpacked and MD5 sums checked
** using staged installation

gadenbuie

---
title: Reading a YAML chunk
output: github_document
---

Here's a simple YAML chunk (with the label `config`):

```{yaml config}
default:
  user: "garrick"

gadenbuie

#!/usr/bin/env -S Rscript --vanilla

rlang::check_installed(c("docopt", "pkgdown", "servr", "fs", "pkgload"))

'usage:
  pkgdown-watch [--port=<port> --rebuild --no-sound]
  pkgdown-watch -h | --help

options:
 --port=<port> Port to use for the server [default: 4323]