# [R] Rounding fractional numbers to nearest fraction

Wed May 25 20:46:03 CEST 2005

```Thx for the help...

mdiv <- function(dec)
{
dec <- dec * 4
dec <- round(dec, 0)
dec <- dec / 4
dec
}

where m is a matrix --

m1 <- apply(m, 1, mdiv)

...but it looks like as.integer(x.1*4)/4 or (round(x.1*4,0))/4 might be
easier...

thx again,
ken

>From: james.holtman at convergys.com
>To: "Ken Termiso" <jerk_alert at hotmail.com>
>Subject: Re: [R] Rounding fractional numbers to nearest fraction
>Date: Wed, 25 May 2005 14:30:44 -0400
>
>
>
>
>
> > x.1
>  [1] 1.07 1.11 1.27 1.59 0.97 0.76 2.23 0.98 0.71 0.88 1.19 1.02
> > as.integer(x.1*4)/4
>  [1] 1.00 1.00 1.25 1.50 0.75 0.75 2.00 0.75 0.50 0.75 1.00 1.00
> >
>
>Jim
>__________________________________________________________
>James Holtman        "What is the problem you are trying to solve?"
>Executive Technical Consultant  --  Convergys Labs
>james.holtman at convergys.com
>+1 (513) 723-2929
>
>
>
>                       "Ken Termiso"
>r-help at stat.math.ethz.ch
>                       om>                          cc:
>                       Sent by:                     Subject:  [R] Rounding
>fractional numbers to nearest fraction
>                       r-help-bounces at stat.m
>                       ath.ethz.ch
>
>
>                       05/25/2005 13:27
>
>
>
>
>
>Hi all,
>
>I've got a matrix of fractional data that is all positive and greater than
>zero that I would like to "loosely" classify, for lack of a better word. It
>
>looks something like this :
>
>1.07   1.11   1.27   1.59   0.97   0.76
>2.23   0.98   0.71   0.88   1.19   1.02
>
>
>What I'm looking for is a way to round these numbers to the nearest 0.25,
>i.e. the above matrix would be transformed to :
>
>1.00   1.00   1.25   1.50   1.00   0.75
>2.25   1.00   0.75   1.00   1.25   1.00
>
>
>Anyone have a clever way to do this??
>
>Ken
>
>______________________________________________
>R-help at stat.math.ethz.ch mailing list
>https://stat.ethz.ch/mailman/listinfo/r-help