Я пытаюсь найти асимметрию для переменных галактик в библиотеке данных MASS
Я обрисовал формулу для асимметрии, затем загрузил пакет MASS, определил набор данных галактик, но получаю ошибку как nне определено в формуле асимметрии.Я не уверен, нужно ли мне включать n или нет, так как я просто хочу, чтобы размер моей выборки был равен всем результатам в галактиках.
Мой код
myskewness = function(x) {
n = length(x)
xbar = sum(x) / n
myskewness = (sqrt(n) * sum((x - xbar)^3)) / sum((x -xbar)^2)^(3 / 2)
return(myskewness)
}
gal <- galaxies
myskewness(gal)
Ошибкав myskewness (галлоне): объект 'n' не найден