Test dirichlet
Dirichlet model working, a bit ugly due to many functions
Moved test data to data