Было бы глупо перекодировать `dim` для возврата` length`, если `dim (x) == NULL`?

Question

Как указано в this question и обильной официальной документации & неофициальной R,

x <- complex(15) 
dim(x) == NULL 

Для меня это раздражает, чтобы писать отдельный метод (или if положения) для атомных векторов, а не быть в состоянии использовать dim(x)[1]. Было бы глупо перекодировать dim (примитив), чтобы он автоматически возвращал length, если dim(x)==NULL?

Чтобы быть более конкретным: будут ли популярные пакеты сломаться, если я перекодирую dim, скажем, мой .Rprofile? Это глупо по другой причине, которую я не вижу?

Answer 1

Непонятно, что вы пытаетесь сделать, но функции NROW и NCOL - это способы извлечения экстентов в аспекте-агностик. Они обрабатывают векторы как векторы столбцов, поэтому NROW(X) совпадает с length(x) и NCOL(x) равно 1, когда x - вектор.

> x <- numeric(10) # or complex, character, logical, etc 
> nrow(x) 
NULL 
> NROW(x) 
[1] 10 
> NCOL(x) 
[1] 1 

> m <- matrix(1:10, nrow=5) 
> nrow(m) 
[1] 5 
> NROW(m) 
[1] 5 
> NCOL(m) 
[1] 2