simplified extents().R