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.