Извлечение столбца из таблицы данных. В виде вектора по позиции

Как извлечь столбец из data.table в качестве вектора по его позиции? Ниже приведены некоторые фрагменты кода, которые я пробовал:

DT<-data.table(x=c(1,2),y=c(3,4),z=c(5,6))
DT
#   x y z
#1: 1 3 5
#2: 2 4 6

Я хочу получить этот вывод, используя позицию столбца

DT$y 
#[1] 3 4
is.vector(DT$y)
#[1] TRUE

Другой способ получить этот вывод с использованием позиции столбца

DT[,y] 
#[1] 3 4
is.vector(DT[,y])
#[1] TRUE

Это не дает вектор

DT[,2,with=FALSE]
#   y
#1: 3
#2: 4
is.vector(DT[,2,with=FALSE])
#[1] FALSE

Эти два не работают:

DT$noquote(names(DT)[2]) # Doesn't work
#Error: attempt to apply non-function

DT[,noquote(names(DT)[2])] # Doesn't work
#[1] y

И это не дает вектор:

DT[,noquote(names(DT)[2]),with=FALSE] # Not a vector
#   y
#1: 3
#2: 4
is.vector(DT[,noquote(names(DT)[2]),with=FALSE])
#[1] FALSE

Ответ 1

Data.table наследует от класса data.frame. Поэтому он является внутренним элементом list (векторов столбцов) и может рассматриваться как таковой.

is.list(DT)
#[1] TRUE

К счастью, подмножество списка, т.е. [[, очень быстро и, в отличие от [, package data.table не определяет метод для него. Таким образом, вы можете просто использовать [[ для извлечения по индексу:

DT[[2]]
#[1] 3 4

Ответ 2

DT[,get(names(DT)[colNb])]

где colNb может быть целым числом (желаемым номером столбца) или переменной, содержащей номер столбца.