0.1)
[1] FALSE
И кажется, функция seq имеет какие-то проблемы с числами с плавающей запятой.
> x <- seq(0.05, 1.95, 0.1)
> x[10]
[1] 0.95
>
> library(digest)
>
> digest(x[10])
[1] "e4c65d352492aac0fc9465bd289834fd"
> digest(0.95)
[1] "dbdf59f2a27281f9ac38e2e9f8bd3127"
>
> x[10] == 0.95
[1] FALSE
>
> x2 <- seq(0, 15, 1)
> x2[11]
[1] 10
>
> digest(x2[11])
[1] "2522027d230e3dfe02d8b6eba1fd73e1"
> digest(10)
[1] "2522027d230e3dfe02d8b6eba1fd73e1"
>
> x2[11] == 10
[1] TRUE
Кто-нибудь может рассказать что-то про внутренности seq?
Кажется это было в первой главе R Inferno
Обсуждают сегодня