atg. all tests green, on translating to R