关于R中判断整数的语句

17012

收藏 2016-04-06

在R的命令窗口里输入?is.integer
在帮助页面可以看到关于它的简介，按照一般的理解这应该是判断一个object是否为整数啊，可是帮助文件中也提到，若输入is.integer(1),则返回false，并且之后定义了新的函数
is.wholenumber <-
function(x, tol = .Machine$double.eps^0.5) abs(x - round(x)) < tol

依次来判断是不是整数，这是为什么呢？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

jiangbeilu

2016-4-6 21:55:54

复制代码

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

jinkelazzz

2016-4-7 09:30:08

这是判断整形变量而不是整数的。
> x<-1:5
> y<-c(1,2,3,4,5)
> is.integer(x)
[1] TRUE
> is.integer(y)
[1] FALSE

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

雾锁山城

2016-4-7 09:37:06

极限思想，两个数相减小于很小的数，就认为两个数是相等，round(x)是整数，以此判断x是否为整数

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

Mutually_Sincer

2016-4-7 09:54:53

jinkelazzz 发表于 2016-4-7 09:30
这是判断整形变量而不是整数的。
> x y is.integer(x)
[1] TRUE

嗯，的确是这样，按照你说的方法定义了x,y之后，x的类型显示为integer，而y的类型为numeric，但它们的内容其实是一样的，那么整型变量和数值型变量的区别在哪里？仅仅是说，数值形向量可以有类似y<-c(0.1,0.2,0.3)的小数定义吗？

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

Mutually_Sincer

2016-4-7 09:55:29

雾锁山城发表于 2016-4-7 09:37
极限思想，两个数相减小于很小的数，就认为两个数是相等，round(x)是整数，以此判断x是否为整数

嗯~受教了，多谢！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

点击查看更多内容…

jinkelazzz

2016-4-7 09:56:38

Mutually_Sincer 发表于 2016-4-7 09:54
嗯，的确是这样，按照你说的方法定义了x,y之后，x的类型显示为integer，而y的类型为numeric，但它们的内容 ...

整形变量占内存少，运算速度更快

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

Mutually_Sincer

2016-4-7 10:09:14

jinkelazzz 发表于 2016-4-7 09:56
整形变量占内存少，运算速度更快

感谢！！！！！！

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

593352826

2016-4-7 14:00:27

trunc(x)-x ！=0则表示非整数

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

lzcllyt

2016-4-7 18:19:21

也可以用 x/floor(x)==0来判断，不过x在0到1时会报错而且不适用与负数就是了。。。
不过也可以分段处理，就是麻烦了点

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

Mutually_Sincer

2016-4-7 18:56:48

593352826 发表于 2016-4-7 14:00
trunc(x)-x ！=0则表示非整数

谢谢热心回复

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

Mutually_Sincer

2016-4-7 18:57:23

lzcllyt 发表于 2016-4-7 18:19
也可以用 x/floor(x)==0来判断，不过x在0到1时会报错而且不适用与负数就是了。。。
不过也可以分段处理，就 ...

谢谢热心回复

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

wangfs111222

2016-4-7 19:48:43

大致相等用all.equal 就可以，里面有参数可以设置的。

Some more examples of using all.equal instead of == (the last example is supposed to show that this will correctly show differences).

> 0.1+0.05==0.15
[1] FALSE
> isTRUE(all.equal(0.1+0.05, 0.15))
[1] TRUE
> 1-0.1-0.1-0.1==0.7
[1] FALSE
> isTRUE(all.equal(1-0.1-0.1-0.1, 0.7))
[1] TRUE
> 0.3/0.1 == 3
[1] FALSE
> isTRUE(all.equal(0.3/0.1, 3))
[1] TRUE
> 0.1+0.1==0.15
[1] FALSE
> isTRUE(all.equal(0.1+0.1, 0.15))
[1] FALSE

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

z470890195

2019-3-28 20:09:10

可以用 x==round(x,0)来判断是否是整数，TRUE就是整数，FALSE就不是

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群