> x<-1:3
> typeof(x)
[1] "integer"
> y<-c(1,3,4)
> typeof(y)
[1] "double"
> x==y
[1] TRUE FALSE FALSE
> all(x==y)
[1] FALSE
--------------------------------------------
> x<-1:3
> typeof(x)
[1] "integer"
> y<-c(1,2,3)
> typeof(y)
[1] "double"
> x==y
[1] TRUE TRUE TRUE
> all(x==y)
[1] TRUE
> identical(x,y) #判断2个对象是否完全一样
[1] FALSE