jeroen

# Globals
repos <- 'https://cloud.r-project.org'
pkgdata <- available.packages(repos = repos)
pkgs <- row.names(pkgdata)

# On success
make_callback <- function(i, url){
  function(res){
    if(res$status == 200){
      buf <- rawConnection(res$content)

oinopion

-- Create a group
CREATE ROLE readaccess;

-- Grant access to existing tables
GRANT USAGE ON SCHEMA public TO readaccess;
GRANT SELECT ON ALL TABLES IN SCHEMA public TO readaccess;

-- Grant access to future tables
ALTER DEFAULT PRIVILEGES IN SCHEMA public GRANT SELECT ON TABLES TO readaccess;

cecilemuller

How to setup Let's Encrypt for Nginx on Ubuntu 18.04 (including IPv6, HTTP/2 and A+ SLL rating)

---

Virtual hosts

Let's say you want to host domains first.com and second.com.

Create folders for their files:

xiaodaigh

library(shiny)



shinyServer(function(input, output, session) {
  
  # Partial example
  output$meh <- renderPrint({
    print("Press enter or focusout to update --- ")
    print(input$myTextInput )