如何在 r 中使用平方根函数（附示例）

您可以使用sqrt()函数求 R 中数值的平方根：

 sqrt(x)

以下示例展示了如何在实践中使用此功能。

示例 1：计算单个值的平方根

以下代码显示了如何计算 R 中单个值的平方根：

 #define x
x <- 25

#find square root of x
sqrt(x)

[1] 5

示例 2：计算向量中值的平方根

以下代码显示了如何计算 R 中向量的每个值的平方根：

 #definevector
x <- c(1, 3, 4, 6, 9, 14, 16, 25)

#find square root of every value in vector
sqrt(x)

[1] 1.000000 1.732051 2.000000 2.449490 3.000000 3.741657 4.000000 5.000000

请注意，如果向量中存在负值，则会显示警告消息。为了避免出现此警告消息，您可以首先将向量中的每个值转换为绝对值：

 #define vector with some negative values
x <- c(1, 3, 4, 6, -9, 14, -16, 25)

#attempt to find square root of each value in vector
sqrt(x)

[1] 1.000000 1.732051 2.000000 2.449490 NaN 3.741657 NaN 5.000000
Warning message:
In sqrt(x): NaNs produced

#convert each value to absolute value and then find square root of each value
sqrt(abs(x))

[1] 1.000000 1.732051 2.000000 2.449490 3.000000 3.741657 4.000000 5.000000

示例 3：计算数据框中列的平方根

以下代码显示如何计算数据框中单列的平方根：

 #create data frame
data <- data. frame (a=c(1, 3, 4, 6, 8, 9),
                   b=c(7, 8, 8, 7, 13, 16),
                   c=c(11, 13, 13, 18, 19, 22),
                   d=c(12, 16, 18, 22, 29, 38))

#find square root of values in column a
sqrt(data$a)

[1] 1.000000 1.732051 2.000000 2.449490 2.828427 3.000000

示例 4：计算数据框中多列的平方根

以下代码展示了如何使用apply()函数计算数据框中多列的平方根：

 #create data frame
data <- data. frame (a=c(1, 3, 4, 6, 8, 9),
                   b=c(7, 8, 8, 7, 13, 16),
                   c=c(11, 13, 13, 18, 19, 22),
                   d=c(12, 16, 18, 22, 29, 38))

#find square root of values in columns a, b, and d
apply(data[, c(' a ', ' b ', ' d ')], 2, sqrt)

            abd
[1,] 1.000000 2.645751 3.464102
[2,] 1.732051 2.828427 4.000000
[3,] 2.000000 2.828427 4.242641
[4,] 2.449490 2.645751 4.690416
[5,] 2.828427 3.605551 5.385165
[6,] 3.000000 4.000000 6.164414

其他资源

如何在 R 中转换数据（对数、平方根、立方根）
如何计算 R 中的均方根误差 (RMSE)