Update Two-way tables.R