mberman84

import os
import autogen
import memgpt.autogen.memgpt_agent as memgpt_autogen
import memgpt.autogen.interface as autogen_interface 
import memgpt.agent as agent
import memgpt.system as system
import memgpt.utils as utils
import memgpt.presets as presets
import memgpt.constants as constants
import memgpt.personas.personas as personas

krisjan-oldekamp

-- Author: Krisjan Oldekamp
-- https://stacktonic.com/article/create-a-user-mapping-table-based-on-the-google-analytics-4-big-query-dataset

declare lookback_window int64 default 90; -- how many days to lookback into the dataset to search for ids (compared to today)

-- udf: deduplicate array of struct 
create temp function dedup(arr any type) as ((
    select 
        array_agg(t)
    from (

datawookie

https://github.com/muan/unicode-emoji-json

° — degree
× — times

💣 — bomb
💥 — explosion
🔥 — fire
🎉 — tada
🧯 — fire extinguisher

krlmlr

# Add this to your .Rprofile
options(
  error = quote(rlang::entrace()), 
  rlang__backtrace_on_error = "collapse" # or "branch" or "full"
)

DavisVaughan

# This example demonstrates running furrr code distributed on 2 AWS instances ("nodes").

# The instances have already been created.

library(future)
library(furrr)

# Two t2.micro AWS instances
# Created from http://www.louisaslett.com/RStudio_AMI/
public_ip <- c("34.205.155.182", "34.201.26.217")

Bilka2

import requests # dependency

url = "<your url>" # webhook url, from here: https://i.imgur.com/f9XnAew.png

# for all params, see https://discordapp.com/developers/docs/resources/webhook#execute-webhook
data = {
    "content" : "message content",
    "username" : "custom username"
}

thomasp85

library(tidygraph)
library(particles)
library(jsonlite)
library(magick)

# Prepare text polygons
text <- read_json('text.json')
par_text <- text$layers[[3]]$paths
on_text <- text$layers[[2]]$paths
cran_text <- text$layers[[1]]$paths

raymondben

library(googleAuthR)
library(shiny)
library(shinyjs)

SiegHartR

library(httr)
library(XML)
library(googleAnalyticsR)
library(googleAuthR)

gwt_site_url <- "https://www.example.co.uk/"

html <- GET(gwt_site_url)

doc <- htmlParse(html)

mwhitaker

---
title: "Host image files on Google Cloud storage"
author: "Michael Whitaker"
date: "January 12, 2017"
output:
    html_document:
        self_contained: false
---

```{r setup, include=FALSE}