reproduce.R - bug fixes