Получить последний элемент матрицы

считаю следующие матрицы

M <- matrix(1:9, 3, 3)
M
#      [,1] [,2] [,3]
# [1,]    1    4    7
# [2,]    2    5    8
# [3,]    3    6    9

Я просто хочу найти последний элемент i.e M[3, 3]

поскольку этот столбец матрицы и размер строки являются динамическими, мы не можем жестко закодировать его в M[3, 3]

как я могу получить значение последнего элемента?

В настоящее время я сделал, используя приведенный ниже код

M[nrow(M), ncol(M)]
# [1] 9

есть ли лучший способ сделать это?

3 ответов


матрица в R-это просто вектор с , так что вы можете просто подмножество его как один

M[length(M)]
## [1] 9

хотя (как упоминалось @James) ваше решение может быть более общим, если вы хотите сохранить матричную структуру, так как вы можете добавить drop = FALSE

M[nrow(M), ncol(M), drop = FALSE]
#      [,1]
# [1,]    9

хотя мое решение также может быть изменено аналогичным образом с помощью dim<- функция замены

`dim<-`(M[length(M)], c(1,1))
#      [,1]
# [1,]    9

некоторые критерии (предоставлено @zx8754)

M <- matrix(runif(1000000),nrow=1000)

microbenchmark(
  nrow_ncol={
    M[nrow(M),ncol(M)]
  },
  dim12={
    M[dim(M)[1],dim(M)[2]]
  },
  length1={
    M[length(M)]
  },
  tail1={
    tail(c(M),1)
  },
  times = 1000
)

# Unit: nanoseconds
#      expr     min      lq        mean    median      uq      max neval cld
# nrow_ncol     605    1209    3799.908    3623.0    6038    27167  1000   a 
#     dim12     302     605    2333.241    1811.0    3623    19922  1000   a 
#   length1       0     303    2269.564    1510.5    3925    14792  1000   a 
#    tail 1 3103005 3320034 4022028.561 3377234.0 3467487 42777080  1000   b

Я бы лучше сделала:

tail(c(M),1)
# [1] 9

один из способов сделать это и избежать ненужного повторения имени объекта (или глупых опечаток) - использовать трубы. Нравится это:

require(magrittr)
M %>% .[nrow(.), ncol(.)]
##[1] 9
M %>% `[`(nrow(.), ncol(.))
##[1] 9
M %>% extract(nrow(.), ncol(.))
##[1] 9

подходы эквивалентны, поэтому вы можете выбрать то, что кажется вам более интуитивным.