Skip to content

Instantly share code, notes, and snippets.

View jtilly's full-sized avatar

Jan Tilly jtilly

93 followers · 9 following
View GitHub Profile
@jtilly
jtilly / install-gcc-4.9.3.sh
Last active April 11, 2024 07:28
Install GCC 4.9.3
#!/bin/bash
# this script installs GCC 4.9.3
# to use it navigate to your home directory and type:
# sh install-gcc-4.9.3.sh
# download and install gcc 4.9.3
wget https://ftp.gnu.org/gnu/gcc/gcc-4.9.3/gcc-4.9.3.tar.gz
tar xzf gcc-4.9.3.tar.gz
cd gcc-4.9.3
@jtilly
jtilly / print_graph.R
Created April 10, 2016 21:27
Print graphs to screen and save them as Tikz or PDF
print_graph = function(g, type = NULL, filename = NULL, height = 6, width = 6, path = ifelse(type == "tikz", "tex", "pdf")) {
print(g)
if(!is.null(type)) {
if(type == "tikz") {
tikz(paste0(path, "/", filename), height = height, width = width)
print(g)
dev.off()
@jtilly
jtilly / install_r.sh
Last active June 16, 2016 17:57
Install R and libcurl from source
# This script installs libcurl and R 3.3.0 on a linux server
# when you can't use apt-get. Note that libcurl is a requirement
# for R 3.3.0
# also see: http://pj.freefaculty.org/blog/?p=315
export PATH=$HOME/packages/bin:$PATH
export LD_LIBRARY_PATH=$HOME/packages/lib:$LD_LIBRARY_PATH
export CFLAGS="-I$HOME/packages/include"
export LDFLAGS="-L$HOME/packages/lib"
@jtilly
jtilly / time
Created May 30, 2016 14:07
Check memory usage
alias time='/usr/bin/time -f "\nCPU: %Us\tReal: %es\tRAM: %MKB"'
@jtilly
jtilly / build-latex.sh
Last active August 30, 2016 15:03
Continuously build tex file
#!/bin/bash
latexmk -pdf -pvc $1
@jtilly
jtilly / image-only-pdf.sh
Created November 9, 2016 20:37
Convert a searchable PDF to an image only PDF using imagemagick
#!/bin/bash
convert -density 300 $1 /tmp/page_%04d.jpg
convert /tmp/page_*.jpg $2
rm /tmp/page_*.jpg
@jtilly
jtilly / robust_mixture.R
Created November 28, 2016 21:31
Use log/exp transformation to make the log likelihood computation of a simple mixture model more robust.
# making mixture models numerically robust
set.seed(4)
rm(list = ls())
nobs = 1000
alpha = 0.1
p = runif(nobs, min = 0.0, max = 1.0)
q = runif(nobs, min = 0.0, max = 1.0)
# naive computation of log-likelihood contribution
@jtilly
jtilly / timer.h
Created November 29, 2016 16:00
Simple C++ Profiler Class
// timer.h
#include <iostream>
#include <sstream>
#ifndef timer_h
#define timer_h
class timer {
private:
@jtilly
jtilly / print_mat.h
Created November 29, 2016 17:38
Simple helper function to print armadillo matrices
#ifndef print_mat_h
#define print_mat_h
void print_mat(arma::mat my_matrix) {
uint cols = my_matrix.n_cols;
uint rows = my_matrix.n_rows;
Rcout << "--------\n";
for(uint rX = 0; rX < rows; rX++) {
@jtilly
jtilly / textmessage.R
Last active January 6, 2017 20:55
rm(list = ls())
dict.orig = unique(readLines("https://raw.githubusercontent.com/first20hours/google-10000-english/master/google-10000-english.txt"))
txt2numeric = function(word.orig, return.orig = TRUE) {
word = tolower(word.orig)
word = gsub("([^a-z]){1}", 1, word)
word = gsub("(a|b|c){1}", 2, word)
word = gsub("(d|e|f){1}", 3, word)
word = gsub("(g|h|i){1}", 4, word)