identical
- это «безопасный и надежный способ проверки двух объектов на соответствие точно ». ncol(dpx) - 1
возвращает числовой вектор, так как 1
является числовым, а length возвращает целое число.
Как указал @amatsuo_net, мы могли бы немного изменить код и преобразовать 1
в тип integer.
identical((ncol(iris) + 1L - 1L), length(iris))
# [1] TRUE