如何在 r 中求解方程组(3 个示例)
为了求解 R 中的方程组,我们可以使用内置的solve()函数。
以下示例展示了如何使用这些函数来求解 R 中的几个不同的方程组。
示例 1:求解两个变量的方程组
假设我们有以下方程组,并且我们想要求解 x 和 y 的值:
5x + 4 年 = 35
2x + 6 年 = 36
以下代码展示了如何使用 R 中的solve()函数求解x和y值:
#define left-hand side of equations left_matrix <- matrix(c(5, 2, 4, 6), nrow= 2 ) left_matrix [,1] [,2] [1,] 5 4 [2,] 2 6 #define right-hand side of equations right_matrix <- matrix(c(35, 36), nrow= 2 ) right_matrix [,1] [1,] 35 [2,] 36 #solve for x and y solve(left_matrix, right_matrix) [,1] [1,] 3 [2,] 5
这告诉我们 x 的值为3 ,y 的值为5 。
示例 2:求解具有三个变量的方程组
假设我们有以下方程组,并且我们想要求解 x、y 和 z 的值:
4x + 2y + 1z = 34
3x + 5 年 – 2z = 41
2x + 2a + 4z = 30
下面的代码展示了如何使用R中的solve()函数求解x、y和z的值:
#define left-hand side of equations left_matrix <- matrix(c(4, 3, 2, 2, 5, 2, 1, -2, 4), nrow= 3 ) left_matrix [,1] [,2] [,3] [1,] 4 2 1 [2,] 3 5 -2 [3,] 2 2 4 #define right-hand side of equations right_matrix <- matrix(c(34, 41, 30), nrow= 3 ) right_matrix [,1] [1,] 34 [2,] 41 [3,] 30 #solve for x, y, and z solve(left_matrix, right_matrix) [,1] [1,] 5 [2,] 6 [3,] 2
这告诉我们 x 的值为5 , y 的值为6 , z 的值为2 。
示例 3:求解具有四个变量的方程组
假设我们有以下方程组,并且我们想要求解 w、x、y 和 z 的值:
6w + 2x + 2y + 1z = 37
2w + 1x + 1y + 0z = 14
3s + 2x + 2a + 4z = 28
2w + 0x + 5y + 5z = 28
下面的代码展示了如何使用R中的solve()函数求解w、x、y和z的值:
#define left-hand side of equations left_matrix <- matrix(c(6, 2, 3, 2, 2, 1, 2, 0, 2, 1, 2, 5, 1, 0, 4, 5), nrow= 4 ) left_matrix [,1] [,2] [,3] [,4] [1,] 6 2 2 1 [2,] 2 1 1 0 [3,] 3 2 2 4 [4,] 2 0 5 5 #define right-hand side of equations right_matrix <- matrix(c(37, 14, 28, 28), nrow= 4 ) right_matrix [,1] [1,] 37 [2,] 14 [3,] 28 [4,] 28 #solve for w, x, y and z solve(left_matrix, right_matrix) [,1] [1,] 4 [2,] 3 [3,] 3 [4,] 1
这告诉我们 w 的值为4 , x 为3 , y 为3 , z 为1 。
其他资源
以下教程解释了如何在 R 中执行其他常见操作: