创建Y值的功能

Question

我希望有人能够帮助我理解一个家庭作业问题。 提醒您，我不是在寻找解决方案，只是想知道是否有人能够为我更简单地解释这个问题，因为我是数据分析的新手，并参加了无先决条件的R类，但感到某些语言迷失了方向。 任何帮助将不胜感激！

所以，问题的第一部分是创建一个数组，并用随机数值数据填充它，我在这里做了：

question <- array( 1:1000, dim= c(25,4,1000))
colnames(question)<- c('x1','x2','x3','x4')

现在，第二部分要求我“编写一个创建y值的函数”，该函数应该是四个变量的“线性组合”。 给出的例子是

y = 2 ∗ x1 + 5 ∗ x2 − 3 ∗ x3 + 0.7 ∗ x4 + RandomError.

这个问题补充说，结果应该是尺寸为25×1000的矩阵。我不确定这到底是在问什么还是如何解决这个问题。 到目前为止，我所知道的很少是

apply(question,c(1,3),sum)
function (y){ ...

任何人都可以提供任何指导或说明吗？ 非常感谢！

Answer 1

首先，要生成（伪）随机数，可以使用rnorm函数。 也就是说，如果您要使1000个随机数的正态分布均值为0，sd为1，则可以执行rnorm（1000）（但是，数组最终的长度为10000，所以也许您实际上想执行rnorm （10000））。

现在，你应该有一个数组question ，尺寸25×4×1000你想创建一个矩阵y它结合了四个一“片”的question ×1000大小25来创建一个矩阵y尺寸为25×1000你想编写一个函数f ，该函数将接受数组question所有四个“片段”，并将它们组合成一个片段。 您还希望合并随机错误，这可以再次通过rnorm函数完成。

举一个简单的例子，让我们制作一个维度为（10,2,10）的数组x

x = array(rnorm(200), dim = c(10,2,10))

现在让我们编写一个函数f ，它将x的两个“切片”加在一起。

f = function(my_array){
    my_array[,1,] + my_array[,2,]
    }

让我们在数组上执行函数

y = f(x)
dim(y)

希望您可以扩展此基本示例以适合您的情况。