lopspower

Hexadecimal color code for transparency

How to set transparency with hex value ?

For example, you want to set 40% alpha transparence to #000000 (black color), you need to add 66 like this #66000000.

Download This sample on Google Play Store

parmentf

Inspired by dannyfritz/commit-message-emoji

See also gitmoji.

Commit type	Emoji
Initial commit	🎉 :tada:
Version tag	🔖 :bookmark:
New feature	✨ :sparkles:
Bugfix	🐛 :bug:

tylermorganwall

library(geojsonsf)
library(sf)
library(rayrender)

#Data source: https://github.com/telegeography/www.submarinecablemap.com
cables = geojson_sf("cable-geo.json")

cablescene = list()
counter = 1
for(i in 1:length(cables$geometry)) {

joshua-feldman

# Load the relevant packages
library(NCmisc)
library(stringr)

# Load the script and parse lines
file_name <- "example_script.R"
file_lines <- readLines(file_name)

# Save the function and package names
functions_list <- list.functions.in.file(file_name)

jsta

#' Download files from Zenodo record id
#' 
#' @param record_id record id
#' @param dest_folder destination folder for file downloads
#' @param token API key
#' 
#' @details https://github.com/zenodo/zenodo/issues/1629#issuecomment-435062462
#' 
#' @importFrom httr GET content
#' @importFrom jsonlite fromJSON

fzenoni

# Download earth data first
# https://www.naturalearthdata.com/http//www.naturalearthdata.com/download/110m/physical/ne_110m_land.zip

library(sf)
library(lwgeom)
library(dplyr)
library(ggplot2)
library(mapview)

# Read the data

steveharoz

library(tidyverse)
library(ggdist)

# make some data
expand_grid(
  condition = c("A", "B"),
  stimulus = seq(-3,3,0.3),
  repetitions = 1:20
) %>%
  # make some noisy response data

davidsjoberg

library(tidyverse)
library(ggsankey)

## data via https://ourworldindata.org/grapher/total-agricultural-area-over-the-long-term
hablar::set_wd_to_script_path()


df <-
  read_csv("total-agricultural-area-over-the-long-term.csv") %>%
  janitor::clean_names() %>%

maartenzam

Porting Jon Schwabish's World Tile Grid Map to ggplot2.

friep

---
title: "DKB Export Cleanup"
author: "Frie"
date: "10/10/2020"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
library(purrr)