Expokit in R