3

我有一个或两个数值向量,例如x <- c(1, 2, 3). 我想创建关系的图形表示aRb,其中R是任何代数公式,例如a + b(在下面的示例中使用)或a / (a + b)(具有 的a,b任何元素x,包括a = b,即自反关系)。

结构应该是:

R   a   b   c
a  a+a a+b a+c
b  b+a b+b b+c
c  c+a c+b c+c

所以输出将是(对于上面的样本向量 x ):

R   1   2   3
1   2   3   4
2   3   4   5
3   4   5   6

R也可以是比较,例如a = bor a > b^2 / a,则表中的结果将不是数字,而是 TRUE 或 FALSE。

是否有在 R 中创建这样一个表的函数?

4

1 回答 1

5
x <- 1:3
outer(x,x,"+")

     [,1] [,2] [,3]
[1,]    2    3    4
[2,]    3    4    5
[3,]    4    5    6

您可以将其他功能传递给outer,例如

outer(x,x,"==")

outer(x,x,FUN=function(a,b){a > (b^2 / a)})
于 2013-05-14T09:05:41.273 回答