felixr

#!/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

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

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
}