Skip to content

Instantly share code, notes, and snippets.

View famuvie's full-sized avatar

Facundo Muñoz famuvie

View GitHub Profile
@famuvie
famuvie / post-commit
Last active April 11, 2019 14:39 — forked from rmflight/post-commit
useful commit hooks for R package dev
#!/usr/bin/env Rscript
# License: CC0 (just be nice and point others to where you got this)
# Author: Robert M Flight <rflight79@gmail.com>, github.com/rmflight
#
# This is a post-commit hook that after a successful commit subsequently increments the package version in DESCRIPTION
# and commits that. Analogous to the pre-commit at https://gist.github.com/rmflight/8863882, but useful if you only have
# good reasons for not doing it on the pre-commit.
#
# To install it, simply copy this into the ".git/hooks/post-commit" file of your git repo, change /path/2/Rscript, and make
@famuvie
famuvie / ocr.R
Created January 31, 2018 10:05
OCR from R
library(magick)
library(magrittr)
url <- "https://pbs.twimg.com/media/DU1X5-fUMAE1CAX.jpg"
text <-
image_read(url) %>%
image_resize("2000") %>%
image_convert(colorspace = 'gray') %>%
image_trim() %>%
image_ocr()

Keybase proof

I hereby claim:

  • I am famuvie on github.
  • I am famuvie (https://keybase.io/famuvie) on keybase.
  • I have a public key ASAjE_sCXLWyfcBq4VUZDqHGu-RvEoFHeAq99jZR_ip0Pgo

To claim this, I am signing this object:

@famuvie
famuvie / multilevel_inla_lmer_stan.R
Created December 12, 2017 15:50
Multilevel models with lme4 and INLA (and Stan)
# Comparison estimations of multi-level models between lme4 and INLA
# inspired by question in the r-inla group:
# https://groups.google.com/forum/#!topic/r-inla-discussion-group/tmNdcYQ6KHk
pacman::p_load(INLA, lme4, tidyverse, broom, GGally)
sleepstudy %>%
ggplot(aes(Days, Reaction, color = Subject)) +
geom_point()
#!/bin/bash
TODAY=`date +%Y-%m-%d`
TODAY_MD=`date +%B\ %d,\ %Y`
YEAR=`date +%Y`
PROJECT=$1
##
## CHANGE ME!!!
@famuvie
famuvie / Makefile
Last active February 22, 2021 08:51 — forked from dogukancagatay/Makefile
generic Makefile using latexmk and/or pandoc
# (c) 2018 Facundo Muñoz
# Latex Makefile using latexmk
# Modified by Dogukan Cagatay <dcagatay@gmail.com>
# Originally from : http://tex.stackexchange.com/a/40759
# Modified for compilation of Markdown files with ideas from
# http://plain-text.co/pull-it-together.html
## What extension (e.g. md, markdown, mdown) is being used
## for markdown files MEXT = md
MEXT = md
$if(abstract)$
%TC:envir abstract [] ignore
$endif$
$if(arara)$
$for(arara)$
% arara: $arara$
$endfor$
$endif$
\RequirePackage{fixltx2e}
\documentclass[$if(fontsize)$$fontsize$,$endif$$if(papersize)$$papersize$$else$a4paper,$endif$$for(classoption)$$classoption$$sep$,$endfor$]{$documentclass$}
@famuvie
famuvie / use_install_libs.R
Created October 22, 2015 12:33
Use of install.libs.R in an R package
## Create a minimal buildable package
library(devtools)
create('testpkg')
## Write src/install.libs.R
dir.create('testpkg/src')
test.file <- path.expand('~/testfile.txt')
diag.lines <- c(
deparse(quote(stop('This should break the installation'))),
deparse(quote(file.create(test.file)))
@famuvie
famuvie / grec_scrape.R
Created March 20, 2015 10:16
Script para extraer datos de GREC (UV)
## Script de ejemplo para descargar datos de GREC (University of Valencia)
## Facundo Muñoz, 2015
## Setup
# install.packages(rvest)
# install.packages('RSelenium')
library(rvest)
library('RSelenium')
checkForServer()
startServer()
@famuvie
famuvie / ggplot-marginals_Wishart.R
Created December 2, 2014 12:15
Plotting the marginal prior distributions for the elements of an Inverse-Wishart matrix
### Plotting the marginal prior distributions for the elements of
### an Inverse-Wishart matrix
library(MCMCpack) # Wishart distribution
library(actuar) # inverse gamma distribution
library(ggplot2)
## Hyperparameters of the inverse-Wishart prior
Phi <- matrix(c(1,.3,.3,2),2,2) # Scale matrix
nu <- 5 # Degrees of Freedom