Forward sim complete, but not compiled
foreq integration with R