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:
| #!/usr/bin/env Rscript | |
| # License: CC0 (just be nice and point others to where you got this) | |
| # Author: Robert M Flight <[email protected]>, 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 |
| 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() |
I hereby claim:
To claim this, I am signing this object:
| # 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!!! |
| # (c) 2018 Facundo Muñoz | |
| # Latex Makefile using latexmk | |
| # Modified by Dogukan Cagatay <[email protected]> | |
| # 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$} |
| ## 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))) |
| ## 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() |
| ### 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 |