R: стандартизация использования средних и SD-функций

Question

Я пытаюсь сделать простое преобразование.Я использовал следующий код, и он работал нормально:

data_stdz <- transform(data_header, z.v1 = v1+2)

.

Но я не могу получить следующий код для работы:

data_stdz <- transform(data_header, z.v1 = (v1 - mean(v1))/(2*sd(v1))

.

Я также пытался получить только среднюю функцию для работы:

data_stdz <- transform(data_header, z.v1 = mean(v1)

.

Но я продолжаю получать следующую ошибку:

Error: unexpected symbol in:
"data_std2 <- transform(data_header, z.v1 = mean(v1)
data_std2"

.

Так что я предполагаю, что это есть что связано с тем, как я использую функцию среднего и SD, но я не смог понять это.

Пример данных:

v1   v2  v3
6.7 3.8 1.2
6.3 3.2 1.2
6.1 2.6 1.6
7   2.4 1
NA  NA  NA
6.5 3.6 2.6
6.1 2.4 1.6
6   5.6 5.2
7   2.8 1
6.7 3.8 1.4
5.7 4.2 2.6
5.1 5.6 5
NA  NA  NA

.

Answer 1

Your problem is likely (in additon to what gavin said) the NAs. Use na.rm=TRUE as in:

transform(data_header, z.v1 = (v1 - mean(v1, na.rm =T))/(2*sd(v1, na.rm =T)))

Answer 2

Base R has the scale() function for this purpose.