Я пытаюсь превратить это уравнение в r-код для применения к набору данных.Я сделал пример набора данных:
a <- c(4, 6, 2, 5)
b <- c(8, 1, 3, 7)
c <- c(6, 3, 1, 3)
d <- c(7, 5, 7, 5)
data <- data.frame(a, b, c, d)
data
Пытался использовать функцию scale () для его стандартизации.
data <- scale(data)
data
Затем попытался превратить его в матрицу, чтобы найти определитель.
datamatrix <- data.matrix(data)
datamatrix
unlist(determinant(datamatrix))
det(datamatrix)
Но я понятия не имею, иду ли я в правильном направлении.Есть ли более простой способ написать это в несколько строк?Тем не менее я, кажется, застрял.