Skip to content

Instantly share code, notes, and snippets.

Felix Riedel felixr

Block or report user

Report or block felixr

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
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.