I have a specific need to "transform" a number in R. As an example,

A "floor" operation behave as:

```
138  -> 100
1233 -> 1000

```

A "ceiling" operation behave as:

```
138  -> 200
1233 -> 2000

```

Is there an easy way to accomplish this in R? thanks