WIP: Output statistics
Update R scripts
Add Real Time Statistics