[求助]lisp有没有类似EXCEL的向上取整函数?

jaminth

roundup(3.2,0)

=4

竹天

向上取整，考虑了整数与正负数

1. (if (= (fix n) n)
   
2.         n
   
3.         (if  (< (fix n) 0)
   
4.                 (- (fix n) 1)
   
5.                 (1+ (fix n))
   
6.         )
   
7. )

(if (= (fix n) n)<br />         n<br />         (if  (< (fix n) 0)<br />                 (- (fix n) 1)<br />                 (1+ (fix n))<br />         )<br /> )

示例：
-3.2 ——> -4
-2 ——> -2
3.2 ——> 4

love_cq

不错的帖子，学习了。

piao1887

(1+ FIX(3.2))

highflybird

楼上的不对

应该是

(if (= (fix x) x)

  x

  (1+ (fix x))

)

piao1887

(FIX NUMBER) 

功能及参数

    此函数将返回number的整型数值, number可以是整型数也可是实型数。若为整型数, 则返回值为一整型数。number若为实型数, 则返回值将是去掉小数部分后的整型数。

此函数不会四舍五入 所以没必要用条件选择

liu_kunlun

(fix (+ n 0.5))

highflybird

piao1887发表于2010-7-29 15:08:00(FIX NUMBER)  功能及参数     此函数将返回number的整型数值, number可以是整型数也可是实型数。若为整型数, 则返回值为一整型数。number若为实型数, 则返回值将是去掉

如果楼主的问题跟下面的意思一样：

急！！Excel中，如何将一个小数向上取整为最接近的整数?并且,源数据为整数的保持不变.

悬赏分：10 - 解决时间：2006-6-26 22:15

如:7.25取整为8,2.8取整为3,6取整为6. 

那么必然要用条件判断。所以要用if.

我猜测楼主的意思就是ROUNDUP(A1,0)或者天花板函数ceiling.而不是四舍五入

Ciger

liu_kunlun 发表于 2010-7-29 17:02
(fix (+ n 0.5))

这个写法觉得非常好，谢谢

打铁还需自身硬

piao1887 发表于 2010-7-29 10:52
(1+ FIX(3.2))

如果 原数据是个整数  比如3 ，算出来不就变 4了？
我觉得还是3楼板凳说的对

打铁还需自身硬

Ciger 发表于 2013-8-20 16:18
这个写法觉得非常好，谢谢

这个写法是 四舍五入的 不是向上取整的

陈宫在家吗

liu_kunlun 发表于 2010-7-29 17:02
(fix (+ n 0.5))

这个四舍五入挺好，但是负数就不行了。