Using The Offset Function In R