drsimonj

library(dplyr)

d <- data_frame(x = seq_len(100))
d
#> # A tibble: 100 x 1
#>        x
#>    <int>
#>  1     1
#>  2     2
#>  3     3

arcaravaggi

#From https://stackoverflow.com/questions/1401904/painless-way-to-install-a-new-version-of-r

# Run in the old version of R (or via RStudio)
setwd("C:/Temp/") 
packages <- installed.packages()[,"Package"] 
save(packages, file="Rpackages") 

# INSTALL NEW R VERSION
if(!require(installr)) { install.packages("installr"); require(installr)} #load / install+load installr
# See here for more on installr: https://www.r-statistics.com/2013/03/updating-r-from-r-on-windows-using-the-installr-package/  

zehnpaard

(ns simple-compojure.core
  (require
    [ring.adapter.jetty :refer [run-jetty]]
    [ring.middleware.params :as p]
    [simple-compojure.middleware :as m]
    [simple-compojure.routes :as r]
  ))

(def app
  (-> r/routes

clarle

library(dplyr)
library(tidyr)
library(lubridate)

# Parse data from HH:MM:SS format into something that can be used by `lubridate`
hours %>% 
  separate(Duration, into = c("hours", "minutes", "seconds"), sep = ":", convert = TRUE) %>% 
  summarize(total_time = duration(hour = sum(hours), minute = sum(minutes), second = sum(seconds)))

EderSantana

Code for Keras plays catch blog post

Train

python qlearn.py

Test

1. Generate figures

dewittpe

library(rmarkdown)
library(knitr)
render("eqn-numbering.Rmd")

mildlydiverting

Kim's Very Long and Boring Email Text File about File Versioning and Servers.

Hello all.

This is A Very Long and Boring Email Text File about File Versioning and Servers.

Please feel free to point and laugh, but this is all stuff that I've learnt the hard way, and that we should start to do as we get bigger. It doesn't take long for all this to become a habit; something you don't even think about doing. When it's working properly, it offloads a load of organisational stuff from your brain, too - which is nice, and what computers should help you do.

LeCoupa

// XPath CheatSheet
// To test XPath in your Chrome Debugger: $x('/html/body')
// http://www.jittuu.com/2012/2/14/Testing-XPath-In-Chrome/


// 0. XPath Examples.
// More: http://xpath.alephzarro.com/content/cheatsheet.html


'//hr[@class="edge" and position()=1]'                // every first hr of 'edge' class

tpope

inoremap <silent> <Bar>   <Bar><Esc>:call <SID>align()<CR>a

function! s:align()
  let p = '^\s*|\s.*\s|\s*$'
  if exists(':Tabularize') && getline('.') =~# '^\s*|' && (getline(line('.')-1) =~# p || getline(line('.')+1) =~# p)
    let column = strlen(substitute(getline('.')[0:col('.')],'[^|]','','g'))
    let position = strlen(matchstr(getline('.')[0:col('.')],'.*|\s*\zs.*'))
    Tabularize/|/l1
    normal! 0
    call search(repeat('[^|]*|',column).'\s\{-\}'.repeat('.',position),'ce',line('.'))