Skip to content

Instantly share code, notes, and snippets.

View rotating-indicator.sh
#!/bin/bash
# Create animated gif by rotating a GIF
ORIG=$1
i=100
for deg in `seq 0 30 330 | xargs`; do
i=`expr $i + 1`
convert ${ORIG} \( +clone -background none -rotate $deg \) -gravity center -compose Src -composite loading_$i.gif
done
@felixr
felixr / lwpr-rdyncall.r
Created May 12, 2013
Locally Weighted Projection Regression (LWPR) using rdyncall and the LWPR C library
View lwpr-rdyncall.r
library(rdyncall)
dynbind("lwpr", "
lwpr_init_model(*<LWPR_Model>iiZ)i;
lwpr_duplicate_mode(*<LWPR_Model>*<LWPR_Model>)i;
lwpr_set_init_alpha(*<LWPR_Model>d)i;
lwpr_set_init_D(*<LWPR_Model>*dd)i;
lwpr_set_init_D_diagonal(*<LWPR_Model>*d)i;
lwpr_set_init_D_spherical(*<LWPR_Model>d)i;
lwpr_update(*<LWPR_Model>*d*d*d*d)i;
@felixr
felixr / rtags.awk
Created Jul 31, 2012
Generate ctags for R scripts
View rtags.awk
function addtag(name, lnum, line, kind)
{
# Change all occurences of "/" to "\/" and "\" to "\\"
gsub(/\\/,"\\\\",line)
gsub(/\//,"\\/",line)
tag[name] = FILENAME "\t/^" line "$/;\"\t" kind "\tline:" lnum
}
You can’t perform that action at this time.